Hallo ich bin neu und habe ewig nicht mehr mit Access gearbeitet.
Problem: Chef gibt mir Tabelle1 = Öffnungszeiten, darin enthalten Datum, VonOffen, BisOffen, berechnetes Feld Wochentag, berechnetes Feld Monat. Wochentage und Monate hole ich aus separaten Tabellen, berechnetes
Feld StartAktion, (anhand von VonOffen ), EndeAktion ( anhand von BisOffen ) beide Werte variieren täglich
und das funktioniert wie es soll.
Per GoogleForms bekomme ich eine 2. Tabelle von den Kollegen. Darin gibt es für jeden Wochentag eine Spalte
mit z.B. Montag von, Montag bis Uhrzeit, gefolgt von einer undefinierten Anzahl an Spalten, wo jeder Kollege aus einer Abfrage ein Datum erzeugt, an dem er nicht arbeiten kann. Bei einigen sind es 5 Tage, bei anderen 17. Ich hab die Tabelle mühseelig umgebaut, das alle Daten untereinander stehen, das ist zeitaufwendig. Uhrzeiten sind nur an den Wochentagen eingetragen an denen der Kollege normalerweise kann.
In Access habe ich ein Hafo angelegt mit der qry der Öffnungszeiten, habe für jeden Tag jetzt den korrekten Datensatz und möchte jetzt auf einem Ufo zeigen, welche Kollegen an welchem Tag zu Verfügung stehen. Ich habe die Tabelle2 aus GoogleForms getrennt, Tabelle A hat 17 Datensätze, pro Kollegen 1 wo in Spalten Mo von, Mo bis, Di von Di bis, die Zeiten für die Woche drinstehen. In Tabelle B habe ich Für jeden Kollegen 30 Datensätze ( November30 Tage ) angelegt wo für jeden Tag an dem er arbeitet ein Datum drin stehts, sonst ist die Spalte Datum leer.
Für jeden Wochentag habe ich ein qry angelegt aus Tabelle A + B, wo ich überprüfe ob bei dem Wochentag z.B. MoVon ein Wert eingetragen ist und und wenn ich dann bei Datum aus Tabelle B ein Datum als Kriterium eintrage, dann kann ich sehen wer am Samstag, den 14.11.2020 arbeiten kann. Aus den qry für jeden Wochentag habe ich ufoMontag, ufoDienstag... gemacht, das ganze per auf das Hafo gebracht und mit dem Datum verbunden.
Klicke ich jetzt durch die Datensätze des Hafo bekomme ich im Textfeld "Wochentag" korrekt die Tage angezeigt und möchte, wenn dort z.B. Sonntag erscheint, das ufoSonntag auf das Unterformularfeld holen.
(Mit Button geht es: Me!Untergeordnet106.SourceObject = "ufoSonntag") allerdings nicht mit eben dem Textfeld als Ereignisprodzedur on Change.
Viel lieber wäre mir aber eine Lösung per VBA. Ich importiere die Daten vom Chef in Tabelle Öffnungszeiten, Ich importiere die Daten von GoogleForms der Kollegen in eine einzige Tabelle "Wunschzeiten" und arbeite mit einem DLookup - aber da verlässt es mich. Für Ideen und Hilfe bin ich euch dankbar.
Wer soll sich denn mit so einem Durcheinander beschäftigen?
Unfassbar
Hallo Max,
Leider fehlt es mir am nötigen Abstraktionsvermögen, aber vielleicht
suchst du mal "Belegungsplan mit Access". Da findest du Einiges, das
du vielleicht an dein Vorhaben anpassen kannst.
gruss ekkehard