Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Form soll zur jeden vollen Stunde automatisch geöffnet werde
zurück: Formularansicht automatisch aktualisieren weiter: 3-stufig organisierte Daten: subforms? Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
wimmera
Im Profil kannst Du frei den Rang ändern


Verfasst am:
14. Nov 2009, 19:56
Rufname: Wimmsti
Wohnort: St.Johann im Pongau (Salzburg)

Form soll zur jeden vollen Stunde automatisch geöffnet werde - Form soll zur jeden vollen Stunde automatisch geöffnet werde

Nach oben
       Version: Office 2003

Hallo zusammen,

Ich habe eine DB für Produktionsprüfungen.
Da dies verschiedene Prüfungen sind benötige ich verschiedene Intervalle.

Ich gehe vom Hauptformular aus bei Zeitgeber.

Eine Prüfung soll zur jeder vollen Stunde geschehen.
Eine Prüfung wird einmal am Tag gemacht.
Eine einmal pro Schicht.
Da der Betrieb zwischen 1,2 oder 3 Schichtbetrieb wechseln kann währe es gut wenn ich verschiedene Uhrzeiten eingeben könnte.

Danke für Eure Hilfe.

Gruß
Alex
wimmera
Im Profil kannst Du frei den Rang ändern


Verfasst am:
15. Nov 2009, 23:11
Rufname: Wimmsti
Wohnort: St.Johann im Pongau (Salzburg)


AW: Form soll zur jeden vollen Stunde automatisch geöffnet w - AW: Form soll zur jeden vollen Stunde automatisch geöffnet w

Nach oben
       Version: Office 2003

Bitte um Hilfe,

Das mit den Millisekunden funktioniert ja, aber ich benötige die Verbindung zur Uhrzeit.
Code:
Private Sub Form_Timer()
    DoCmd.OpenForm "10"
    Me.TimerInterval = "50000"
Me.TimerInterval = "06:00" das funktioniert leider nicht?

Bitte Danke
Gruß
Alex
Gast



Verfasst am:
15. Nov 2009, 23:22
Rufname:

AW: Form soll zur jeden vollen Stunde automatisch geöffnet w - AW: Form soll zur jeden vollen Stunde automatisch geöffnet w

Nach oben
       Version: Office 2003

Hallo,
Zitat:
Me.TimerInterval = "06:00" das funktioniert leider nicht?
aber:
Code:
    If Format(Time,"hh:nn") ="06:00" Then '...

Gruß Mike
wimmera
Im Profil kannst Du frei den Rang ändern


Verfasst am:
16. Nov 2009, 00:25
Rufname: Wimmsti
Wohnort: St.Johann im Pongau (Salzburg)

AW: Form soll zur jeden vollen Stunde automatisch geöffnet w - AW: Form soll zur jeden vollen Stunde automatisch geöffnet w

Nach oben
       Version: Office 2003

Hallo Mike,

Danke für Deine Hilfe,

ich habe jetzt den Code wie folgt eingegeben.
Code:
Private Sub Form_Timer()
    If Format(Time, "hh:nn") = "23:20" Then
        DoCmd.OpenForm "NeuePrüfungEndkontrolle"
    End If
End Sub
Was muss ich bei Zeitgeberintervall eingeben?
Und was muss ich eingeben wenn ich dieses Ereignis Stündlich durführen möchte.
Code:
    If Format(Time, "hh:nn") = "23:00" And  "24:00" Then
? Danke
Gruß
Alex
Gast



Verfasst am:
16. Nov 2009, 09:10
Rufname:


AW: Form soll zur jeden vollen Stunde automatisch geöffnet w - AW: Form soll zur jeden vollen Stunde automatisch geöffnet w

Nach oben
       Version: Office 2003

Hallo,
Zitat:
Was muss ich bei Zeitgeberintervall eingeben?
Eine Minute, oder sicherheitshalber etwas weniger.

Zitat:
Und was muss ich eingeben wenn ich dieses Ereignis Stündlich durführen möchte.
UNGETESTET:
Code:
    If Format(Time, "nn") = "00" Then

Gruß Mike
wimmera
Im Profil kannst Du frei den Rang ändern


Verfasst am:
16. Nov 2009, 13:32
Rufname: Wimmsti
Wohnort: St.Johann im Pongau (Salzburg)

AW: Form soll zur jeden vollen Stunde automatisch geöffnet w - AW: Form soll zur jeden vollen Stunde automatisch geöffnet w

Nach oben
       Version: Office 2003

Hallo Mike,

Ich habes mal so versucht und es funktioniert auch.
Code:
    'Stündlicher Schichtcheck Endkontrolle "Frühschicht"
    If Format(Time, "hh:nn") = "06:00" Then
        DoCmd.OpenForm "NeuePrüfungEndkontrolle"
    End If
    If Format(Time, "hh:nn") = "07:00" Then
        DoCmd.OpenForm "NeuePrüfungEndkontrolle"
    End If
    If Format(Time, "hh:nn") = "08:00" Then
        DoCmd.OpenForm "NeuePrüfungEndkontrolle"
    End If
    If Format(Time, "hh:nn") = "09:00" Then
        DoCmd.OpenForm "NeuePrüfungEndkontrolle"
    End If
    'usw. :D
Aber ich glaube, dass ich Deinen Vorschlag verwenden werde.

Danke für Deine Unterstützung
Lg
Alex
Willi Wipp
Moderator


Verfasst am:
18. Nov 2009, 06:19
Rufname:
Wohnort: Raum Wiesbaden

