Anzeige
Archiv - Navigation
780to784
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
780to784
780to784
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Wo ist der Fehler?

Wo ist der Fehler?
09.07.2006 18:09:19
Sonnenpeter
Hallo,
ich möchte mit dem folgenden Makro prüfen ob bei Left 63 ein Shape vorhanden ist.

Sub ShapeAnPositionVorhandenJaNein()
Dim objShp As Shape
With ActiveSheet.Shapes
If objShp.Left = 63 Then
MsgBox "JA"
End If
End With
End Sub

Wo ist der Fehler?
Gruß Sonnenpeter

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wo ist der Fehler?
09.07.2006 18:22:00
Matthias
Hallo Peter,
ich denke mal, du willst in einer Schleife alle Shapes prüfen:

Sub ShapeAnPositionVorhandenJaNein()
Dim objShp As Shape
For Each objShp In ActiveSheet.Shapes
If objShp.Left = 63 Then MsgBox "JA"
Next objShp
End Sub

Gruß Matthias
AW: Wo ist der Fehler?
09.07.2006 18:25:01
Sonnenpeter
Hallo und DANKE Matthias!
Gruß Sonnenpeter
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige