Tage von einem Monat mittels VBA zählen

[dertommy]

Hallo!

Ich möchte mittels VBA die Tage von einem bestimmten Monat zählen.
In Zelle A3 habe ich z.B. folgendes Datum stehen: 01.10.2022
Nun möchte, dass in Zelle B3 die Anzahl der Tage steht, nämlich 31.
Die normale Excel Formel "=TAG(DATUM(JAHR(A3);MONAT(A3)+1;1)-1)" habe ich zwar zusammen bekommen, aber ich würde sie gerne mittels VBA lösen.

Ich hoffe, dass mir jemand helfen kann.

LG
Thomas

[Stoffo]

Hallo,

VBA halte ich hier für ein wenig überdimensioniert. Probiere es doch mal mit =Anzahl().

[dertommy]

ich hätte es aber trotzdem gerne mittels VBA gelöst

[Der Steuerfuzzi]

Hallo,

meist Du so?

Code:

Day(DateSerial(Year(Range("A3").Value), Month(Range("A3").Value) + 1, 0))

oder Du verwendest die Excel-Funktion MONATSENDE:

Code:

Day(WorksheetFunction.EoMonth(Range("A3").Value, 0))

[dertommy]

hallo, ja genauso habe ich mir das vorgestellt, danke sehr

[snb]

Als UDF:

Code:

Function F_snb(y)
  F_snb = Day(DateAdd("m", 1, y) - 1)
End Function

In B1

PHP-Code:

=F_snb(A1) 


[Der Steuerfuzzi]

Hallo snb,

wenn aber nicht der Monatserste übergeben wird, kommt ein falscher Wert heraus. Ich vermute aber, dass genau das nicht immer der Fall ist ...

[snb]

Keine Ahnung.
Hat der TS nicht detailliert.
Ich habe nur die Information der TS benützt.