Lettertype verandert na nieuwe invoer

[rikkie52]

Ik heb deze vraag niet op het forum kunnen vinden vandaar nu de vraag:

ik voer een aantal gegevens in (lettertype arial 10 zwart) en aan de hand van die gegevens worden er in een aantal andere cellen waardes "getrend". Deze verschijnen dan bv.in het grijs. Als ik nu deze cellen overschrijf met actuele gegevens dan wil ik deze automatisch in arial 10 zwart zien, conform de eerder ingevoerde gegevens.
Is hier een oplossing voor (vast wel )

Groet
Erik

 

[WimenBeer]

Voorbeeldje

Erik,

zet even een klein voorbeeld op het forum

Wim

 

[rikkie52]

Komtie Wim

 

[Joske2000]

Plak volgende code achter Blad1

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("C2:C6")) Is Nothing Then
             With Target.Font
            .FontStyle = "Standaard"
            .ColorIndex = xlAutomatic
    End With
    End If
End Sub

Joske

 

[WimenBeer]

Joske,

En nu nog edenk ik voor alle kolommen in de sheet.
Deze is te beperkt voor allee kolom C.

Ook ik zie je oplossing graag

Wim

 

[rikkie52]

Gelukt, bedankt voor de reacties

Erik

 

[Joske2000]

Joske,

En nu nog edenk ik voor alle kolommen in de sheet.
Deze is te beperkt voor allee kolom C.

Ook ik zie je oplossing graag

Wim

Range aanpassen aan C2:G6

Joske

 

[WimenBeer]

Joske,

Dacht ik al

Wim