Ik heb misschien een wat rare vraag.
Je kan bij excel bij de velden een notitie plaatsen, dan krijg je zo'n mooi rood driehoekje te zien.
Alleen heeft mijn excel-sheet in sommige rijen een rode achtergrond.
Dus de vraag is of ik de driehoekjes OF altijd zwart kan maken OF alleen zwart kan maken als de rij rood word.
P.S. er loopt al een VBA-script die de rij rood kleurt bij een bepaalde conditie, dus als iemand een mogelijke toevoeging in VBA weet dan hoor ik dat ook graag, hieronder het lopende script:
Je kan bij excel bij de velden een notitie plaatsen, dan krijg je zo'n mooi rood driehoekje te zien.
Alleen heeft mijn excel-sheet in sommige rijen een rode achtergrond.
Dus de vraag is of ik de driehoekjes OF altijd zwart kan maken OF alleen zwart kan maken als de rij rood word.
P.S. er loopt al een VBA-script die de rij rood kleurt bij een bepaalde conditie, dus als iemand een mogelijke toevoeging in VBA weet dan hoor ik dat ook graag, hieronder het lopende script:
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
' Conditional Formatting for more than 3 conditions
Dim rng As Range
Set rng = Intersect(Target, Range("C:C"))
' The L:L listed is the column which has the drop-down for the agents.
' If you change it to another column, you must modify the L:L to reflect
' the new column letter.
If rng Is Nothing Then
Exit Sub
Else
Dim cl As Range
For Each cl In rng
On Error Resume Next
' -- The line above won't change the cell's background
' -- color if the cell's value is not found in the range
' -- that we specified (rngcolors).
cl.EntireRow.Interior.ColorIndex = _
Application.WorksheetFunction.VLookup(cl.Value _
, ThisWorkbook.Sheets("Kleuren").Range("nameColors"), 2, False)
If Err.Number <> 0 Then
cl.EntireRow.Interior.ColorIndex = xlNone
End If
Next cl
End If
End Sub