Zeitabhängiger Aktiver Button

Forumthread: Zeitabhängiger Aktiver Button
4 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Zeitabhängiger Aktiver Button

29.07.2015 11:05:52

matthias

Hallo,
ich kann man einen Commandbutton so steuern, dass dieser erst dann Aktiv ist, wenn das Systemdatum im Bereich zwischen August und April ist. Von Mai-Juli ist der Button inaktiv.
Kann mir hierzu wer helfen?

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Zeitabhängiger Aktiver Button

29.07.2015 11:36:30

Nepumuk
AW: Zeitabhängiger Aktiver Button

29.07.2015 11:39:39

Matthias
AW: Zeitabhängiger Aktiver Button

29.07.2015 11:41:40

Nepumuk
AW: Zeitabhängiger Aktiver Button

29.07.2015 13:20:17

Nepumuk

AW: Zeitabhängiger Aktiver Button

29.07.2015 11:36:30

Nepumuk

Hallo,
ein Beispiel für einen Button in Tabelle1:

Private Sub Workbook_Open()
Tabelle1.CommandButton1.Enabled = Month(Date) >= 8 And Month(Date) <= 4
End Sub

Gruß
Nepumuk

AW: Zeitabhängiger Aktiver Button

29.07.2015 11:39:39

Matthias

Vielen Dank.
Wie ist es aber wenn der Buuton in einer Userform eingebettet ist und nicht in einem Blatt?
Gruß

AW: Zeitabhängiger Aktiver Button

29.07.2015 11:41:40

Nepumuk

Hallo,
da war sowieso noch ein Denkfehler drin.

Private Sub UserForm_Activate()
    CommandButton1.Enabled = _
        Month(Date) >= 8 And Month(Date) <= 12 Or _
        Month(Date) >= 1 And Month(Date) <= 4
End Sub

Gruß
Nepumuk

AW: Zeitabhängiger Aktiver Button

29.07.2015 13:20:17

Nepumuk

hallo,
Ich werde alt.

Private Sub UserForm_Activate()
CommandButton1.Enabled = Month(Date) >= 8 Or Month(Date) <= 4
End Sub

Gruß
Nepumuk