Office: Monatsname in Zahl umwandeln

Moin,

gibt es eine einfache Möglichkeit Monatsnamen in ein zweistelliges Zahlenformat umzuwandeln. Also z.B. "März" in "03", "August" in "08", etc?

Gruß,
Philip

:)

 

Moin, Philip,

vielleicht etwas wie Code:

allerdings fehlt die Angabe, aus welchem Monatsdatum: Date, Now oder Zellendatum...

 

Danke erstmal Jinx.

Ich habe ein Userform mit einer ComboBox, wo man den Monatsnamen als String auswählen kann. Es liegt also kein wirkliches Datum vor.
Jedenfalls muß der Monatsname umgewandelt werden in das zweistellige Zahlenformat, damit es in einem Dateinamen, ebenfalls als String wieder auftauchen kann.
Mir fällt jetzt nur Select Case ein, ich frage mich nur ob es auch einen Befehl gibt mit dem das einfacher geht.
Ne andere Variante ist mir noch über Nacht eingefallen; Ich nehme den ausgewählten ListIndex der ComboBox, was ja schon die entsprechende Zahl darstellt. Frage hierbei ist nur wie krieg ich dann aus dem ListIndex = 3 die "03"

 

Moin, Philip,

die Zelle entsprechend formatieren:
Code:

Oder durch Einfügen eines ' als Text ausgeben (oder die Umwandlungsfunktion CStr nutzen)...

 

Danke Jinx,
ich habe es mit Cstr gelöst:

If UserForm1.ComboBox1.ListIndex + 1 < 10 Then
m = "0" & CStr(UserForm1.ComboBox1.ListIndex + 1)
Else
m = CStr(UserForm1.ComboBox1.ListIndex + 1)
End If

Gruß,
Philip