Office: (Office 2016) uneinheitliches Speichern

Guten Tag, mit der nachfolgenden Anwendung schalte ich 10 Schaltflächen (txtbox1 - 10), die je nach Schaltung den Text und die Farbe ändern und wie eine Anwesenheitsliste das Kommen und gehen der Leute festhalten soll.

PHP:

         Private Sub txtbox1_Click()
Dim db As DAO.Database
Dim DG As Recordset
abwesend = RGB(124, 252, 0)
anwesend = RGB(255, 127, 80)


Set DG = CurrentDb.OpenRecordset("Anwesend", dbOpenDynaset, dbSeeChanges)

If Me.txtBox1.Caption = "Box 1 abwesend" Then
Me.txtBox1.BackColor = anwesend
Me.txtBox1.Caption = "Box 1 anwesend"
With DG
.AddNew
!boxnummer = 1
!gekommen = Now()
!Gast = Me.TXTGast
.Update
End With
DG.Close
Me.Refresh

ElseIf Me.txtBox1.Caption = "Box 1 anwesend" Then
Me.txtBox1.Caption = "Box 1 abwesend"
Me.txtBox1.BackColor = abwesend

With DG
.AddNew
!boxnummer = 1
!gegangen = Now()
!Gast = Me.TXTGast


.Update

End With
DG.Close
End If

End Sub


:)

 

Code:

Wieso sollen diese Formulareigenschafts-Zuweisungen nach Schließung des Formulars künftig nach jeder Öffnung des Formulars Bestand haben?

Eine etwa beteiligte Tabelle lässt sich davon nicht beeindrucken, höchstens von einer Daten-Änderung.

 

Hallo,

zum allgemeinen Verständnis, solltest du korrekterweise von Labels sprechen und nicht von Textboxen. Der übliche Präfix für eine Label ist lbl und nicht txt.
Labels und Textboxen haben unterschiedliche Eigenschaften und Verhalten. Das sollte man nicht durcheinander bringen.

Was deine eigentliche Frage betrifft, sehe ich, wie du fortlaufend Status-Änderungen in die DB protokollierst, aber ich sehe jetzt nicht, wie du den Anfangsstatus der Anzeige mit den DB Daten synchronisierst.

 

Maxel Sinn des Formulars ist es, in die Tabelle "Anwesend" neue Daten zu schreiben (ADDNEW). Diese Datensätze halten die Uhrzeitfest, zu der die entsprechende Person "gekommen" bzw. "gegangen" ist. Daher vervollständige ich die Tabelle mit jedem Klick. Diese Frage bringt mich aber in meiner Frage nicht weiter. Die Daten werden korrekt eingetragen, Der Farbwechsel soll zeigen, wer noch da ist bzw. wer nicht anwesend ist und dass, auf eine Entfernung die das Lesen nicht ermöglicht.


knobbi38 ich würde dir deine Frage gern beantworten aber wo finde ich diese Information?

Warum "merkt" sich ACCESS bei einigen Labels die Farbeinstellungen und gibt diese beim öffnen des Formulars wieder und bei einigen nicht?

Martin

 

Captions werden nur gespeichert, wenn Du sie im Formularentwurf zuweist und diesen Entwurf speicherst.

 

Hallo Martin,

wie Maxel schon gesagt hat, merkt sich Access das nicht, sondern das ist eine Funktionalität, welche du selber programmieren mußt. Darauf ziehlte auch meine Frage ab, wie du beim Öffnen des Formulars mit den Daten aus der Tabelle "Anwesend" (was ja eigentlich ein irreführender Tabellenname ist), die Einstellungen der Labels abgleichst (synchronisierst).

Ulrich

 

Man könnte mit der Bedingten Formatierung (Hintergrundfarbe) arbeiten, wenn man auf die Beschriftung verzichtet:

gekommen>gegangen => rot
gegangen>gekommen => grün