2 Einfache Methoden zum Auswählen aller nicht leeren Zellen in einem Excel-Arbeitsblatt

Wenn in einer Excel-Tabelle Daten in nicht benachbarten Zellen eingegeben werden, kann es etwas umständlich sein, die Daten in nicht leeren Zellen auszuwählen und zu kopieren. In diesem Beitrag stellen wir Ihnen zwei Möglichkeiten vor, wie Sie schnell alle nicht leeren Zellen auswählen können.

Excel-Benutzer müssen häufig Daten kopieren und einfügen. Manchmal kann es jedoch zu Problemen kommen. Beispielsweise enthält ein Excel-Arbeitsblatt mehrere diskontinuierliche leere Zellen. In diesem Fall ist es etwas schwierig, alle Zellen mit Inhalt auszuwählen. Aber mach dir keine Sorgen. Hier werden wir Ihnen zwei Ansätze zur Auswahl aller nicht leeren Zellen in einer Excel-Tabelle vorstellen.

Methode 1: Wählen Sie über "Gehe zu Spezial"

1. Öffnen Sie zu Beginn das Excel-Arbeitsblatt.
2. Drücken Sie dann "F5", um das Dialogfeld "Gehe zu" auszulösen.
3. Klicken Sie im Dialogfeld "Gehe zu" auf die Schaltfläche "Spezial".
4. Aktivieren Sie als Nächstes die Optionen "Konstanten" und dann die Optionen "Zahlen", "Text", "Logik" und "Fehler".
5. Klicken Sie abschließend auf "OK".
6. Wenn das Dialogfeld geschlossen wird, wurden, wie Sie sehen, alle nicht leeren Zellen ausgewählt.

Methode 2: Mit Excel VBA auswählen

1. Erhalten Sie zunächst Zugriff auf den Excel VBA-Editor mit Bezug auf „So führen Sie VBA-Code in Ihrem Excel aus".
2. Fügen Sie dann den folgenden Code in ein nicht verwendetes Modul ein.

Sub SelectAllNonBlankCells()
    Dim objUsedRange As Range
    Dim objRange As Range
    Dim objNonblankRange As Range

    Set objUsedRange = Application.ActiveSheet.UsedRange

    For Each objRange In objUsedRange
        If Not (objRange.Value = "") Then
           If objNonblankRange Is Nothing Then
              Set objNonblankRange = objRange
           Else
              Set objNonblankRange = Application.Union(objNonblankRange, objRange)
           End If
        End If
    Next

    If Not (objNonblankRange Is Nothing) Then
       objNonblankRange.Select
    End If
End Sub

3. Beenden Sie danach den VBA-Editor und fügen Sie dieses Makro zur Symbolleiste für den Schnellzugriff hinzu.
4. Öffnen Sie nun das gewünschte Arbeitsblatt und klicken Sie auf die Makro-Schaltfläche.
5. Sofort werden alle nicht leeren Zellen ausgewählt, wie in der folgenden Abbildung gezeigt.

Vergleich

Reparieren Sie störende Excel-Probleme

Excel-Dateien sind anfällig für Fehler und Beschädigungen. Wenn beispielsweise MS Excel häufig nicht ordnungsgemäß geschlossen wird, kann die Datei leicht beschädigt werden. Daher müssen Benutzer einige Vorsichtsmaßnahmen treffen, einschließlich der regelmäßigen Sicherung der Dateien. Darüber hinaus eine kompetente, robuste und zuverlässige xlsx beheben Werkzeug, wie DataNumen Excel Repairist eine Frage der Notwendigkeit.

Einführung des Autors:

Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich SQL Server Erholung und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX