Beste helper,
Ik wil graag een bepaalde tekst weergeven als de interior color rood is. daar gebruik ik volgende code voor die niet werkt maar ik zie niet waarom. Heeft iemand een tip voor mij.
Bij voorbaat dank
Ik wil graag een bepaalde tekst weergeven als de interior color rood is. daar gebruik ik volgende code voor die niet werkt maar ik zie niet waarom. Heeft iemand een tip voor mij.
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim bb As Range
For Each bb In Range("B4:O34")
If bb.Interior.Color = vbRed Then
bb.Text = "Martin"
bb.EntireColumn.AutoFit
End If
Next
End Sub