Grafiken aktualisieren

Forumthread: Grafiken aktualisieren

13.11.2003 20:19:55

Steffen

guten abend
ich habe viele Grafiken die hintereinander liegen.
Jede wird durch einen Menüpunkt in den Fordergrund geholt und
die anderen verschwinden wieder dahinter.

Schön und gut soweit.. aber beim Arbeitsblatt laden, Ansicht wechsln und
wechseln des Menüpunktes werden alle Grafiken einmal kurz angezeigt
und erst dann erscheint die richtige.

Code:
************
ActiveSheet.Shapes("Bild1").ZOrder msoBringToFront
************

Weiß jemand Rat?`?

mfg steffen

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Grafiken aktualisieren

14.11.2003 14:52:00

Karl-Otto Reimann

AW: Grafiken aktualisieren

14.11.2003 14:52:00

Karl-Otto Reimann

Hallo Steffen
Wie wär's hiermit:


Private Sub Workbook_Open()
Sheets("Tabelle1").Shapes("Bild1").ZOrder msoBringToFront
End Sub

oder:


Private Sub Worksheet_Change(ByVal Target As Range)
Shapes("Bild1").ZOrder msoBringToFront
End Sub

Gruß KO

Forumthread: Grafiken aktualisieren

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread