Hallo.
Hab da einen kleinen hänger. Wer kann mir helfen?
1 Blatt mit Namen Tabelle1
Auf jedem Blatt ein Button mit dem Namen CommandButton1.
Wenn ich auf Tabelle1 den Button anklicke, möchte ich daß die Tabelle1 kopiert wird.
Name: Tabelle2. Der Button auf Tabelle2 soll aber unsichtbar gemacht werden.
Kopieren klappt, aber wenn ich den Button unsichtbar machen will. Wird der Button von Tabelle1 unsichtbar.
Trotz SELECT?
Wo ist der Fehler?
Mein Code:
Tabelle1:
Sheets("Tabelle1").Select
Sheets("Tabelle1").Copy Before:=Sheets(2)
Sheets("Tabelle1 (2)").Select
Sheets("Tabelle1 (2)").name = "Tabelle2"
Sheets("Tabelle2").Select
Worksheets("Tabelle2").Activate 'zusätzlich noch eingefügt
CommandButton1.Visible = False ' Button von Tabelle1 wird unsichtbar (statt von Tabelle2)
Gruß
Simone