[VBA] Funzione per ottenere il nome del mese dato il numero

[natasha]

Basta rifletterci un pò...

Private Sub cmdProva_Click()
Dim iCount As Integer

For iCount = 1 To 12
MsgBox Format(Day(Now()) & "/" & iCount & "/" & Year(Now()), "mmmm")
Next
End Sub