Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1136to1140
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
Inhaltsverzeichnis

Shape und ShapeRange

Shape und ShapeRange
m_troja
Hallo,
ich habe noch Probleme mit dem Unterschied von Shape und ShapeRange. Konkret will ich ein ausgewähltes Objekt bearbeiten.
1. Frage: Wie kann ich den Typ der Auswahl feststellen (Zellenbereich oder Objekt?). Selection.Type gibt es offensichtlich nicht.
2. Frage: Ein FreeForm-Objekt ist ausgewählt. Im VBA-Text kann ich auf dieses wie folgt zugreifen (wenn ich weiss, dass es sich um ein Objekt handelt): Selection.ShapeRange
Um jetzt aber die Placement-Eigenschaft zu ändern, brauche ich das zugehörige (?), übergeordnete (?) Shape-Objekt. Das krieg ich aber nicht hin.
Ich gebe zu, dass ich die Konzeption von Shape und ShapeRange nicht verstanden habe, kann mir trotzdem jemand helfen?
Danke

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
Shape ist DAS Objekt, ShapeRange die...
14.02.2010 16:57:09
Luc:-?
...objektbildende Eigenschaft, der etliche andere Eigenschaften nachgeordnet sind, Trojaner;
Ad 1: Es gibt schon einen Unterschied — mit ActiveWindow.RangeSelection erwischst du immer einen Bereich (Zellen), sonst alles, was irgendwie ausgewählt wurde...
Ad 2: Versuch's mal mit .Parent! Das geht immer eine Ebene höher...
Gruß Luc :-?
AW: Shape ist DAS Objekt, ShapeRange die...
14.02.2010 17:01:49
m_troja
.parent funktioniert nicht, hatte ich schon ausprobiert.
AW: Shape und ShapeRange
14.02.2010 17:47:02
ransi
HAllo m_Troja
1. Frage: ...Selection.Type gibt es offensichtlich nicht...
Stimmt !!
Aber es gibt: Typename(Selection)
Dim B As Object
Set B = Selection
MsgBox TypeName(B)

Eine Abfrage auf "Range" müsste dich weiterbringen.
ransi
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige