Hallo liebes Forum,

Code hat nichts zu sagen...

Sub Formen()
With Worksheets("Geo")


If .Shapes("Rechteck: 1").Visible = False Then

Kennt sich hier jemand mit dem Befehl .visible aus?

Meine Tabelle hat verschiedene Formen und ich möchte Rechteck: 1 immer sichtbar machen (true), sobald der Sub-Code einmal durchlaufen ist. 

Sobald der Sub erneut durchlaufen wird, soll Rechteck: 2 aktiviert/sichtbar werden und immer so weiter. 
Wenn kein Rechteck mehr vorhanden ist, soll der Code einfach ohne weiter gehen.

Ist das im Bereich des Machbaren?

Vielen Dank für jeden Tipp

Yogi