Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Textfeld mit Zeile löschen

Forumthread: Textfeld mit Zeile löschen

Textfeld mit Zeile löschen
13.09.2006 11:57:57
volker
Hai Excels,
ich lösche bestimmte Zeilen mittels makro. Manchmal sitzt in so einer Zeile noch ein Textfeld. Dieses wird momentan leider nicht gelöscht.
Wie bekomm ich es hin?
Danke Gruss volker
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textfeld mit Zeile löschen
13.09.2006 12:10:56
Josef
Hallo Volker!
Z.B. so.
Sub TextfeldWeg()
Dim objShp As Object
Dim lngR As Long

lngR = 15 'Zu löschende Zeile nur als Beispiel

For Each objShp In ActiveSheet.OLEObjects
  If TypeName(objShp.Object) = "TextBox" Then
    If objShp.TopLeftCell.Row = lngR Then objShp.Delete: Exit For
  End If
Next

End Sub


Gruß Sepp

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige