Microsoft Excel

Herbers Excel/VBA-Archiv

Excel Applikation deaktiviern u. wieder aktivieren | Herbers Excel-Forum


Betrifft: Excel Applikation deaktiviern u. wieder aktivieren von: Peter
Geschrieben am: 30.11.2009 09:22:29

Guten Tag

Im Moment habe ich ein Problem mit der Bildschirmaktualisierung.

https://www.herber.de/forum/archiv/1120to1124/t1120427.htm⇐

Bis Microsoft das Problem behebt, möchte ich mir mit folgendem behelfen:
Ich dekaktiviere die Applikation Excel und aktiviere sie gleich wieder. Die Routine ordne ich einem Tastenkürzel (z.B. F5) zu. So kann ich die "Unordnung" auf dem Bildschirm schnell wieder ordnen.

Wie kann ich mit VBA die Applikation Excel deaktivieren und wieder aktivieren?

Danke für jede Hilfe.

Gruss, Peter

  

Betrifft: Excel für 2 Sekunden ausblenden von: NoNet
Geschrieben am: 30.11.2009 10:39:36

Hallo Peter,

ich weiß zwar nicht, ob das hilft, aber teste doch mal diesen Code (bitte zuvor alle Mappen speichern !!) :

Sub ExcelDeaktivierenAktivieren()
    Application.Visible = False                     'Excel ausblenden
    Application.Wait Now + TimeValue("00:00:02")    '2 Sekunden warten
    Application.Visible = True                      'Excel einblenden
End Sub
Gruß, NoNet


  

Betrifft: AW: Excel für 2 Sekunden ausblenden von: Peter
Geschrieben am: 30.11.2009 10:55:49

Hallo NoNet
Das hilft!
Vielen Dank, Peter


  

Betrifft: AW: Excel für 2 Sekunden ausblenden von: Peter
Geschrieben am: 30.11.2009 11:11:05

Hallo NoNet
Könnte ich hier allenfalls auch eine Millisekunde verwenden. Da es grundsätzlich funktioniert, möchte ich möglichst wenig Zeit verlieren.

Gruss, Peter


  

Betrifft: AW: Excel für 2 Sekunden ausblenden von: JogyB
Geschrieben am: 30.11.2009 11:16:40

Hi.

Mit Application.Wait nicht, grundsätzlich aber ja:

Private Declare Sub Sleep Lib "kernel32" (ByVal lngMilliseconds As Long)
Sub ausBlenden()
    Application.Visible = False
    Sleep (1)
    Application.Visible = True
End Sub

Gruss, Jogy


  

Betrifft: AW: Perfekt, Danke! owT von: Peter
Geschrieben am: 30.11.2009 11:20:16




Beiträge aus den Excel-Beispielen zum Thema "Excel Applikation deaktiviern u. wieder aktivieren"