Opgelost Cellen kleuren bij selectie van een cel binnen een gebied

[trainers]

Zie topic https://www.helpmij.nl/forum/threads/cel-kleuren-bij-selectie-van-andere-cel.952058/

Werkt perfect Edmoor.

Mijn vraag:
Is het mogelijk dat als je in kolom B (omschrijving) een cel selecteert deze cel en de corresponderende cellen op die regel (waar bedragen in staan) en van die betreffende kolommen de cellen in rij 2 worden gekleurd.
Klik je buiten het gebied (kolom B) een cel aan dan worden alle cellen weer zonder kleuren.

Toelichting:
Als penningmeester moet ik straks de kascommissie wegwijs maken in de administratie van onze vereniging. Het lijkt mij makkelijk dat als ik de cel met de omschrijving aanklik zij direct zien waar er geboekt is.

In bijgaand bestandje heb ik e.e.a. aangegeven.

Groet,
Trainers

 

[emields]

bedoel je zoiets?
ps om kleurboeken te maken bestaan er betere programma's

 

[HSV]

Is dit wat je voor ogen hebt?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("B3:M20")) Is Nothing Then
        Range("A3:A20,B2:M2").Interior.Color = xlNone
          Cells(Target.Row, 1).Interior.Color = 49407
          Cells(2, Target.Column).Interior.Color = 49407
    Else
      Range("A3:A20,B2:M2").Interior.Color = xlNone
    End If
End Sub

 

[trainers]

Super. Beiden bedankt, hier kan ik mee verder.
@emields: ik weet dat er andere en betere programma's zijn om kleurboeken te maken.

Groet,
Trainers