Hallo Experten,
habe mit Eurer Hilfe folgendes erstellt.
Dim rng as Range
Sheets("Blatt2").Select
For Each rng in Range("AC4:AC48")
If rng =3 and rng.Offset(0,5)=1 Then rng = 2
Ich möchte es so erweitern, dass die Aktion auch im Blatt3, Blatt 4 usw. ausgeführt wird.
Alles soll von Blatt1 ausgeführt werden.
Danke
Thomas