Userform nicht mehr öffnen wenn bestimmte Tageszeit erreicht.

[Xenon85]

Gute Abend, 

ich bilde über Userform ein Schichtbuch ab. 

Userform2 wird unter 2 Vorrassetzungen vor der eigentlichen Eigabe Userform1 gezeigt. 

Nun würde ich noch gern Userform2 nicht zwischen 6Uhr und 12Uhr anzeigen. 

Uhrzeit steht mittels =Heute() in Zeile A1

Wie wäre dort der Code für?


Vielen dan für Eure Hilfe

[Kuwer]

Hallo,

Code:

Sub aaa()
  If Time < TimeValue("6:00") Or Time > TimeValue("12:00") Then
    UserForm2.Show
  End If
End Sub

Das =HEUTE() würde nicht viel bringen, da es keine Uhrzeit enthält.

Gruß, Uwe

[derHoepp]

Moin,

du hast mindestens zu deinen letzten vier Threads keine Rückmeldung gegeben. Entspricht das deiner Vorstellung von einem Forum? Kostenloser Code-Liederservice?

Viele Grüße
derHöpp

[Xenon85]

Mir ist gerade aufgefallen das ich das noch mit einer weiteren Bedingung verknüpfen muss.

wäre das so richtig?

Private Sub Eintragen_Click()
If Time < TimeValue("6:00") Or Time > TimeValue("13:55") And ThisWorkbook.Worksheets("Tabelle1").Range("A1").Value <> "nein" Then
    Userform2.Show
  End If
End Sub

[26865]

Mir ist gerade aufgefallen das ich das noch mit einer weiteren Bedingung verknüpfen muss.

wäre das so richtig?

Woher sollen wir das wissen? Beschreib doch mal in Worten, wie die Bedingung lauten soll.

Vielleicht hilft dir das:
https://learn.microsoft.com/de-de/office...precedence

[schauan]

Hallöchen,

du brauchst noch eine Klammerung um die Oder-Zeiten

If (Time < TimeValue("6:00") Or Time > TimeValue("13:55")) And ThisWorkbook.Worksheets("Tabelle1").Range("A1").Value <> "nein" Then

(in Analogie zu Punkt/Strichrechnung, logische Priorität NOT/AND/OR)

[Xenon85]

Super genau so fuktioniert es super. Krass was so zwei Klammern ausmachen.

Vielen Dank

[snb]

Für Leute die rechnen können:

Code:

Sub M_snb()
  MsgBox Int(Time * 4) <> 1
End Sub

[26865]

du brauchst noch eine Klammerung um die Oder-Zeiten

Das hätte auch „krass“ falsch sein können.

13:55 ist die neue Forderung.

[Xenon85]

Das hätte auch „krass“ falsch sein können.

13:55 ist die neue Forderung.

Hab nur etwas an den Zeiten rumgespielt um festzustellen ob die Formel mein Problem löst.