Datum in Cellen eintragen durch Date Picker in Userform
#1
Hallo,
 
Euch allen zuerst mal ein wunderschönes Osterfest!
 
Nun mein Anliegen. Ich weiß es gibt den Date Picker in Excel, aber ich bin gerade dabei mich etwas mit VBA zu beschäftigen, denn ich bin noch sehr unerfahren  und nun hoffe ich, es kann mir jemand helfen, denn ich habe in einer UserForm einen Kalender , wie ein Date Picker gebaut. Es ist wie gesagt eine Übung und Herausforderung!
Die dazugehörigen VBA Codes habe ich mir zusammen gesucht und auch eingebaut und der Kalender klappt soweit. 
Die Monate und Jahre werden über Comboboxen  gesucht und die Tage sind durch  Commandbutton in der Userform angelegt. Es gibt auch ein Button für "Heute", der mir den aktuellen Monat mit Jahr einstellt.
Ich könnte jetzt eine Schaltfläche in einen Tabellenblatt einbauen, und darüber den  Kalender öffnen. Doch ich möchte verschiedene Zellen in meinen Tabellenblatt, die Datumsfelder sind, dafür benutzen und  das Datum in die Zellen automatisch eintragen lassen, was ich aussuche.
Ich habe es soweit auch hinbekommen, wenn man in die bestimmten  Zellen klickt, dass der Kalender sich öffnet, denn das möchte ich so haben. Jetzt komme ich aber an den Punkt, wo ich überhaupt nicht mehr weiter weiß. Habe schon ne Weile gebraucht , die Codes für den Kalender zu verstehen. Der Kalender ist bisher so aufgebaut und funktioniert, das ich zwar das Datum einstellen kann, aber in Moment passiert folgendes, wenn ich über  die Commandbutton, die die Tage sind, anklicke, dann geht der Kalender zu, aber das Datum wird in der Zelle nicht angezeigt. 
Es fehlt also ein Befehl, der beim Klick der Commandbutton aktiviert, das er das ganze Datum in die Celle einfügt.
 
Ich habe die Datei im Anhang mitgeschickt, so dass man es vielleicht besser nachvollziehen kann. Die Zellen, die als Datumsfelder gedacht sind, habe ich einen blauen Rahmen gegeben.
 
Bitte habt Geduld mit mir, ich wie gesagt kein Experte und ich weiß es gibt schon  einen fertigen Date Picker, aber ich möchte es gerne so hinbekommen und verstehen. Hoffe jemand hat eine Idee!

Hier die Datei:

.xlsm   Prüfung_Check_ Vorlage_20200412_neu_übung.xlsm (Größe: 64,3 KB / Downloads: 4)

Schönes Fest und Danke im voraus!
Top
#2
(13.04.2020, 11:03)carino73 schrieb: Ich weiß es gibt den Date Picker in Excel, …

Moin!
Nein, den gibt es schon lange nicht mehr!
Zumindest unter Windows 10 scheint es auch nicht (mehr) möglich zu sein, die (zweifelhafte und wahrscheinlich illegale) Methode der Registrierung der entsprechenden .ocx als Administrator durchzuführen.

Deine Datei habe ich mir nicht angesehen, sondern wollte nur Deinen Irrtum aufzeigen.

Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Top
#3
Habe ich mittlerweile auch schon gelesen und daher habe ich über Userform etwas probiert, aber vielen Dank für den Hinweis!
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste