Selectie active rij arceren in werkblad

[harolda1980]

Ik zou een graag als je een cel selecteert de regel willen arceren. Als hij van een andere regel af komt moet hij die regen weer standaard wit maken. Dit om beter te zien waar je aan het werk bent!

Wie heeft hier een idee voor?

 

[Mark xl]

Dat doe je zo

Arceren zou ik niet doen, want dan kan je je text niet meer lezen
als je deze macro in de programmacode van een werkblad plakt, wordt de regel waar je aan het werk bent geel gemarkeerd
(na het wijzigen van een cel)
het maak wel de rest van je werkblad kleurloos, dus het is niet geschikt om te gebruiken op werkbladen met mooie opmaak.
test het eerst eens met een kopie werkblad

Private Sub Worksheet_Change(ByVal Target As Range)
    'gebruik op eigen risico! (je kan je kleuropmaak in de war gooien)
    Cells.Interior.ColorIndex = xlNone
    With Target.Cells(1, 1)
        .EntireRow.Interior.ColorIndex = 6
    End With
End Sub

 

[Warme bakkertje]

In bijlage op elk werkblad een verschillende methode om de actieve cell te accentueren.