klettenbaer
Grünschnabel
Hallo und guten Tag
Ich habe folgendes Problem:
3 Tabellenblätter mit je 1 eingefügten Textbox
Jede Textbox hat auf dem Tabellenblatt beim einfügen den Namen Textbox1 bekommen.
Nun möchte ich über ein Modul Text hinein schreiben.
Mit
Sub Text()
For Each ws In ActiveWorkbook.Sheets
ws.Activate
TextBox1.Text = "A"
Next ws
End Sub
bekomme ich immer die Fehlermeldung "Objekt erforderlich"
Weiß jemand Rat ?
Danke im voraus
Der Klettenbär
Ich habe folgendes Problem:
3 Tabellenblätter mit je 1 eingefügten Textbox
Jede Textbox hat auf dem Tabellenblatt beim einfügen den Namen Textbox1 bekommen.
Nun möchte ich über ein Modul Text hinein schreiben.
Mit
Sub Text()
For Each ws In ActiveWorkbook.Sheets
ws.Activate
TextBox1.Text = "A"
Next ws
End Sub
bekomme ich immer die Fehlermeldung "Objekt erforderlich"
Weiß jemand Rat ?
Danke im voraus
Der Klettenbär