How can I format a certain string (date) in VBA?

Question

In order to fit my code, I needed to convert today's year to a two digit number (the last two digits). To test this, I tried:

Sub test()

Dim y As String

y = Format(Year(Now), "00")

MsgBox (y)
End Sub

I was told by a classmate that I could use the "Mid" function, but I'm not very familiar with VBA; any help?

Using format you use the letter that you want, so D for day, M for month and Y for year. The number of letters you use determines how it comes out. So YY will give you 21 whereas YYYY will give you 2021. Another example for a full date: "DD-MM-YY will give 24-01-21 whereas "DD-MMM-YYYY" will give 24-Jan-2021. Also instead of Year(Now), either use Date or Now() — Simon
– Simon, Commented Jan 23, 2021 at 22:51

Gustav · Accepted Answer · 2021-01-23 22:53:08Z

2

Try:

y = Format(Date, "YY")

Gustav

56.5k7 gold badges33 silver badges65 bronze badges

answered Jan 23, 2021 at 21:53

Morten

1486 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

This is the answer.

pizzettix · Accepted Answer · 2021-01-23 21:50:54Z

1

Try this

Sub test()

Dim y As String

y = Right(Year(Now), 2)

MsgBox (y)
End Sub

answered Jan 23, 2021 at 21:50

pizzettix

4192 silver badges9 bronze badges