5 snelle methoden om batchgewijs meerdere rijen of kolommen in uw Word-tabel te verwijderen

In dit artikel willen we u 5 snelle methoden laten zien om batchgewijs meerdere rijen of kolommen in uw Word-tabel te verwijderen.

We zetten gegevens in tabellen om het document gemakkelijk te maken. Het is niet ongebruikelijk om een ​​lange tafel te maken. Als u de tabel echter nogmaals controleert en enkele rijen en kolommen niet nodig vindt, heeft u een snelle manier nodig om ze te verwijderen.

Laten we eerst eens kijken naar manieren om meerdere opeenvolgende rijen of kolommen te verwijderen.

Methode 1: verwijder rijen of kolommen via het contextmenu

1. Selecteer eerst een reeks rijen of kolommen en klik met de rechtermuisknop.
2. Kies vervolgens "Rijen verwijderen" of "Kolommen verwijderen" overeenkomstig.    
3. Of u kunt rijen of kolommen selecteren en op "Layout" klikken.
4. Kies vervolgens "Verwijderen" en selecteer "Kolommen verwijderen" of "Rijen verwijderen".

Methode 2: gebruik snelkoppelingen

1. Selecteer eerst rijen of kolommen.
2. Ten tweede, druk op "Backspace".

Als de kolommen of rijen niet opeenvolgend zijn, kunnen we ze niet verwijderen met behulp van bovenstaande methoden. In plaats daarvan kunt u de volgende methoden implementeren.

Methode 3: Zet onnodige rijen of kolommen bij elkaar

1. Selecteer eerst een rij of kolom.
2. Klik dan met de muis en houd vast.
3. Sleep de muis naar de juiste positie en laat los.
4. Selecteer vervolgens alle gewenste rijen of kolommen en gebruik de bovenstaande methoden om ze te verwijderen.

Methode 4: voer een macro uit om meerdere niet-opeenvolgende rijen te verwijderen

1. Selecteer allereerst de rijen.
2. Druk op "Alt + F11" om de VBA-editor in Word te openen.
3. Maak vervolgens een module door te klikken op "Normaal" project.
4. Klik vervolgens op "Invoegen" en kies "Module".
5. Open de module met dubbelklik en plak de volgende codes:

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. Als laatste, maar niet de minste, klik op "Uitvoeren" of druk op "F5".

Methode 5: voer een macro uit om meerdere niet-opeenvolgende kolommen te verwijderen

1. Selecteer allereerst de gewenste kolommen met de Ctrl-toets.
2. Installeer en voer vervolgens een macro uit volgens exact dezelfde bovenstaande stappen.
3. Maar vervang macro door deze:

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

Pas op voor corruptie van documenten

Met het toenemende gebruik van digitale opslagapparatuur is het belangrijk om voor gegevens te zorgen. Een van de beste manieren is om er een back-up van te maken. Als u bijvoorbeeld Word gebruikt, reageert het plotseling niet meer. En als het weer normaal is, kunt u uw document alleen dood vinden. En dan zul je door alle ophef heen moeten gaan docx herstel.

Auteur Introductie:

Vera Chen is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder xlsx-oplossing en pdf reparatie softwareproducten. Voor meer informatie bezoek www.datanumen.com