Textfelder lsöchen
René
bei diesem Makro hat mir Beverly (Karin) schon geholfen.
Kann man den Code noch so anpassen das auch Textfelder mit gelöscht werden?
Bekomme es alleine nicht hin.
MfG René
If (shShape.Type = msoPicture Or shShape.Type = msoAutoShape) And _
shShape.Top > Range("C4").Top And shShape.Top shShape.Delete
Ich vewende die normaln Textfelder aus der Symbolleiste "Einfügen".
MfG René