Member
Beiträge: 6
| Hallo Karl, danke für die Antwort.
Das Feld MRdate im Formular färbe ich über folgende Prozedur ein(im Formular):
Private Sub colG()
Dim Ing As String
On Error Resume Next
:
MRDate.BackColor = RGB(255, 255, 255)
:
Select Case Ing
Case "MR"
MRDate.BackColor = PStatus.BackColor
Case "PS"
:
End Select
End Sub
PStatus.BAckcolor...kommt von hier..
Private Sub colS()
Dim Inp As String
On Error Resume Next
Inp = StatusP.Value
Select Case Inp
Case "G"
PStatus.BackColor = RGB(0, 255, 0) 'Green
Case "R"
PStatus.BackColor = RGB(255, 0, 0) 'Red
Case "Y"
PStatus.BackColor = RGB(255, 255, 0) 'Yellow
End Select
colG
End Sub
Im Bericht werden die Datensätze(unteschiedlich mit Farbe fstgelegt) im Detailbereich einzeln angezeigt, d.h das ganze im Bericht zu veranstalten erschließt sich mir nicht, da sich der Bericht diese Datensätze eh aus dem Formular holt.
So sieht es im Bericht im Detailbereich aus
Datensatz1: Projekt1... MRDate1(gelb)
Datensatz2: Projekt2....MRDate2(gelb)... (soll sein grün da im Formular grün versehen)
Fürchte, dass es keine Lösung gibt hier..
sg |