Textfelder

Forumthread: Textfelder
5 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Textfelder

Textfelder

13.05.2008 10:04:00

Peter

Guten Tag
Ich arbeite im Moment in einer Tabelle, die von meinem Vorgänger her unzählige leere Textfelder enthält. Klickt man auf eine Zelle, erscheint ein leeres Textfeld, und dies fast bei jeder Zelle. Wie kann man alle leeren Textfelder anzeigen oder sie sogar löschen. Gruss und Dank

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Textfelder

13.05.2008 10:15:00

Beverly
AW: Textfelder

13.05.2008 11:45:06

Peter
AW: Textfelder

13.05.2008 11:48:00

Beverly
AW: Textfelder

13.05.2008 12:29:00

Peter
AW: Textfelder

13.05.2008 23:16:03

Beverly

AW: Textfelder

13.05.2008 10:15:00

Beverly

Hi Peter,
ich nehme an, es sind Kommentarfelder. Mit diesem Code kannst du sie alle löschen


Sub loeschen()
ActiveSheet.Cells.ClearComments
End Sub

AW: Textfelder

13.05.2008 11:45:06

Peter

Nein, es sind keine Kommentarfelder, es sind Textfelder. Gruss pm

AW: Textfelder

13.05.2008 11:48:00

Beverly

Hi Peter,
sind es Textfelder aus der Zeichnen-Symbolleiste oder der Steuerelement-Toolbox? Sind auch noch andere Elemente in der Tabelle vorhanden?

AW: Textfelder

13.05.2008 12:29:00

Peter

Hallo, Es sind Textfelder aus der Zeichnen-Symbolleiste. bis später
Peter

AW: Textfelder

13.05.2008 23:16:03

Beverly

Hi Peter,


Sub textboxen_löschen()
Dim shElemente As Shape
For Each shElemente In ActiveSheet.Shapes
If shElemente.Type = 17 Then shElemente.Delete
Next shElemente
End Sub