title image


Smiley Zellfarben austauschen Excel 2003
Hallo,



ich möchte bei einem Excel-Blatt die Farbe Blau durch Rot ersetzen: alle Zellen die vorher blau eingefärbt waren, sollen nun die rote Farbe haben.



Kann man das ohne VBA und was ist an meinem Programm falsch: (außer ColorIndex)



Sub farben()



Dim w As Range



For Each w In ActiveWorkbook.ActiveSheet

If w.Interior.ColorIndex = 5 Then

w.Interior.ColorIndex = 2

End If

Next w



End Sub



Bin für alle Hinweise dankbar



Schöne Grüße



Georg

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: