collapse

* Benutzer Info

 
 
Willkommen Gast. Bitte einloggen oder registrieren. Haben Sie Ihre Aktivierungs E-Mail übersehen?

* Wer ist Online

  • Punkt Gäste: 85
  • Punkt Versteckte: 1
  • Punkt Mitglieder: 2
  • Punkt Benutzer Online:

* Forenstatistik

  • stats Mitglieder insgesamt: 14129
  • stats Beiträge insgesamt: 68318
  • stats Themen insgesamt: 9202
  • stats Kategorien insgesamt: 5
  • stats Boards insgesamt: 17
  • stats Am meisten online: 415

Autor Thema: Formular unter bestimmten Bedingungen öffnen  (Gelesen 335 mal)

Offline Hell-Nano

  • Newbie
  • Beiträge: 2
Formular unter bestimmten Bedingungen öffnen
« am: August 05, 2018, 14:39:16 »
Hallo liebe Access Profis,

ich habe ein kleines Problem mit einer Datenbank das ich leider nicht alleine gelöst bekomme aber ich denke ihr könnt mir helfen.
Also kurz zu der Datenbank:
Es handelt sich um einen Schichtplan in dem für jeden Tag der Einsatzort der Mitarbeiter eingetragen wird. Gearbeitet wird im Kontischicht betrieb somit gibt es auch Tage an denen aufgrund eines freien Tages kein Dienstplan existiert.
Was ich bisher geschafft habe ist, dass wenn ich das Formular öffne wird mir der Datensatz mit dem Aktuellen Datum angezeigt.
Was ich möchte:
Wenn ich das Formular öffne und unter dem Datum an dem ich es öffne ist ein Schichtplan vorhanden ist soll mir der Tagesaktuelle angezeigt werden.
Öffne ich das Formular aber an einem Freien Tag für den kein Dienstplan existiert soll mir der Datensatz für das nächste Datum für das ein Datensatz existiert angezeigt werden.
 
Ich hoffe ich konnte mein Anliegen verständlich rüberbringen und ihr könnt mir irgendwie helfen.

Ps.: aktuell verwende ich folgenden Code zum Sortieren
Private Sub Form_Open(Cancel As Integer)
    Me.Recordset.FindFirst "[DAtum] = Date()"
End Sub

 
« Letzte Änderung: August 05, 2018, 14:51:21 von MzKlMu »
 

Offline MzKlMu

  • Moderator
  • Access-Oberguru
  • *****
  • Beiträge: 7495
Re: Formular unter bestimmten Bedingungen öffnen
« Antwort #1 am: August 05, 2018, 14:51:01 »
Hallo,
Zitat
aktuell verwende ich folgenden Code zum Sortieren
Zum Sortieren ?
Mit dem gezeigten Code wird nix sortiert, da wird ein Datensatz gesucht, sonst nix.
Zeige mal ein Bild des Beziehungsfensters.

PS:
Bitte verwende für Codedarstellungen die Codetags. Habe ich in Deinem Beitrag nachträglich gemacht.
Gruß
Klaus
 

Offline PhilS

  • Global Moderator
  • Access-Profi
  • *****
  • Beiträge: 387
    • Tipps zu Access, VBA, SQL und Co.
Re: Formular unter bestimmten Bedingungen öffnen
« Antwort #2 am: August 05, 2018, 14:55:54 »
Ich würde mit DMin das kleinste Datum größer gleich heute ermitteln und damit zu dem Datensatz gehen.
Etwa so:
Private Sub Form_Open(Cancel As Integer)
    Dim schichtplanDatum As Date
    schichtplanDatum = DMin("[Datum]","deineTabelle","[Datum] >= Date()")
    Me.Recordset.FindFirst "[Datum] = #" &  Format(schichtplanDatum , "yyyy-mm-dd") & "#"
End Sub
Neues Access 2019 Feature angekündigt: Modern Charts
 
Folgende Mitglieder bedankten sich: Hell-Nano

Offline Hell-Nano

  • Newbie
  • Beiträge: 2
Re: Formular unter bestimmten Bedingungen öffnen
« Antwort #3 am: August 05, 2018, 15:06:04 »
Danke, das ist genau das was ich haben wollte.

Vielen dank dafür!
 

 

Formular immer im Vordergrund?

Begonnen von BjoernBBoard Formular

Antworten: 2
Aufrufe: 6715
Letzter Beitrag Mai 02, 2011, 10:36:16
von Ble
Bilder im Access Formular

Begonnen von melisyBoard Formular

Antworten: 3
Aufrufe: 3709
Letzter Beitrag Juni 08, 2010, 09:14:37
von DF6GL
Bezüge von Bildern im Formular

Begonnen von TrüffelBoard Formular

Antworten: 5
Aufrufe: 3862
Letzter Beitrag Juni 08, 2010, 09:13:20
von DF6GL
Formular schließt zu langsam

Begonnen von Florian-BGLBoard Access Programmierung

Antworten: 9
Aufrufe: 9239
Letzter Beitrag Mai 19, 2010, 15:51:27
von Florian-BGL
Formular mit 2 Ufo

Begonnen von rbaltermiBoard Formular

Antworten: 14
Aufrufe: 8842
Letzter Beitrag Mai 31, 2010, 21:37:13
von database