Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen

Arbeitsblatt anzeigend

Betrifft: Arbeitsblatt anzeigend von: Helmut Hoffmann
Geschrieben am: 25.08.2020 11:24:23

Hallo,
folgende Problematik mit dem Code:

Private Sub Btn_Druckoption_Mieter_Click()
Unload Frm_Druckoptionen
Sheets("Start2").Activate  '1)
Worksheets("Druckbereich").Btn_MieterN.Value = True '2
Worksheets("Druckbereich").Btn_VorschauN.Value = True '2
frm_Administration.Show
End Sub

1) dieses Blatt ist nur eingefärbt und hat keinen weiteren Inhalt. Zweck: es soll angezeigt werden solange der Code 2 ausgeführt wird. Tut es aber nicht sondern das Blatt ("Druckbereich") wird angezeigt. Hat jemand eine Lösung für das Problem

Betrifft: AW: Arbeitsblatt anzeigend
von: Pierre
Geschrieben am: 25.08.2020 11:35:10

Hallo Helmut,

die erste (einzige) Idee, die ich spontan hatte:

Hinter dem Activate mal die Bildschirmaktualisierung ausschalten mit:
Application.ScreenUpdating = False
und vor dem "frm_(...).Show" wieder einschalten.

Gruß Pierre

Betrifft: AW: Arbeitsblatt anzeigend
von: Helmut Hoffmann
Geschrieben am: 25.08.2020 11:42:12

Hallo, vielen Dank. Das funktioniert soweit ganz gut. Der 2te Code generiert ein Preview, das wird auch angezeigt, aber es ist schwarz, klicke ich darauf wird es sichtbar. Eine Idee?

Betrifft: AW: Arbeitsblatt anzeigend
von: Pierre
Geschrieben am: 25.08.2020 13:32:39

Hallo Helmut,

da kann ich leider nicht helfen.

Wo hast du denn das ScreenUpdating = True eingebaut?

Betrifft: AW: Arbeitsblatt anzeigend
von: Helmut Hoffmann
Geschrieben am: 25.08.2020 13:38:49

... schon an der richtigen Stelle. Habe dann ein DoEvents noch platziert, damit war es dann ok. es funktionierten dann andere CommandButton nicht mehr, letztlich ging gar nicht mehr, habe dann die -Sicherungskopie verwendet und siehe da alles ok ! Ist Excel so instabil?
Nochmals vielen Dank für Deine Hilfe

Betrifft: Bitteschön (Excel ist doof :D) (owT)
von: Pierre
Geschrieben am: 25.08.2020 14:34:24



Beiträge aus dem Excel-Forum zum Thema "Arbeitsblatt anzeigend "