5 metodi rapidi per eliminare in batch più righe o colonne nella tua tabella di parole

In questo articolo, vorremmo mostrarti 5 metodi rapidi per eliminare in batch più righe o colonne nella tua tabella di Word.

Mettiamo i dati nelle tabelle per rendere il documento facile da vedere. Non è raro creare un lungo tavolo. Tuttavia, quando controlli di nuovo la tabella e ritieni che alcune righe e colonne non siano necessarie, avrai bisogno di un modo rapido per rimuoverle.

Per prima cosa diamo un'occhiata ai modi per eliminare più righe o colonne consecutive.

Metodo 1: eliminare righe o colonne tramite il menu contestuale

1. Innanzitutto, seleziona una serie di righe o colonne e fai clic con il pulsante destro del mouse.
2. Quindi scegli "Elimina righe" o "Elimina colonne" di conseguenza.    
3. Oppure puoi selezionare righe o colonne e fare clic su "Layout".
4. Quindi scegli "Elimina" e seleziona "Elimina colonne" o "Elimina righe".

Metodo 2: utilizzare le scorciatoie

1. Innanzitutto, seleziona righe o colonne.
2. In secondo luogo, premi "Backspace".

Ora, se le colonne o le righe non sono consecutive, non possiamo eliminarle utilizzando i metodi precedenti. Invece, puoi distribuire i seguenti metodi.

Metodo 3: metti insieme righe o colonne non necessarie

1. Seleziona prima una riga o una colonna.
2. Quindi fare clic con il mouse e tenere premuto.
3. Trascina il mouse in una posizione corretta e rilascia.
4. Quindi seleziona tutto tarottenere righe o colonne e utilizzare i metodi precedenti per eliminarli.

Metodo 4: eseguire una macro per eliminare più righe non consecutive

1. Prima e primaost, seleziona le righe.
2. Premi "Alt + F11" per aprire l'editor VBA in Word.
3. Quindi creare un modulo facendo clic sul progetto "Normale".
4. Quindi fai clic su "Inserisci" e scegli "Modulo".
5. Apri il modulo con doppio clic e incolla i seguenti codici:

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. Ultimo ma non meno importante, fai clic su "Esegui" o premi "F5".

Metodo 5: eseguire una macro per eliminare più colonne non consecutive

1. Prima di tutto, seleziona tarottenere colonne con il tasto "Ctrl".
2. Quindi installa ed esegui una macro seguendo esattamente gli stessi passaggi sopra.
3. Ma sostituisci macro con questo:

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

Fai attenzione alla corruzione dei documenti

Con l'aumento dell'uso di dispositivi di archiviazione digitale, è importante prendersi cura dei dati. Uno dei modi migliori è eseguirne il backup. Ad esempio, durante l'utilizzo di Word, può smettere di rispondere all'improvviso. E quando torna alla normalità, puoi solo trovare il tuo documento morto. E poi dovrai affrontare tutto il trambusto di recupero docx.

Introduzione dell'autore:

Vera Chen è un'esperta di recupero dati in DataNumen, Inc., che è il leader mondiale nelle tecnologie di recupero dati, tra cui correzione xlsx e pdf riparare prodotti software. Per maggiori informazioni visita www.datanumen.com