Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Frage zu Kalendersteuerelement | Herbers Excel-Forum


Betrifft: Frage zu Kalendersteuerelement von: Frank H.
Geschrieben am: 26.11.2009 21:30:51

Hallo und einen schönen Abend allen noch wachen Usern!

Meine 8vielleicht ausgefallene) Frage: Kann ich ein Kalendersteuerelement, welches sich in einer Uf befindet und bei Klick das ausgewählte Datum in eine TextBox einträgt, so begrenzen, dass nur Werte ab dem 01.01.2006 akzeptiert werden können. Also, der 31.12.2005 darf sich bspw. nicht auswählen lassen.
Ist das überhaupt möglich? Wenn ja, dann sagt mir bitte wie ich das bewerkstelligen müsste!!!

Danke und allen eine Gute Nacht!!!

Herzlichst Frank H.

  

Betrifft: AW: Frage zu Kalendersteuerelement von: Ramses
Geschrieben am: 26.11.2009 21:35:36

Hallo

Leg diesen Code in Click-Ereignis deines Calenders

Private Sub Calendar1_Click()
With Me.Calendar1
    If .Value < DateValue("1.1.2006") Then
        MsgBox "Datum muss grösser sein als der 31.12.2005", vbOKOnly + vbInformation, "Fehler"
        .Value = Now
    End If
End With
End Sub
Den Namen "Calender1" musst du an deinen namen anpassen

Gruss Rainer


  

Betrifft: AW: Frage zu Kalendersteuerelement von: Frank H.
Geschrieben am: 26.11.2009 21:50:25

Hallo Rainer!!!

Funzt Super!!!

Ganz herzlichen Dank und eine schöne Nacht!!!

Gruß Frank H.


Beiträge aus den Excel-Beispielen zum Thema "Frage zu Kalendersteuerelement"