title image


Smiley Re: Für Cracks? Habe ein Problem gelöst, komme jetzt aber nicht weiter...
Hallo!

So sollte es gehen:



Private Sub Worksheet_Change(ByVal Target As Range)

Target.Interior.ColorIndex = 37

On Error Resume Next

Target.Dependents.Interior.ColorIndex = 37

On Error GoTo 0



End Sub





Schöne Grüße

Norbert

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: