Active X button

[Romano_odK]

Good evening,

Would it be possible to make an active X button that would give me the todays date but needs to give it to me like yyyy-mm-dd. It needs to be this exactly and this is not common for my part of the world.

Thank you for your time.

Romano

 

[duggie33]

Hi Romano_odK,

You could try this...

MsgBox Format(Date, "yyyy-mm-dd")

Hope that helps,

Doug

 

[Romano_odK]

Hi Romano_odK,

You could try this...

MsgBox Format(Date, "yyyy-mm-dd")

Hope that helps,

Doug

I should haven been more clearly I seen now. I would like the date to be placed in cell B2. Is that possible?

 

[noveske]

Macro:

Sub Time()
    Dim ws As Worksheet
    Set ws = ActiveSheet
    For Each Cell In ws.Range("B2").Cells
        Range("B2").Value = Date
    Next Cell
End Sub

Then set cell format to : Custom > yyyy-mm-dd


I guess it could also be this:

Sub Time()

        Range("B2").Value = Date

End Sub

 

[noveske]

Got it!

This will insert current date to B2, then make sure format is yyyy-mm-dd.

Sub Time()

        Range("B2").Value = Date
        Range("B2").NumberFormat = "yyyy-mm-dd"

End Sub