title image


Smiley Re: Zellen Formatieren mit VBA
hiho



meinst du das?







Sub Zellenformatierung()

Dim cell As Range

For Each cell In Range("A1:C3")

   Select Case cell

      Case Is = "Bez"

      Range(cell, cell.Offset(0, 4)).Interior.ColorIndex = 3

   End Select

Next

End Sub








Feedback nicht vergessen ! Gutes gelingen wünscht Chris

I didn't write this; a very complex macro did.

0110110001101001011001010110001001100101001000000110011101110010111111001101111101100101001000000110001101101000011100100110100101110011

geschrieben von


Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: