Wie überwacht man Zellenänderungen in Excel?
Wie könnten Sie die Änderungen in den Zellen eines Arbeitsblatts überwachen, wenn sich Daten in Excel ändern? Dies kann Ihnen helfen, die geänderten Zellen so schnell wie möglich zu identifizieren. In diesem Artikel werde ich über einige interessante Methoden sprechen, um diese Aufgabe in Excel zu bewältigen.
Zellenänderungen in Excel mit der Funktion "Änderungen nachverfolgen" überwachen
Zellenänderungen in Excel mit VBA-Code überwachen
Zellenänderungen in Excel mit der Funktion "Änderungen nachverfolgen" überwachen
Excel verfügt über eine nützliche Funktion "Änderungen nachverfolgen", mit der Sie geänderte Zellen markieren können. Bitte gehen Sie wie folgt vor:
1. Klicken Sie auf Überprüfen > Änderungen nachverfolgen > Änderungen hervorheben, siehe Screenshot:
2. Führen Sie im Dialogfeld "Änderungen hervorheben" die folgenden Schritte aus:
(1.) Aktivieren Sie "Änderungen während der Bearbeitung nachverfolgen. Dies teilt auch Ihr Arbeitsblatt."
(2.) Geben Sie im Abschnitt "Welche Änderungen hervorheben" die gewünschten Zeitpunkte, Personen und Orte an.
(3.) Aktivieren Sie zum Schluss die Option "Änderungen auf dem Bildschirm hervorheben".
3. Nachdem Sie die Einstellungen abgeschlossen haben, klicken Sie auf die Schaltfläche OK. Nun wird, wenn Sie Werte in den angegebenen Zellen ändern, ein Rahmen mit einem Dreieck-Symbol um die geänderten Zellen erscheinen, siehe Screenshot:
Hinweis: Mit dieser Methode wird Ihr Arbeitsblatt zu einem freigegebenen Arbeitsblatt.
Zellenänderungen in Excel mit VBA-Code überwachen
Der folgende VBA-Code kann Ihnen ebenfalls dabei helfen, Zellenwerte zu überwachen, wenn sie geändert werden. Gehen Sie dazu wie folgt vor:
1. Klicken Sie mit der rechten Maustaste auf die Registerkarte des Blatts, dessen Zellenänderungen Sie überwachen möchten, und wählen Sie Code anzeigen aus dem Kontextmenü. Im geöffneten Fenster "Microsoft Visual Basic for Applications" kopieren und fügen Sie den folgenden VBA-Code in das Modul ein:
VBA-Code: Zellenänderungen in einem Excel-Arbeitsblatt überwachen:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160728
Dim xrng As Range
Set xrng = Range("A1:E7")
If Not Application.Intersect(xrng, Range(Target.Address)) _
Is Nothing Then
MsgBox "Cell " & Target.Address & " has changed.", vbInformation, "Kutools for Excel"
End If
End Sub
Hinweis: Im obigen Code ist A1:E7 der Datenbereich, den Sie überwachen möchten, falls sich Zellen ändern. Sie können ihn bei Bedarf anpassen.
2. Speichern und schließen Sie dann dieses Codefenster. Wenn Sie nun den Zellenwert im angegebenen Bereich ändern, wird ein Meldungsfeld angezeigt, um Sie darauf hinzuweisen, siehe Screenshot:
Die besten Produktivitätstools für das Büro
Stärken Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und genießen Sie Effizienz wie nie zuvor. Kutools für Excel bietet mehr als300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt die Tab-Oberfläche in Office und macht Ihre Arbeit wesentlich einfacher
- Aktivieren Sie die Tabulator-Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs innerhalb desselben Fensters, statt in neuen Einzelfenstern.
- Steigert Ihre Produktivität um50 % und reduziert hunderte Mausklicks täglich!
Alle Kutools-Add-Ins. Ein Installationspaket
Das Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro und ist ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- All-in-One-Paket — Add-Ins für Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Ein Installationspaket, eine Lizenz — in wenigen Minuten einsatzbereit (MSI-kompatibel)
- Besser gemeinsam — optimierte Produktivität in allen Office-Anwendungen
- 30 Tage kostenlos testen — keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis — günstiger als Einzelkauf der Add-Ins