Hallo,

ich verwende den Befehl

Code :

1	ActiveSheet.Cells(j, i).Interior.Color = RGB(255, 255, 255)

um Zellhintergründe zurückzusetzen, da sie davor eventuell andere Farben hatten. Das Problem ist, dass das Gitter gleich mit verschwindet. Wie kann ich das verhindern bzw. dananch das Gitter wieder anzeigen lassen?

Danke,

Nemesis

habs jetzt so gelöst:

Code :

1 2 3 4 5

With ActiveSheet.Range("A3:B270").Borders        .LineStyle = xlContinuous        .Weight = xlThin        .ColorIndex = 15 End With