Spinnbutton Datum
28.01.2022 10:44:21
dani
Ich brauche eure Hilfe
Wie kann man folgendes Problem lösen.
Ich habe eine UserForm erstellt mit
Spinnbutton, Textbox1 und 2 x Labels
Im Textbox das aktuelle Datum mit dem spinnbutton hoch oder runter zählen.
VBA Code
sub spinnbutton_SpinUP
textbox1.value = (DateAdd("d",1,Textbox.vaule)"dd.mm.yyyy")
Label1.caption = (DateAdd("m",1,Textbox.vaule)"mmmm")
Label2.caption = (DateAdd("d",1,Textbox.vaule)"dddd")
sub spinnbutton_Spindown
textbox1.value = (DateAdd("d",-1,Textbox.vaule)"dd.mm.yyyy")
Label1.caption = (DateAdd("m",-1,Textbox.vaule)"mmmm")
Label2.caption = (DateAdd("d",-1,Textbox.vaule)"dddd")
Nun beim Label1 Funktioniert der Code nur teilweise, das heißt ist immer ein Monat voraus als die Textbox das gleich bei Label 2
Was mache ich falsch?
Besten Dank für eure Hilfe
LG
Dani