Hallo,
Ich möchte eine Textbox mit variablem Namen löschen, den Namen habe ich vorher schon gespeichert.
Versucht habe ich es bis jetzt so:

If ActiveSheet.Shapes.TextBox.Name = Code Then
ActiveSheet.Shapes(Code).Select
Selection.Delete
End If

wobei code eine Variable ist, die vorher ausgelesen wurde.
Mein Problem ist dass er die Variable nicht als Name annimmt.

Habe eine Textfeld in das ich den Objektnamen eigegeben habe und einen Button der das Makro dann ausführt.

So hat es bei mir funktioniert:

Code vb:

1 2 3 4

Private Sub CommandButton1_Click()   Code = TextBox1.Text   ActiveSheet.Shapes(Code).Delete End Sub

Vielen Dank für die schnelle Antwort!

Mein Problem is, dass ich mehrere textboxen habe und nur die Eine löschen will, deren Name gleich der Variablen ist. Ich kenne den Text der Textbox nicht und der Name ist die Variable, deshalb kann ich sie nicht mit Textbox1 ansprechen.

Zitat von Be19

Vielen Dank für die schnelle Antwort!

Mein Problem is, dass ich mehrere textboxen habe und nur die Eine löschen will, deren Name gleich der Variablen ist. Ich kenne den Text der Textbox nicht und der Name ist die Variable, deshalb kann ich sie nicht mit Textbox1 ansprechen.

Du musst auch nicht den Text/den Inhalt der Textbx kennen. Ich habe in meinem Beispiel lediglich eine Textbox genommen um die Variable "Code" damit zu befüllen.
Woher bei dir die Variable Code ihren Wert bezieht weiß ich nicht und es spielt auch keine Rolle. Entscheidend für dich ist diese Zeile in meinen Beispiel:

Code vb:

1	ActiveSheet.Shapes(Code).Delete

Damit wird das Element gelöscht welches den Namen hat der von der Variable Code übergeben wird.

Vielen Dank! Es hat funktioniert *freu*