VBA erkennt keine englischen Monatsnamen
09.05.2013 17:33:25
Anna
ich brauche Hilfe bei der Programmierung eines Codes zur Berechnung der Anzahl der Tage eines Monates.
Mein Code sieht wie folgt aus
CurrentMonth = Month("1. " & "Februar")
CurrentYear = 2013
DaysInMonth = DateSerial(CurrentYear, CurrentMonth + 1, 1) - DateSerial(CurrentYear, CurrentMonth, 1)
MsgBox DaysInMonth
Ich hab hier mal bei CurrentMonth und CurrentYear einen Monat und ein Jahr reingeschrieben, im Programm sollen diese jedoch nachher variabel sein.
Der Code funktioniert auch einwandfrei solange ich mit deutschen Monatsbezeichnungen arbeite. Mein VBA ist auch auf deutsch. Mein Problem ist jetzt, dass ich aber englische Monatsbezeichnungen habe, also statt "Februar" steht dann da "February" usw. Ich habe mir auch schon überlegt einfach in einem Array, die Monate in deutsche immer umwandeln zu lassen, allerding soll das Programm für jemanden mit einer englischen Version von VBA geschrieben werden. Dort wiederum würden dann ja vermutlich die deutschen Monatsbezeichnungen nicht erkannt. Ich hätte daher gerne, dass es sowohl bei einer deutschen als auch englischen VBA laufen kann.
Gibt es die Möglichkeit, dass mein VBA einfach die englischen Monatsangaben erkennt? Oder irgendwelche anderen Ideen, wie man das lösen könnte?
Vielen Dank schonmal,
Grüße Anna