5 Schnelle Methoden zum Stapeln Löschen mehrerer Zeilen oder Spalten in Ihrer Word-Tabelle

In diesem Artikel möchten wir Ihnen 5 schnelle Methoden zum Batch-Löschen mehrerer Zeilen oder Spalten in Ihrer Word-Tabelle zeigen.

Wir fügen Daten in Tabellen ein, um das Dokument für das Auge einfacher zu machen. Es ist nicht ungewöhnlich, eine lange Tabelle zu erstellen. Wenn Sie die Tabelle jedoch erneut überprüfen und feststellen, dass einige Zeilen und Spalten nicht erforderlich sind, müssen Sie sie schnell entfernen.

Schauen wir uns zunächst an, wie Sie mehrere aufeinanderfolgende Zeilen oder Spalten löschen können.

Methode 1: Löschen von Zeilen oder Spalten über das Kontextmenü

1. Wählen Sie zunächst eine Reihe von Zeilen oder Spalten aus und klicken Sie mit der rechten Maustaste.
2. Wählen Sie dann entsprechend "Zeilen löschen" oder "Spalten löschen".    
3. Oder Sie können Zeilen oder Spalten auswählen und auf „Layout“ klicken.
4. Wählen Sie dann "Löschen" und dann "Spalten löschen" oder "Zeilen löschen".

Methode 2: Verwenden Sie Verknüpfungen

1. Wählen Sie zunächst Zeilen oder Spalten aus.
2. Zweitens drücken Sie "Rücktaste".

Wenn die Spalten oder Zeilen nicht aufeinander folgen, können wir sie mit den oben genannten Methoden nicht löschen. Stattdessen können Sie die folgenden Methoden bereitstellen.

Methode 3: Fügen Sie unnötige Zeilen oder Spalten zusammen

1. Wählen Sie zuerst eine Zeile oder Spalte aus.
2. Klicken Sie dann mit der Maus und halten Sie gedrückt.
3. Ziehen Sie die Maus an die richtige Position und lassen Sie sie los.
4. Wählen Sie anschließend alle Zielzeilen oder -spalten aus und löschen Sie diese mithilfe der oben genannten Methoden.

Methode 4: Führen Sie ein Makro aus, um mehrere nicht aufeinanderfolgende Zeilen zu löschen

1. Als Erstes sollten Sie die Zeilen auswählen.
2. Drücken Sie „Alt + F11“, um den VBA-Editor in Word zu öffnen.
3. Erstellen Sie dann ein Modul, indem Sie auf "Normal" klicken.
4. Klicken Sie anschließend auf "Einfügen" und wählen Sie "Modul".
5. Öffnen Sie das Modul mit einem Doppelklick und fügen Sie die folgenden Codes ein:

Sub DeleteNonConsecutiveRows()
  Dim objCell As Cell
  Dim objTable As Table
  Dim nIndex As Integer, nRows As Integer
  Dim strTable As String
  Dim varCellEmpty As Boolean
 
  Application.ScreenUpdating = False
 
  '  Delete contents in selected rows.
  Selection.Delete
 
  With Selection.Tables(1)
    nRows = .Rows.Count
    For nIndex = nRows To 1 Step -1
      For Each objCell In .Rows(nIndex).Cells
        If Len(objCell.Range.Text) > 2 Then
          varCellEmpty = False
          Exit For
        Else
          varCellEmpty = True
          .Rows(nIndex).Delete
        End If
      Next objCell
    Next nIndex
  End With
 
  Set objCell = Nothing
  Set objTable = Nothing
 
  Application.ScreenUpdating = True
End Sub

6. Last but not least klicken Sie auf "Ausführen" oder drücken Sie "F5".

Methode 5: Führen Sie ein Makro aus, um mehrere nicht aufeinanderfolgende Spalten zu löschen

1. Wählen Sie zunächst die gewünschten Spalten mit der „Strg“-Taste aus.
2. Als nächstes installieren und führen Sie ein Makro aus, indem Sie genau die gleichen Schritte wie oben ausführen.
3. Aber ersetzen Sie das Makro durch dieses:

Sub DeleteNonConsecutiveColumns()
  Dim objCell As Cell
  Dim objTable As Table
  Dim nIndex As Integer, nColumns As Integer
  Dim strTable As String
  Dim varCellEmpty As Boolean
 
  Application.ScreenUpdating = False
 
  '  Delete contents in selected columns.
  Selection.Delete
 
  With Selection.Tables(1)
    nColumns = .Columns.Count
    For nIndex = nColumns To 1 Step -1
 
      For Each objCell In .Columns(nIndex).Cells
        If Len(objCell.Range.Text) > 2 Then
          varCellEmpty = False
          Exit For
        Else
          varCellEmpty = True
          .Columns(nIndex).Delete
        End If
      Next objCell
    Next nIndex
  End With
 
  Set objCell = Nothing
  Set objTable = Nothing
 
  Application.ScreenUpdating = True
End Sub

Achten Sie auf die Beschädigung von Dokumenten

Mit der zunehmenden Verwendung digitaler Speichergeräte ist es wichtig, sich um Daten zu kümmern. Eine der besten Möglichkeiten besteht darin, sie zu sichern. Während der Verwendung von Word kann es beispielsweise plötzlich nicht mehr reagieren. Und wenn es wieder normal ist, können Sie Ihr Dokument nur tot finden. Und dann müssen Sie die ganze Aufregung durchmachen docx-Wiederherstellung.

Einführung des Autors:

Vera Chen ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich xlsx beheben und pdf Reparatur von Softwareprodukten. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX