voorwaaardelijke tabkleur in access 2010

[VICES]

Welicht is de vraag an een keer gesteld, maar ik kon het in ieder gaval niet vinden

Ik wil de kleur van tabbladen in een subformulier wijzigen afhankelijk of de waarde van een bepaald veld groter is dan 0

Kan iemand mij vertellen of dat mogelijk is, en zo ja kan dat met een macro of moet het via VBA

Ik hoor het graag

Groeten

Vices

 

[OctaFish]

Je kunt met zoiets alle tabjes wel aanpassen op basis van een veld op je formulier:

Dim lngBlack As Long, lngRed As Long, lngYellow As Long, lngWhite As Long

    lngRed = RGB(255, 0, 0)
    lngBlack = RGB(0, 0, 0)
    lngYellow = RGB(255, 255, 0)
    lngWhite = RGB(255, 255, 255)
    If Me.Test.Value > 10 Then
        Me!tabTest.BorderColor = lngRed
        Me!tabTest.ForeColor = lngRed
        Me!tabTest.BackColor = lngYellow
    Else
        Me!tabTest.BorderColor = lngBlack
        Me!tabTest.ForeColor = lngBlack
        Me!tabTest.BackColor = lngWhite
    End If