Excel 2016 Application.ScreenUpdating = False / True

M0081 · 28. August 2018

Hallo Liebe Community, ich habe ein Problem bei meinen Excel VBA Makros mit dem Befehl Application.ScreenUpdating = False / True.

Unter 2007 und 2010 ging es super und der Bildschirm war kein Flipperkasten. Neu unter 2013 oder 2016 geht es nicht mehr. Im Internet habe ich gesucht und leider keine Lösung gefunden.

Hat jemand von euch eine Idee, wie das Problem gelöst werden könnte?

Dankeschön!

Eine SUB als Beispiel (wurde ca. Jahr 2009 geschrieben).

Sub frmErfaÖffnen()

Application.ScreenUpdating = False '--- Bildschirmaktualisierung aus

sOrgFile = ThisWorkbook.Name
sOrgTab = "PGM"
Call WkbOpen(3, 6)

Call WkbOeffnen("D5", "E5", "N")
Cells(1, 1).Select
Set rngAllFilledCells = ActiveCell.CurrentRegion
frmErfa.txtAnzBew = rngAllFilledCells.Rows.Count - 1

For Each wkb In Application.Workbooks
If UCase(wkb.Name) = UCase(sOrgFile) Then
wkb.Activate
Worksheets(sOrgTab).Activate
Exit For
End If
Next wkb

If Cells(8, 3) > 0 Then
frmErfa.txtJahr = Cells(8, 3)
Else
frmErfa.txtJahr = Format(Date, "MM")
Cells(8, 3) = Format(Date, "MM")
End If

If Cells(9, 3) > 0 Then
frmErfa.txtMonat = Cells(9, 3)
Else
frmErfa.txtMonat = Format(Date, "YYYY")
Cells(9, 3) = Format(Date, "YYYY")
End If

'frmErfa.txtTag = Format(Date, "DD")

frmErfa.lstPers.Clear
frmErfa.lstProj.Clear

Call Hintergrund
Range("A1:A2").Select
Selection.ClearContents
Range("K10").Select '--- Damit man die Markierung nicht sieht

Call AuswahlPP
Call Hintergrund

Application.ScreenUpdating = True '--- Bildschirmaktualisierung ein

frmErfa.Show
End Sub

Leo_L

Hallo M0081,

danke für deine Nachricht.

Für Fragen zum Thema Macros, möchte ich dich bitten, dich an das
MSDN Support
zu wenden.

Bei anderen Anliegen helfe ich gerne weiter.

Gruß

Leo

Claus Busch

Hallo Muharrem,

Application.ScreenUpdating = False kommt an den Anfang des Codes und am Ende kommt dann

Application.ScreenUpdating = True

Mit freundlichen Grüßen

Claus

Claus Busch

Hallo Hanna,

du musst dich nicht auf Pivot Auszug beziehen.

Probiere es mal so:

Application.ScreenUpdating = False

ActiveWorkbook.RefreshAll

Application.ScreenUpdating = True

Claus

Frank Arendt-Theilen

Hallo Jörg,

eventuell hilft dir die VBA-Anweisung Application.ScreenUpdating = False, bzw. nach dem Kopiervorgang
Application.ScreenUpdating =True, weiter.

--

Mit freundlichem Gruß aus der Rattenfängerstadt Hameln

(www.at-exceltraining.de)

Andreas Killer

Probier mal den Code unten.

Andreas.

Private Sub Workbook_Open()

  Application.OnTime Now, Me.CodeName & ".Workbook_AfterOpen"

End Sub

Private Sub Workbook_AfterOpen()

  'Application.ScreenUpdating = False

  Workbooks.Open Filename:="http://[Pfad].xlsx", Password:="[Kennwort]"

  'Workbooks("[Datei].xlsx").Close False

  'Application.ScreenUpdating = True

End Sub

Hi,

willkommen im Windows Forum!

Excel 2016 Application.ScreenUpdating = False / True - Similar Threads - Excel 2016 Application	Forum	Datum
Excel-VBA_Cancel = True in workbook_beforesave geht nicht Excel-VBA_Cancel = True in workbook_beforesave geht nicht: Hallo, könnte bitte jemand diesen Code ausprobieren? Normalerweise müsste die Speicherroutine abgebrochen werden. Tut sie aber nicht. Ich habe nur eine komplett neue Arbeitsmappe offen und diese...	Microsoft Office	13. Januar 2021
True Type Funktion True Type Funktion: hallo zusammen, "enable true type features" - darum geht es. Unter Schriftart -> Erweitert -> dort bei ´True Type Features´ kann man anhaken " die Option ´Kontextvarianten verwenden´. Rechts...	Microsoft Office	30. Juli 2020
Word 2016 VBA Application.ScreenUpdating = True funktioniert nicht. Warum? Word 2016 VBA Application.ScreenUpdating = True funktioniert nicht. Warum?: Hallo, ich bin auf der Suche nach der Ursache für ein Phänomen. Während ein Makro läuft, soll die Ausgabe auf den Word-Bildschirm unterdrückt werden. Eigentlich soll dass mit...	Microsoft Office	5. Februar 2018
Excel crashes after Application Wait Excel crashes after Application Wait: After this Auto_open () makro ist stopped by hitting the ESC Key, it is not possible to edit the makro an save the worksheet manualy after stopping it. The wait is needed in order to have the...	Microsoft Office	23. Oktober 2017
Spam false positive Frage Spam false positive Frage: Ich habe eine Frage wie man "false positive" Spam im Zusammenhang mit SPF und Weiterleitungen verhindern kann. Hier das Szenario: Zwei Firmen: "Firma A" und "Firma B". Beide bei Office 365 (aber...	Microsoft Office	19. Oktober 2017
Edge Erweiterung "True Key" Edge Erweiterung "True Key": Hallo, ich habe ein Problem mit der Edge Erweiterung "True Key" (Das ist ein Passwort-Manager). Wenn ich die Erweiterung im MS Store herunterlade und installiere funktioniert das noch. Wenn ich...	Apps	30. August 2017
Löschen des True Key Löschen des True Key: Hallo, ich habe mir True Key heruntergeladen, das ist mir aber doch zu umständlich, wie kann ich ihn wieder komplett löschen??? Danke für Eure Hilfe VG Helga	Windows Insider	8. April 2017

Excel 2016 Application.ScreenUpdating = False / True

Excel 2016 Application.ScreenUpdating = False / True

Excel 2016 Application.ScreenUpdating = False / True

Datum Filtern / eingrenzen und in eine neue Tabelle kopieren

excel vba Pivottabelle aktualisieren

Excel 2003: Arbeitsmappe unsichtbar öffnen

Daten aus einer kennwortgeschützten Excel-Datei holen

User Advert

Excel 2016 Application.ScreenUpdating = False / True - Microsoft Office

Excel 2016 Application.ScreenUpdating = False / True - Similar Threads - Excel 2016 Application

Excel-VBA_Cancel = True in workbook_beforesave geht nicht

True Type Funktion

Word 2016 VBA Application.ScreenUpdating = True funktioniert nicht. Warum?

Excel crashes after Application Wait

Spam false positive Frage

Edge Erweiterung "True Key"

Löschen des True Key

Excel 2016 Application.ScreenUpdating = False / True solved

Users found this page by searching for:

excel vba scrrenupdating