Select vermeiden
Holger
wie kann ich in den unten stehenden Code "Select" und "ActiveCell" wegbekommen, ohne die Funktionalität zu zerstören?
With Sheets(ZA)
.Select
.Range("F13").End(xlDown).Select
With ActiveCell
Range(.Offset(0, 0), .Offset(0, 12).End(xlUp)).Interior.ColorIndex = xlNone
End With
.Protect
End With
GrußHolger