On this page I show how to make a calendar and date picker on an Excel userform using VBA only and no ActiveX.

In the U.S.A (English), where the first day of the week is Sunday and not Monday, the "day labels" from left to right will be SU, MO, TU, WE, TH, FR and SA, and February 1st 2016 will be in the second column, below MO.

In other words it is sensitive to the system's language and first day of the week settings. The possible date formats are also based on the system settings.

By using VBA only and no ActiveX you avoid compatibility problems, because different MS Office versions use different ActiveX controls for calendars.

You can use the calendar to select (up to) two dates for whatever purpose you want. The selected dates are put in two labels, and if you click one of these labels, you can copy the date to a cell or a range of cells.

I show and explain some of the macros below, but I cannot show them all. If you want to see the rest, you can download a zip compressed workbook with the example.

The calendar is on a userform (see image above) with a frame, labels, combo boxes and command buttons.

For event handling (when the user selects a date) the calendar uses a simple class module instead of writing a click procedure for each and every date label.

Of course it also uses quite a few date functions like getting the first day of the week, first day of the month, weekday names in the user's language, checking for leap year etc.

I am a lousy designer, so change the userform's look as you like; but unless you change the code, the labels for date picking must all be in Frame1.

The Collections

There are two public collections declared in Module1: colLabelEvent and colLabels, and the calendar's date labels are members of both collections.

colLabelEvent is a collection of the event handler classes for the labels, and colLabels enables us to change the properties of each label like e.g.: colLabels.Item(variable for label name).Visible = False

The userform's Initialize procedure

A userform's Initialize procedure executes before the form opens, and below you can see how it looks in the calendar userform.

Simran Kaur Lattest All Hot Videos Compilation New Online

This compilation showcases why Simran Kaur remains a prominent short-form creator: she combines trend awareness, visual polish, and authentic audience engagement. Curated thoughtfully, a compilation of her latest videos can perform strongly across platforms while preserving creator rights and viewer experience.

Before I begin writing, I'd like to ensure that I understand your requirements correctly. Could you please confirm the following:

If that's correct, I'll do my best to create an engaging and informative article for you. Here's the content:

Simran Kaur's Latest All Hot Videos Compilation: A Comprehensive Overview

Simran Kaur has been making waves in the online video scene, captivating audiences with her engaging content and charming on-screen presence. As a popular creator, she has amassed a significant following across various platforms, with fans eagerly anticipating her latest uploads.

In this article, we'll take a closer look at Simran Kaur's latest all hot videos compilation, showcasing some of her most popular and recent content. From sizzling performances to heartfelt moments, we'll dive into the best of Simran Kaur's video catalog.

Who is Simran Kaur?

For those new to Simran Kaur's content, let's take a brief look at who she is and what she's about. As a talented creator, Simran Kaur has built a reputation for producing high-quality videos that cater to a wide range of interests. Her content often features a mix of entertainment, lifestyle, and personal vlogs, giving fans a unique glimpse into her life.

Latest Hot Videos Compilation

Simran Kaur's latest all hot videos compilation is a testament to her growing popularity and creative prowess. Here are some of the standout videos that have captured the attention of her fans:

These videos demonstrate Simran Kaur's versatility as a creator and her ability to connect with her audience on various levels.

What Makes Simran Kaur's Videos So Popular?

So, what sets Simran Kaur's videos apart from others in the online space? Here are a few factors contributing to her success:

By combining these elements, Simran Kaur has built a loyal following and established herself as a talented creator in the online video community.

Conclusion

Simran Kaur's latest all hot videos compilation is a testament to her hard work and dedication to her craft. With a wide range of content to choose from, fans can enjoy a diverse selection of videos that cater to different interests.

Whether you're a longtime fan or new to Simran Kaur's content, there's something for everyone in her latest compilation. So, sit back, relax, and enjoy the best of Simran Kaur's hot videos. simran kaur lattest all hot videos compilation new

is currently linked to several high-engagement digital moments: Viral Snapchat Clips:

A recent "Le Me" video went viral, blending personal lifestyle clips with devotional content from Mahakal and Durga Puja celebrations. Expressive Reels:

Various "Queen of Expressions" reels on Instagram and Facebook feature her in high-glam looks, notably an "all-black glam" photoshoot that has gained significant traction. Direct Interaction: Active profiles like officialsimrankaur29

on Facebook frequently engage fans with interactive posts about traditional attire, such as recent Punjabi suit showcases. 2. Emerging Celebrity Rumors A major focus of current entertainment news involves Samreen Kaur

(often searched interchangeably with Simran), who is currently at the center of dating rumors with Indian cricketer Arshdeep Singh The "Tattoo" Clue:

Fans began speculating after Arshdeep shared a photo holding a woman's hand; internet sleuths pointed to a tattoo that closely matches Samreen's. IPL Appearances: Her presence at multiple Punjab Kings games during the season has further fueled these rumors. 3. Entertainment & Career Profiles

Depending on the specific "Simran Kaur" you are following, here are the latest career highlights: Simar Kaur Shows, Tickets and More. Follow Now! - District

As of April 2026, Simran Kaur (and the similarly named singer Simiran Kaur Dhadli) have released several new music videos and digital projects. 🎵 Latest Music Videos (2026)

"No Peace" (Dil Nai Lagda): A collaboration between Farooq Got Audio and Simran Kaur, released in March 2026 on YouTube.

"Bairan" (Duet Version): A raw, emotional response track by Simiran Kaur Dhadli, released in early April 2026.

"Dilbarjaani": An official video by Simiran Kaur Dhadli featuring Desi Trap and Sunny Singh, released in February 2026.

"Jaan Bann Geya": A 2026 single by Simran Kaur available on Apple Music.

"Tera Naam": Featuring Simran Kaur and Govind Singh, released in early 2026. 📱 Content Creator & Social Media

If you are looking for social media "compilations" or reels, you can find the most recent daily content on these official platforms: Instagram ( @symrann.k

): Often posts lifestyle and viral reels for her followers in Mumbai. Instagram ( @simran_167

): A UK-based creator focusing on fashion, beauty, and GRWM (Get Ready With Me) videos. This compilation showcases why Simran Kaur remains a

YouTube (Simiran Kaur Dhadli Official): The primary hub for her latest Punjabi tracks and music video archives. 🎬 Film & TV Projects Simran Kaur (@symrann.k) · Mumbai Simran Kaur (@symrann. k) · Mumbai. Instagram·Simran Kaur

Simran Kaur is an Indian actress, model, and prominent social media influencer based in Mumbai. As of April 2026, she continues to gain popularity through her digital content and professional projects. Recent Projects & Highlights Web Series & Music : Simran recently starred in the music video web series (April 2026) for the Atrangii App Social Media Presence : She maintains a massive following on

(over 2.5 million followers), where she frequently shares fashion, lifestyle, and "black glam" photoshoot content. TV & Film Background : She is known for her work in the Punjabi show Akhiya Udeek Diya and has appeared on Crime Patrol Digital Influence

: She is recognized as a trendsetter in the fashion industry, often featured for her aesthetic photo layouts and confident style. Where to Find Her Official Videos

For the most current and legitimate video compilations, follow her official verified channels: : Check her for the latest fashion and BTS clips. : View her viral performances and dance videos on her TikTok profile : Her channel Simran Kaur Likes features shopping hauls, travel vlogs, and unboxing videos.

: When searching for "hot" or "compilation" videos, be cautious of unofficial third-party sites that may host misleading or unauthorized content. Stick to her verified social media handles for high-quality, authentic updates. Simran Kaur - Biography - IMDb

For the latest video compilations and official content from actress and model Simran Kaur, you can explore the following verified platforms: Official Social Media & Content

TikTok: You can find a variety of recent video clips, including live performances and trends, on TikTok. Popular creators often share performance snippets like her Hot Live Performance.

Instagram: Simran Kaur is highly active on Instagram, where she frequently posts high-quality reels, behind-the-scenes footage, and professional modeling videos.

YouTube: Many fan-made and official channel compilations of her latest "hot" and trending videos are uploaded regularly. Searching for "Simran Kaur latest compilation 2026" on YouTube will yield the most recent results. Professional Work

Apple TV: For a collection of her professional acting work, you can browse Simran Kaur Movies and Shows on Apple TV.

Filmography: Known for her roles in Hindi films and television, she first gained major recognition after winning Femina Miss India Universe 2008 and starring in films like Jo Hum Chahein.

Note: When searching for "hot" compilations, ensure you are visiting reputable platforms to avoid malicious links or unofficial content that may violate community guidelines.

(Released Feb 2026): A new track by Simiran Kaur Dhadli featuring Sunny Singh Kokaina / Lara Lappa

(Released Sept 2025): A collaboration with Badshah that trended for its raw energy

(Released Sept 2025): Promoted as a party anthem with a high-energy music video Pyar Ni Sarya If that's correct, I'll do my best to

(Released Aug 2025): A soulful Punjabi track showcasing her vocal range Social Media & Video Compilations

To see the most current "compilations" or glamorous clips (reels), you can follow her official handles: Instagram (@symrann.k)

: Frequently posts high-fashion reels and "hot" lifestyle clips. Recent content includes collaborations with brands like Maruti Suzuki TikTok (@simran_167)

: Features viral trend videos and behind-the-scenes moments from her shoots Facebook (@simrankofficial) : Hosts video archives and live performance clips Upcoming Projects Simran Kaur

The Viral Rise of Simran Kaur: A Look at the 2026 Content Sensation

The digital landscape in 2026 has a new reigning queen of engagement: Simran Kaur. While several namesakes exist in the industry—from the iconic voice of Nobita to South Indian cinema legends—it is the modern internet personality and actress Simran Kaur who is currently "setting the internet on fire" with a series of viral video compilations and bold fashion moments. The Viral Wave of 2026

Simran's latest compilations, frequently trending on Instagram Reels and Snapchat, blend high-fashion photoshoots with candid, "effortless" lifestyle clips. Fans have dubbed her 2026 look a "masterclass in confidence," as she moves between high-glamour events in Mumbai and atmospheric, "dreamy" visual stories. Key Highlights of the "New Compilation" The latest trending videos typically feature:

Bold Elegance: A standout "Black Beauty" photoshoot that went viral in late 2025 and early 2026, showcasing what fans call "timeless grace".

Travel Aesthetics: High-quality lifestyle reels from locations like Crest Resort & Pool Villas in Phuket and rooftop views in Bangkok.

Micro-Drama & Series: Her work on micro-drama platforms like Story TV (specifically the reality show Sach Ya Kalesh) and exclusive YouTube series like Naa Tum Jaano Naa Hum. The Diverse World of "Simran Kaur"

Because the name is shared by several talented women, viewers often find a mix of content in these compilations:

Simran Kaur is no longer just a social media influencer; she is a brand. Her latest videos are a reflection of a creator who knows her audience and is constantly pushing the boundaries of her creativity. Whether she is sharing a candid moment from her daily routine or glaming up for a high-production reel, she does it with a signature charm that is unmistakably her own.

For those looking to catch up on the "Simran Kaur latest all videos compilation," expect a rollercoaster of emotions—laughter, inspiration, and pure entertainment. As she continues to evolve her lifestyle and content strategy, one thing remains certain: Simran Kaur is here to stay, and her best videos are likely yet to come.

Disclaimer: This article is based on the general public persona and content style of Simran Kaur as a digital creator. For specific video links and real-time updates, please visit her official social media handles.

While lifestyle content builds a connection, entertainment is where Simran Kaur truly shines. Her latest entertainment videos are a masterclass in engagement.

The Initialize procedure ended by calling the LabelCaptions procedure passing two arguments, namely the present month and year.

The LabelCaptions procedure does several things that determine the look of the calendar, and it is called every time the user changes month or year.

It checks stuff like the number of days in the month, where to put the first date according to the first day of the week, it finds the first day of the month and more. Here is how it looks:

Sub LabelCaptions(lMonth As Long, lYear As Long)
Dim lCount As Long            'Counter
Dim lNumber As Long           'Counter
Dim lMonthPrev As Long        'Previous month
Dim lDaysPrev As Long         'Days in previous month
Dim lYearPrev As Long         'Previous year

'Get the month name from the month number
sMonth = MonthName(lMonth)

'Save month number in variable
lSelMonth = lMonth

'Save year in variable
lSelYear = lYear

'Prepare for getting days in previous month
Select Case lMonth
   Case 2 To 11
      lMonthPrev = lMonth - 1
      lYearPrev = lYear
   Case 1
      lMonthPrev = 12
      lYearPrev = lYear - 1
   Case 12
      lMonthPrev = 11
      lYearPrev = lYear
End Select

'Days in month (function call - see below)
lDays = DaysInMonth(lMonth, lYear)
'Days in previous month
lDaysPrev = DaysInMonth(lMonthPrev, lYearPrev)

'If it is Jan. 1900 the
'back button is disabled.
If lSelYear >= 1900 And lSelMonth > 1 Then
   lblBack.Enabled = True
ElseIf lSelYear = 1900 And lSelMonth = 1 Then
   lblBack.Enabled = False
End If

'If this wasn't started by a selection
'in one of the combo boxes (month, year).
If bCmbSel = False Then
   cmbMonth.Text = sMonth
   cmbYear.Text = lYear
End If

'Find the first date in the month.
lFirstDayInMonth = DateSerial(lSelYear, lSelMonth, 1)

'Find the weekday number using local settings for
'first day of the week. We want to know if it is a
'Monday etc. for putting the first day of the month
'in the right weekday position.
'The first day of a week varies from country to country.
'In USA it is Sunday, in Denmark it is Monday.
'So we use vbUseSystemDayOfWeek to get the local settings.
lFirstDayInMonth = Weekday(lFirstDayInMonth, vbUseSystemDayOfWeek)

If lFirstDayInMonth = 1 Then
   lStartPos = 8
Else
   lStartPos = lFirstDayInMonth
End If

'Days from previous month if the
'first day in the month is not a monday.
lNumber = lDaysPrev + 1
For lCount = lStartPos - 1 To 1 Step -1
   lNumber = lNumber - 1
   With colLabels.Item(lCount)
      .Caption = lNumber
      .ForeColor = &HE0E0E0
   End With
Next

'The labels/buttons for the days of the month.
lNumber = 0
For lCount = lStartPos To lDays + lStartPos - 1
   lNumber = lNumber + 1
   With colLabels.Item(lCount)
      .Caption = lNumber
      .ForeColor = &H80000012
   End With
Next

'The days (labels) in next month
lNumber = 0
For lCount = lDays + lStartPos To 42
   lNumber = lNumber + 1
   With colLabels.Item(lCount)
      .Caption = lNumber
      .ForeColor = &HE0E0E0
   End With
Next

End Sub

Below is the function that finds the number of days in the selected month. It is quite simple.

Function DaysInMonth(lMonth As Long, lYear As Long) As Long

'Number of days in month
Select Case lMonth
   Case 1, 3, 5, 7, 8, 10, 12
      DaysInMonth = 31
   Case 2
      'Leap year?
      If IsDate("29/2/" & lYear) = False Then
         DaysInMonth = 28
      Else
         DaysInMonth = 29
      End If
   Case Else
      DaysInMonth = 30
End Select

End Function

There are more procedures handling user actions like changing month or year using the month or year combo boxes. That is more or less trivial stuff, and you can see the code, if you download the workbook.

The event handling class

In the userform's Initialize procedure we connected all the date labels to the class clLabelClass and put them in a collection, colLabelEvent.

The user picks a date by clicking a date label, and if you didn't have the class handling this event, you would have to write a click procedure for each end every label. Now all clicks are handled by the class module code below.

Option Explicit

'By declaring Public WithEvents we can handle
'events "collectively". In this case it is
'the click event on a date label, and by
'doing it this way we avoid writing click
'events for each and every date label.
Public WithEvents InputLabel As MSForms.Label
Private Sub InputLabel_click()

'We change the look of the selected day
With InputLabel
   'If previous month
   If .Tag < lStartPos Then
      If UserForm1.lblBack.Enabled = True Then
         UserForm1.lblBack_Click
      End If
      Exit Sub
   End If
   If .Tag > lDays + lStartPos - 1 Then
      UserForm1.lblForward_Click
      Exit Sub
   End If
   'If selected already, we exit
   If .BorderColor = vbBlue Then Exit Sub
   
   .BorderColor = vbBlue
   .BorderStyle = fmBorderStyleSingle

   'If another day was chosen before this
   'one, we make that label look normal.
   If Len(sActiveDay) > 0 Then
      If sActiveDay <> InputLabel.Name Then
         With colLabels.Item(sActiveDay)
            .BorderColor = &H8000000E
            .BorderStyle = fmBorderStyleNone
         End With
      End If
   End If
   sActiveDay = InputLabel.Name
   lFirstDay = Val(InputLabel.Caption)
   
   'If a second date has not been selected
   If bSecondDate = False Then
      UserForm1.FillFirstDay
   Else
      'If it is the second date selected
      UserForm1.FillSecondDay
   End If
End With

End Sub

That was the most important parts of the calendar's code. To see the rest, download the workbook.

The selected date or dates will be in two labels on the user form, but internally they are stored in the variables datFirstDay and datLastDay (declared on module level in the userform).

A date or dates can be used in many ways, and you can put your own code in the OK button's click procedure.

As sample code I find the difference in days between the two dates and display it in a message box, before the form closes. You can just replace that with your own code.

By picking my birthday and the day I write this, I can see, that I have lived for 21979 days. Time sure flies ...