Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1244to1248
1244to1248
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

UserForm Kalender

Forumthread: UserForm Kalender

UserForm Kalender
Heike
Hallo und ein frohes Neues 2012
das Jahr ist noch jung und ich habe schon wieder ein Problem.
Habe mir eine User Form erstellt (oder mehr gebastelt, und aus diesem Forum zusammengestellt) und funktioniert soweit ganz gut. Wenn ich in der UserForm1 auf DATUM klicke, zeigt er mir auch den Kalender an (aus UserForm2). Ich weiß aber nicht, wie ich das ausgewählte Datum in die UserForm1 übertragen kann.
Na ja, ich denke, die Beispielmappe zeigt ganz deutlich mein Problem.
https://www.herber.de/bbs/user/78168.xlsm
Wäre schön, wenn mir jemand helfen würde.
Vielen Dank schon einmal im Voraus.
Gruß
Heike
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: UserForm Kalender
01.01.2012 19:58:28
Frank
Hallo Heike!!!
Auch dir ein gesundes Jahr 2012!
Private Sub CommandButton1_Click()
UserForm1.TextBox4 = Calendar1
Unload Me
End Sub
Sollte dir das erste Textfeld befüllen. Eine weitere UF mit dem Kalender dann für das zweite Textfeld!
Konnte ich helfen?
Gruß Frank H.!!!
Anzeige
AW: UserForm Kalender
01.01.2012 20:00:53
hary
Hallo 

Private Sub CommandButton1_Click()
If UserForm1.TextBox4 = "" Then
UserForm1.TextBox4 = Calendar1.Value
Else
UserForm1.TextBox5 = Calendar1.Value
End If
Unload Me
End Sub

gruss hary
perfekt :-)))
01.01.2012 20:20:48
Heike
Hallo ihr Zwei,
das ging ja super schnell. Vielen Dank. Ich habe mich für Harys Lösung entschieden, da ich somit nicht so viele UF erstellen muss.
Ich stoße bestimmt immer mal wieder auf ein Problem für dieses Projekt, und als Nichtprogrammiererin macht es mir aber viel Spaß, hier zu recherchieren und manchmal sogar zu verstehen :-)
Sollte ich wieder eine Frage habe, nutze ich dann diesen Thread oder eröffne ich einen neuen?
Vielen Dank ihr Zwei
Gruß
Heike
Anzeige
AW: perfekt :-)))
01.01.2012 20:25:08
hary
Hallo 
nutze ich dann diesen Thread oder eröffne ich einen neuen?

zum gleichen Thema, diesen Thread. Sonst neu.
gruss hary
AW: UserForm Kalender
01.01.2012 20:13:04
Matthias
Hallo Heike
schreibe ins Modul als erste Zeile
Public MyDate$

im Userform2 
Private Sub Calendar1_Click()
MyDate = Calendar1.Value
Unload UserForm2
End Sub


und im UForm1 
Private Sub CommandButton5_Click() 'wird auf die Schaltfläche DATUM geklickt, wird der Kalender  _
aufgerufen
UserForm2.Show
If MyDate  "" Then TextBox4 = MyDate
MyDate = ""
End Sub


Private Sub CommandButton6_Click() 'wird auf die Schaltfläche DATUM geklickt, wird der Kalender  _
aufgerufen
UserForm2.Show
If MyDate  "" Then TextBox5 = MyDate
MyDate = ""
End Sub


Kann es leider nicht komplett testen, da der Kalender bei mir nur leere Button zeigt.
Gruß Matthias
Anzeige
AW: UserForm Kalender
01.01.2012 20:30:01
Heike
Hallo Matthias,
dein Programm funktioniert auch super, es ist sogar so, dass ich die Schaltfläche "Übernehmen" gar nicht mehr brauche ich aber trotzdem das Datum wieder überschreiben kann.
Unglaublich, welche Möglichkeiten es gibt. Bin wirklich happy :-))
Vielen Dank und allen einen schönen Abend!
Gruß
Heike
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige