Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1196to1200
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Cursor - Zeile markieren

Cursor - Zeile markieren
Franz
Hallo zusammen,
ich benötige einen VBA-Code, der die aktuelle Zeile gelb markiert. Zusätzlich soll auch die Zeile 20 Zeilen drunter gelb markiert werden. Auf der Suche bin ich leider nicht richtig fündig geworden. Bin aber auf diesen Code gestossen, den ich aber nicht anzupassen vermag. Wer der VBA-Experten kann mir hier weiterhelfen?
Viele Grüße
Franz Kupfer
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Unprotect
Cells.Interior.ColorIndex = xlNone
With ActiveCell
Rows(.Row).Interior.ColorIndex = 6
Columns(.Column).Interior.ColorIndex = 6
End With
ActiveSheet.Protect DrawingObjects:=True, contents:=True, Scenarios:=True
End Sub

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Cursor - Zeile markieren
30.01.2011 19:11:22
Hajo_Zi
Hallo Franz,
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Unprotect
Cells.Interior.ColorIndex = xlNone
With ActiveCell
Rows(.Row).Interior.ColorIndex = 6
Rows(20).Interior.ColorIndex = 6
End With
ActiveSheet.Protect DrawingObjects:=True, contents:=True, Scenarios:=True
End Sub

AW: Cursor - Zeile markieren
30.01.2011 19:20:33
Franz
Hallo Hajo,
vielen Dank!
In diesem Code wird aber immer die Zeile 20 gefärbt. Was müsste ich ändern, wenn von der Ausgangszeile auch die 20zigste darunter gelb markiert werden soll?
Vielen Dank!
Viele Grüße
Franz Kupfer
Anzeige
AW: Cursor - Zeile markieren
30.01.2011 19:23:22
Hajo_Zi
Hallo Franz,
.row+20
Gruß Hajo
bisschen nachdenken und dadurch lernen?
30.01.2011 19:27:41
robert
statt Rows(20).Interior.ColorIndex = 6
diese Rows(.Row+20).Interior.ColorIndex = 6
Hi,
so schwer ist das aber nicht, auch bei VBA-bescheiden ;-)
gruß
robert
Danke für die Hilfe!
30.01.2011 19:34:17
Franz

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige