Microsoft Excel

Herbers Excel/VBA-Archiv

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

Zustand der Bearbeitungs und Statusleiste merken | Herbers Excel-Forum


Betrifft: Zustand der Bearbeitungs und Statusleiste merken von: Andre´
Geschrieben am: 20.02.2012 12:17:58

Hallo alle zusammen,

mit folgenden Makro hier aus dem Forum wird der Zustand der Berechnungsoption gemerkt.

Sub Berechnung_auf_Manuell_setzen()
GMS
End Sub Sub Alter_Zustand_Herstellen()
GMS True
End Sub

Public Sub GMS(Optional ByVal Modus As Boolean = False)

  Static lngCalc As Long
  
  With Application
    If Not Modus Then lngCalc = .Calculation
    If Modus And lngCalc = 0 Then lngCalc = -4105
    .Calculation = IIf(Modus, lngCalc, -4135)
 End With

End Sub


Wie kann man das auf die Bearbeitungs- und Statusleiste anwenden.

Ich hoffe mir kann jemand helfen.

Vielen Dank im Voraus!

MFG Andre

  

Betrifft: Indem man die App-Eigenschaften verwendet, ... von: Luc:-?
Geschrieben am: 20.02.2012 20:48:27

…die dieses Objekt definieren, André → VBE-Hilfe!
Gruß Luc :-?


  

Betrifft: AW: Indem man die App-Eigenschaften verwendet, ... von: Andre´
Geschrieben am: 20.02.2012 21:06:31

Hallo Luc,
meinst Du in etwa so:

Sub tt()
  Dim wkb As Workbook, blnSWIT As Boolean
  blnSWIT = Application.ShowWindowsInTaskbar 'Zustand merken
  
  With Application
    .ScreenUpdating = False
    .ShowWindowsInTaskbar = False 'Fenster in Taskleiste nicht anzeigen
  End With

MsgBox ("mach etwas")

With Application
    .ScreenUpdating = True
    .ShowWindowsInTaskbar = blnSWIT 'Zustand wiederherstellen
End With

End Sub



  

Betrifft: andere App-Eigenschaften von: Erich G.
Geschrieben am: 21.02.2012 01:46:10

Hi André,
es gibt noch viel mehr Eigenschaften von Application...

Schau dir mal die VBA-Hilfe zu
Application.DisplayFormulaBar
Application.DisplayStatusBar
an.

Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich


Beiträge aus den Excel-Beispielen zum Thema "Zustand der Bearbeitungs und Statusleiste merken"