Neuigkeiten:

Ist euer Problem gelöst, dann bitte den Knopf "Thema gelöst" drücken!

Mobiles Hauptmenü

hintergrundfarbe im Endlosformular

Begonnen von tismo, März 29, 2019, 19:08:49

⏪ vorheriges - nächstes ⏩

tismo

Hallo zusammen,

ich habe ein Endlosformular in dem der Hintergrund der einzelnen Datensätze je nach Wert weiß angezeigt werden sollen
Dazu wir beim Klicken auf den Butten 'bestätigt' im Datum faktuiert das aktuelle Fatum geschrieben und  im Steuerelement Farbe der Wert '0' eingegeben.
- klappt -

Außerdem habe ich als Hintergrund eine ausgefüllte weiße Fläche (Hintergrund) auf nicht sichtbar gestellt. Beim Klicken auf den Button soll diese nun sichtbar werden und diesen Datensatz im Hintergrund weiß markieren.
- klappt nicht, es werden alle Datensätze im Endlosformular weiß markiert.

Private Sub bestätigt_Click()

Me!Datumfakturiert = Date
Me!Farbe = "0"
Me.Hintergrund.Visible = True

End Sub


Außerdem sollen beim Öffnen des Formulars alle Datensätze deren Wert im Steuerelement Farbe '0' ist auch weiß markiert werden.
- klappt auch nicht, garnix passiert

Private Sub Form_Open(Cancel As Integer)

If IsNull(Me!Farbe) Then
Me.Hintergrund.Visible = True

Else
Me.Hintergrund.Visible = False

End If

End Sub


Kann mir jemand bei den 2 Problemen helfen ?

MzKlMu

Hallo,
in einem Endlosformular kann man Farbzuweisungen nur mit der bedingten Formatierung machen. Direkt mit VBA Code wie Du das machen willst geht das nicht.
Gruß Klaus

tismo

wie sieht so eine bedingte Formatierung aus ?

MzKlMu

Hallo,
die bedingte Formatierung ist direkt ein Mernüpunkt bei Format.
Gruß Klaus

tismo