Herbers Excel-Forum - das Archiv
Grafiken aktualisieren
Betrifft: Grafiken aktualisieren
von: Steffen
Geschrieben am: 13.11.2003 19:19:55
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
Betrifft: AW: Grafiken aktualisieren
von: Karl-Otto Reimann
Geschrieben am: 14.11.2003 13:52:00
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