UF Datumsbegrenzung
11.03.2008 17:16:19
Frederic
ich bräuchte mal bitte Eure VBA Hilfe...
Ich hab folgenden Code, der mir mein Datum richtig bei EIngabe formatiert:
Private Sub budat_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Sheets("NR").Visible = True
Sheets("NR").Range("A2") = CDate(budat)
If budat.Tag = "1" = True Then Exit Sub
If Len(budat) = 2 Then
If InStr(budat, ".") = 0 Then budat = budat & "."
ElseIf Len(budat) = 5 Then
If Len(budat) - Len(Application.Substitute(budat, ".", ""))
So weit so gut...
Nun möchte ich dass wenn z.B. in der ComboBox "period" der Monat "Februar" angeklickt wurde, auch nur Datumseingaben vom "01.02.2008-29.02.2008" möglich sind.
Geht das überhaupt, wie soll ich das abfragen? Über einen ermittelten Wert in einem Sheet?
Oder habt ihr hier was zur hand?
Tausend Dank im voraus für Eure Hilfen.
Greetz.Frederic