mit folgendem Makro wird die Spalte A bis zur letzten Zelle mit vorhandenem Wert markiert.
Ich möchte jedoch eine Markierung erst ab A2 bis zum ende bekommen. Wo müßte ich hier bitte am Code etwas ändern?
Danke
Josef
Sub Makro1()
Range("A2:A" & Cells(Rows.Count, 1).End(xlUp).Row).Select
With Selection.Interior
.ColorIndex = 19
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
End Sub
Sub Makro1()
With Range(Cells(2, 1), Cells(65536, 1).End(xlUp)).Interior
.ColorIndex = 19
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen