VBA: Datum erzeugen
20.01.2010 11:40:09
André
Moin zusammen,
ich stehe ja immer noch mit Excel-VBA auf Kriegsfuß, daher heute mal wieder eine wahrscheinlich blöde Frage:
wie kann ich in VBA ein Datum erzeugen?
Ausgangslage: ich habe eine Variable mit einer Jahreszahl (Integer, z.B. 2009)
Ziel: ich möchte ein Datum mit dieser Jahreszahl zurückgeben (z.B. den 01.01.2009)
Das ganze soll in einer Funktion zum Einsatz kommen.
Was ich probiert habe, aber NICHT funktioniert:
Function Test(Tag As Variant)
Dim Jahr As Integer
Jahr = DatePart("yyyy", Tag)
Test = WorksheetFunction.Datum(Jahr , 1, 1)
End Function
Benutze ich diese Funktion in einer Zelle, dann kommt #WERT! als Ergebnis raus. Wer kann mir helfen?
Gruß, André