Wie kann man in Excel schnell den Bereich mit Abweichungen auswählen?
Angenommen, Sie müssen einige Zellen oder Bereiche aus Aktuelle Auswahl abwählen, müssen Sie die gesamte Auswahl aufheben und erneut auswählen, da Excel keine Möglichkeit bietet, diese abzuwählen, sobald sie einmal ausgewählt wurden. Dieser Artikel listet einige praktische Methoden auf, um Teile der Zellen oder Bereiche aus der Aktuelle Auswahl abzuwählen.
Teilweise Zellen oder Bereiche aus der Auswahl mit VBA-Code abwählen
Teilweise Zellen oder Bereiche aus der Auswahl mit Kutools für Excel abwählen
Beispielsweise haben Sie zahlreiche Zellen ausgewählt, stellen aber nun fest, dass einige davon nicht benötigt werden. In diesem Fall müssen Sie lediglich die unerwünschten Zellen abwählen und die übrigen Markierungen beibehalten – siehe folgende Screenshots:
 |  |  |
Teilweise Zellen oder Bereiche aus der Auswahl mit VBA-Code abwählen
VBA ist eine hervorragende Methode, um bestimmte Vorgänge in Excel durchzuführen, die sich mit den Standardbefehlen nur schwer umsetzen lassen – das gilt auch für das Abwählen von Differenzen oder Bereichen.
Schritt 1: Wählen Sie den Bereich aus, mit dem Sie arbeiten möchten;
Schritt 2: Klicken Sie auf eine Zelle innerhalb der Auswahl, die Sie abwählen möchten, während Sie die Strg-Taste gedrückt halten.
Schritt 3: Halten Sie in Excel die Tasten Alt + F11 gedrückt – es öffnet sich das Fenster Microsoft Visual Basic for Applications.
Schritt 4: Klicken Sie auf Einfügen > Modul, und fügen Sie das folgende Makro in das Modulfenster ein.
VBA zum Abwählen der aktiven Zelle aus der Auswahl
Sub UnSelectCell()
'Updateby20140314
Dim rng As Range
Dim InputRng As Range
Dim DeleteRng As Range
Dim OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set DeleteRng = Application.InputBox("Delete Range", xTitleId, Type:=8)
For Each rng In InputRng
If Application.Intersect(rng, DeleteRng) Is Nothing Then
If OutRng Is Nothing Then
Set OutRng = rng
Else
Set OutRng = Application.Union(OutRng, rng)
End If
End If
Next
OutRng.Select
End Sub
Schritt 5: Drücken Sie die Taste F5, um dieses Makro auszuführen. Danach erscheint ein Dialogfeld, in dem Sie einen Arbeitsbereich auswählen können. Siehe Screenshots:
Schritt 6: Klicken Sie dann auf OK. Es erscheint ein weiteres Dialogfeld, in dem Sie „Differenz innerhalb des Bereichs“ auswählen können. Wenn Sie mehr als eine Zelle im Bereich abwählen möchten, halten Sie die Strg-Taste gedrückt und wählen die gewünschten Zellen nacheinander aus. Siehe Screenshot:
Schritt 7: Klicken Sie auf OK, und Sie sehen das Ergebnis:
Teilweise Zellen oder Bereiche aus der Auswahl mit Kutools für Excel abwählen
Wenn Sie zahlreiche Zellen oder Bereiche aus der Auswahl abwählen müssen, ist die oben genannte VBA-Methode nicht ideal. Deshalb präsentieren wir Ihnen folgenden cleveren Trick: die Bereichshilfe-Werkzeuge von Kutools für Excel – mit ihnen wählen Sie beliebige Zellen oder Bereiche einfach und blitzschnell ab.
Kutools für Excel bietet über 300 praktische Excel-Werkzeuge – testen Sie es jetzt 30 Tage lang kostenlos und ohne Einschränkungen!Jetzt herunterladen.
Schritt 1: Klicken Sie auf Kutools > Auswählen > Bereichshilfe….
Schritt 2: Aktivieren Sie im Dialogfeld Bereichshilfe die Option Differenz, und klicken oder ziehen Sie anschließend mit der Maus, um Bereiche aus der Auswahl abzuwählen oder die Differenz zu definieren. Siehe Screenshot:
Schritt 3: Die unerwünschten Zellen wurden nun aus der Auswahl entfernt. Schließen Sie zum Abschluss das Dialogfeld Bereichshilfe.
Weitere Informationen zur Bereichshilfe finden Sie unter Bereichshilfe Funktionsbeschreibung.
Verwandte Artikel:
- Nicht benachbarte Zellen oder Bereiche auswählen
- Auswahl von Bereich auswählen umkehren
- Alle Zellen mit Daten in der Auswahl markieren
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins