Josef Ehrensberger & Ute ....Buttons löschen - 2

Bild

Betrifft: Josef Ehrensberger & Ute ....Buttons löschen - 2
von: Jonny
Geschrieben am: 14.02.2005 15:05:45
Ich bekomme immer wieder ein Fehler in dieser Zeile:
If shp.FormControlType = 0 Then
Leider weiss ich nicht wie ich damit umgehen muss?!
Danke


Sub loescheButton(spalte As Integer)
Dim shp As Shape
   For Each shp In ActiveSheet.Shapes
      If shp.FormControlType = 0 Then
         If shp.TopLeftCell.Column = spalte Then shp.Delete
      End If
   Next
End Sub


Sub test()
loescheButton 20  'Spalte in der sich die zu löschenden Buttons befinden
End Sub

Bild

Betrifft: AW: Josef Ehrensberger & Ute ....Buttons löschen - 2
von: Ute
Geschrieben am: 14.02.2005 15:08:56
Was soll man sagen? Der Code funktioniert einwandfrei!
Ute
Bild

Betrifft: AW: Josef Ehrensberger & Ute ....Buttons löschen
von: Jonny
Geschrieben am: 14.02.2005 15:14:20
!?!?!?!?!?
und warum dann nicht bei mir!?
Schicksal!? ;o))
Bild

Betrifft: AW: Josef Ehrensberger & Ute ....Buttons löschen
von: Ute
Geschrieben am: 14.02.2005 15:17:42
Da der Ausdruck FormControlType ein Element der Excelbibliothek, kann es nicht an einem
fehlenden Verweis liegen, ggf. hat dein Excel eine Macke, mal deinstallieren und
neu aufziehen.
Ute
Bild

Betrifft: AW: Josef Ehrensberger & Ute ....Buttons löschen - 2
von: Ute
Geschrieben am: 14.02.2005 15:13:27
Warum du immer einen neuen thread eröffnest, ist nicht klar.
Ute
Bild

Betrifft: AW: Josef Ehrensberger & Ute ....Buttons löschen
von: Jonny
Geschrieben am: 14.02.2005 15:19:29
thread = ?!
Bild

Betrifft: AW: Josef Ehrensberger & Ute ....Buttons löschen
von: Ute
Geschrieben am: 14.02.2005 15:22:38
thread = neuer Beitrag/neue Frage
Ute
Bild

Betrifft: AW: Josef Ehrensberger & Ute ....Buttons löschen
von: Jonny
Geschrieben am: 14.02.2005 16:10:52
Danke....für eure Mühen...
 Bild

Beiträge aus den Excel-Beispielen zum Thema "eingebettete Objekte"