ich versuche die untenstehende Formel in VBA umzuschreiben - bisher mit mäßigem Erfolg.
Ich muss allerdings dazusagen: Ich bin kein Formel-Spezialist und durchschaue die Formel deshalb auch nicht. Was muss ich z. B. mit den Matrixkonstanten der Formel in VBA machen?
=MIN(DATUM(JAHR(A1);MONAT(A1)+(TAG(A1+1)=1)+{1.2};{1.0}*TAG(A1)*(TAG(A1+1)>1))) }
Mein bisheriger Versuch wird von VBA nicht akzeptiert:
Range("E" & lZeile).Value = Application.Min(DateSerial(Year(dDatum), _
Month(dDatum) + (Day(dDatum + 1) = 1) + (1, 2), _
(1, 0) * Day(dDatum) * Day(dDatum + 1) > 1)) }
Für Hilfe bereits schon jetzt vielen Dank im voraus.
Gruß Peter