Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Worksheet_Change(ByVal Target As Range) in Dauerschleife

Forumthread: Worksheet_Change(ByVal Target As Range) in Dauerschleife

Worksheet_Change(ByVal Target As Range) in Dauerschleife
23.10.2024 14:21:39
Dustin1986
Liebe Foren-Mitglieder,

nach vielem hin und her finde ich keine Lösung auf mein Problem.
Ich habe ein ganz kleines Makro einem speziellen Tabellenblatt zugeordnet, welches analysiert ob es in vier Zellen eine Änderung gegeben hat.
Wenn es eine Änderung gegeben hat soll die Pivot in dem Tabellenblatt aktualisiert werden.
Die Prozedur verfängt sich aber in einer Dauerschleife und die Pivot wird immer und immer wieder aktualisiert:

Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("C1:C4")) Is Nothing Then
DoEvents

ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh

End If

End Sub


Ich komme nicht auf des Rätsels Lösung das Problem zu beheben und würde mich über hilfreichen Input freuen.

Lieben Dank und viele Grüße
Dustin
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Worksheet_Change(ByVal Target As Range) in Dauerschleife
23.10.2024 14:33:29
Onur
Sub Worksheet_Change(ByVal Target As Range)

If Not Application.Intersect(Target, Range("C1:C4")) Is Nothing Then
DoEvents
Application.EnableEvents = False
ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
Application.EnableEvents = True
End If
End Sub
Anzeige
AW: Worksheet_Change(ByVal Target As Range) in Dauerschleife
23.10.2024 16:28:16
Dustin1986
Die Antwort von Onur ist genau das Ergebnis welches ich gesucht habe.
Ich hatte es auch mit Application.ScreenUpdating False und True versucht aber das hat nichts gebracht.
Super, vielen Dank Onur.

MbG
Gerne !
23.10.2024 17:30:45
Onur

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige