Office 2016 Bei Doppelklick Farbänderung in bestimmten Zeilen

[si-ri]

Liebe Forums-User,
ich habe eine Frage bezügl Excel und VBA, mit der ich nicht weiterkomme.
Ich habe eine Tabelle erstellt, die in Spalte B verschiedene Medienkanäle beinhaltet, z.B. Blog, Internet etc.
Ich hätte gerne, dass die Zeile des jeweiligen Kanals (z.B. Blog) auf Doppelklick hin die Farbe ändert.
Beispiel:
Zelle B2 = Blog --> Alle Zellen in Zeile 2 sollen auf Doppelklick hin rot werden.
Zelle B3 = Internet --> Alle Zellen in Zeile 3 sollen auf Doppelklick hin blau werden.

Ich habe mich in VBA eingearbeitet, aber ich bekomme das alleine nicht hin. Könnt ihr mir helfen?
Viele Grüße
Si-ri

[StefKe]

Hallo si-ri, meinst Du so....

Code: [Auswählen]

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim lngZeile As Long
Dim wks As Worksheet
Set wks = Worksheets(1)
lngZeile = Target.Row
wks.Rows(lngZeile).Interior.Color = 10092543
End Sub
mit einer if-Abfrage kannst Du die Farben je Zeile anpassen.