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

ShapeRange.ZOrder ohne Select

Forumthread: ShapeRange.ZOrder ohne Select

ShapeRange.ZOrder ohne Select
t4z
Hi Leute,
will meinen Quelltext vom Select befreien, da das Objekt manchmal den Focus verliert.
Kann ich folgende Quelltexte auch ohne select-statement ausführen?
' ActiveSheet.Shapes("gruppierungVonChartsUndTextboxen").Select
' Selection.ShapeRange.ZOrder msoSendToBack
UND
' ActiveSheet.ChartObjects("diag1").Activate
' ActiveChart.ChartArea.Select
' Selection.ShapeRange.ZOrder msoSendToBack
Vielen Dank und Gruß
t4z
Anzeige

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

Betreff
Benutzer
Anzeige
AW: ShapeRange.ZOrder ohne Select
05.04.2011 15:41:47
Beverly
Hi,
mal ungetestet:
ActiveSheet.Shapes("gruppierungVonChartsUndTextboxen").ShapeRange.ZOrder msoSendToBack
ActiveSheet.ChartObjects("diag1").Chart.ChartArea.ShapeRange.ZOrder msoSendToBack



Anzeige
LÖSUNG: ShapeRange.ZOrder ohne Select
05.04.2011 16:20:50
t4z
Zunächst danke für die schnelle Antwort.
Für Diagramme habe ich nun einen Lösung. Allerdings muss das '.Chart' in der Mitte weg! Also so:
ActiveSheet.ChartObjects("diag1").ShapeRange.ZOrder msoBringToFront
Für die Gruppierung habe ich auch eine Lösung. Allerdings musste hier einfach das '.ShapeRange' in der Mitte weg! Also so:
ActiveSheet.Shapes("gruppierungVonChartsUndTextboxen").ZOrder msoSendToBack
Verstehe zwar nicht warum, aber hauptsache ich habe jeweils einen Einzeiler und komme um das Select-Statement herum.
Vielen Dank und Gruß, der t4z
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige