Month plays an important role of a date. We can get month name from date in different ways. We can get month name using MonthName function and summarize data with it. Format name of the month by using format function.
VBA Get Month Name:
Let us see the procedure how to get name of the month from today’s date using MonthName function.
'Procedure to Get Month Name From Date Sub VBA_Get_Month_Name() 'Variable declaration Dim sMonth_Name As String 'Retrieve month Name from date sMonth_Name = MonthName(Month("01/01/2018")) 'Display month name MsgBox "If Date is "01/01/2018" then" & vbCrLf & _ "Month name is : " & sMonth_Name, vbInformation, "Month Name From Date" End Sub
Explanation: In the above procedure we have used Month, Date and MonthName VBA functions. Here Month function is used to display month number. MonthName function helps to generate name of the month from specified month number. Here is the output screenshot for your reference.
Format Name of the Month:
We have different format methods to format name of the month. You can find output in an immediate window.
'Format Name of the Month Sub VBA_Format_Month_Name() 'Variable declaration Dim sMonth_Name As String sMonth_Name = Format("01/01/2018", "m") Debug.Print sMonth_Name sMonth_Name = Format("01/01/2018", "mm") Debug.Print sMonth_Name sMonth_Name = Format("01/01/2018", "mmm") Debug.Print sMonth_Name sMonth_Name = Format("01/01/2018", "mmmm") Debug.Print sMonth_Name End Sub
Output Screenshot
Here is the output screenshot.
Instructions to use Macro:
- Open Visual Basic Editor by clicking Alt +F11
- Goto code window by clicking F7
- Copy any of the above specified procedure or macro
- Paste above copied code in code window
- Run macro by clicking F5 or Run command
- You can see ouput on the screen
- Find specified output screenshot above.
Related VBA Functions used in this article:
We have used Date,Month,MonthName and Format VBA functions. Click on below specified links to learn more about VBA functions.
VBA Date Function VBA Month Function VBA MonthName Function VBA Format Function