Re: Form soll zur jeden vollen Stunde automatisch geöffnet w - Re: Form soll zur jeden vollen Stunde automatisch geöffnet w

Nach oben
       Version: Office 2003

Hi wimmera,

noch 2 Anmerkungen zu Deinem Ansatz:
1. anstelle der vielen If's koenntest du auch einfach ein Select Case einsetzen.
2. Bist Du sicher das das Event auch wirklich immer genau in der Minute ausgefuehrt wird?
Ich wuerde mir die letzte Stunde merken in der die Aktion ausgefuehrt wurde
und dann pruefen ob es bereits die naechste Stunde ist!

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
wimmera
Im Profil kannst Du frei den Rang ändern


Verfasst am:
18. Nov 2009, 21:15
Rufname: Wimmsti
Wohnort: St.Johann im Pongau (Salzburg)

AW: Form soll zur jeden vollen Stunde automatisch geöffnet w - AW: Form soll zur jeden vollen Stunde automatisch geöffnet w

Nach oben
       Version: Office 2003

Hallo Willi Wipp,

Danke für Deine Anregungen,
Ich habe den Code von Mike verwendet und dieser funktioniert sehr gut.
Danke noch mal Very Happy
Zitat:
2. Bist Du sicher das das Event auch wirklich immer genau in der Minute ausgefuehrt wird?
Nein, diesbezüglich bin ich mir nicht sicher.
Es wird ein Popop Fenster geöffnet, das die Prüfung ankündigt.
Dieses muss der Prüfer bestätigen ansonnsten kommt dieser gar nicht in die Prüfmaske und er kann das Popup nur so Schließen.
In Prinzip gibt es eine Prüfanweisung die Vorschreibt das jede Stunde eine Prüfung gemacht werden muss.
Ich gehe halt davon aus, dass ich in der Schicht meine 8 Prüfungen zusammen bekomme. Andernfalls könnte es sein, dass wenn nicht pünktlich begonnen wird die Achte Prüfung in die Nachmittag schicht übergeht.

Die Letzte aktion merke ich mir mit Datum und Uhrzeit.
Wie würde der Rest funktionieren?

Gruß
Alex
Willi Wipp
Moderator


Verfasst am:
29. Nov 2009, 15:49
Rufname:
Wohnort: Raum Wiesbaden


Re: Form soll zur jeden vollen Stunde automatisch ... (II) - Re: Form soll zur jeden vollen Stunde automatisch ... (II)

Nach oben
       Version: Office 2003

Hi wimmera,

wenn Du Dir den letzten Zeitpunkt (==> Now = Jetzt = Datum und Uhrzeit) merkst,
dann ganz einfach etwa so
Code:
Private Sub Form_Timer()
    If DateDiff("h", Me.LetzterZeitpunkt, Now) > 0 Then
        '...
    End If
End Sub

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: IDENT automatisch vergeben lassen 2 ? 784 31. Aug 2006, 14:23
Gast IDENT automatisch vergeben lassen
Keine neuen Beiträge Access Tabellen & Abfragen: Neue Tabellen aus anderem Tabellen erstellen automatisch 13 Elton#62 1001 28. Aug 2006, 13:01
Nouba Neue Tabellen aus anderem Tabellen erstellen automatisch
Keine neuen Beiträge Access Tabellen & Abfragen: Spalten automatisch erstellen lassen 1 Premium 899 04. Jul 2006, 19:21
rita2008 Spalten automatisch erstellen lassen
Keine neuen Beiträge Access Tabellen & Abfragen: Problem mit Abfrage 4 Maximiliane 675 03. Apr 2006, 10:09
Maximiliane Problem mit Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Access rundet automatisch auf! 2 RazielX 4049 23. März 2006, 11:09
RazielX Access rundet automatisch auf!
Keine neuen Beiträge Access Tabellen & Abfragen: Datum automatisch einfügen 5 UPPsycho 898 09. März 2006, 20:58
jens05 Datum automatisch einfügen
Keine neuen Beiträge Access Tabellen & Abfragen: Felder automatisch ausfüllen 5 NVG 884 13. Sep 2005, 20:05
stpimi Felder automatisch ausfüllen
Keine neuen Beiträge Access Tabellen & Abfragen: Eurowert automatisch zu DM-Wert in anderer Zelle umrechnen 4 Peter2 3109 08. Sep 2005, 16:34
Peter2 Eurowert automatisch zu DM-Wert in anderer Zelle umrechnen
Keine neuen Beiträge Access Tabellen & Abfragen: Listenfeld, automatisch erster Datensatz markieren 1 Gast 2958 21. Jun 2005, 11:54
rita2008 Listenfeld, automatisch erster Datensatz markieren
Keine neuen Beiträge Access Tabellen & Abfragen: Datensatz automatisch kopieren??? 0 Edelschnitt 701 11. Mai 2005, 19:41
Edelschnitt Datensatz automatisch kopieren???
Keine neuen Beiträge Access Tabellen & Abfragen: Automatisch nächste freie Nummer aus einem Nummerkreis? 4 derBovie 3325 08. Mai 2005, 20:03
'n Access User Automatisch nächste freie Nummer aus einem Nummerkreis?
Keine neuen Beiträge Access Tabellen & Abfragen: Abfragen im Formular aufrufen, automatisch bestätigen 3 Calvin22 1606 12. Apr 2005, 12:12
Willi Wipp Abfragen im Formular aufrufen, automatisch bestätigen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML Forum