Come nascondere più righe o colonne vuote in Excel contemporaneamente in Excel?
Nascondere o rimuovere le righe o le colonne vuote può aiutarti a condensare il foglio di lavoro, in questo articolo ti presenterò alcuni modi rapidi per nascondere o rimuovere le righe o le colonne vuote nel foglio di lavoro di Excel.
Nascondi rapidamente più righe o colonne vuote con codice VBA
Elimina rapidamente più righe o colonne vuote con Kutools per Excel
Nascondi rapidamente più righe o colonne vuote con codice VBA
Il seguente codice VBA può aiutarti a nascondere più righe o colonne vuote in un foglio di lavoro in modo rapido e semplice.
1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Clicchi inserire > Modulie incolla il codice seguente nel file Moduli Finestra.
Codice VBA: nasconde più righe vuote in un foglio di lavoro
Sub HideEmpties()
'Updateby Extendoffice
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim I As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
On Error Resume Next
For I = 1 To xRg.Row + xRg.Rows.Count
If Application.WorksheetFunction.CountA(xRg.Rows(I)) = 0 Then
xRg.Rows(I).EntireRow.Hidden = True
End If
Next
End Sub
3. Quindi premere F5 chiave per eseguire questo codice e viene visualizzata una finestra di messaggio per ricordarti di selezionare l'intervallo di dati in cui desideri nascondere le righe vuote, vedi screenshot:
4. E poi clicca OK pulsante, le righe vuote vengono nascoste contemporaneamente, vedi screenshot:
Note:: Per nascondere più colonne vuote, applica il seguente codice VBA:
Codice VBA: nasconde più colonne vuote in un foglio di lavoro
Sub HideEmpties()
'Updateby Extendoffice
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim I As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
On Error Resume Next
For I = 1 To xRg.Column + xRg.Columns.Count
If Application.WorksheetFunction.CountA(xRg.Columns(I)) = 0 Then
xRg.Columns(I).EntireColumn.Hidden = True
End If
Next
End Sub
Elimina rapidamente più righe o colonne vuote con Kutools per Excel
In questa sezione, parlerò di come eliminare più righe o colonne vuote che non desideri in un intervallo, foglio di lavoro o cartella di lavoro. Il Kutools for Excel'S Elimina righe e colonne nascoste (visibili) utility può aiutarti a risolvere questo compito il più rapidamente possibile.
Kutools for Excel : con oltre 300 utili componenti aggiuntivi di Excel, da provare gratuitamente senza limitazioni in 30 giorni. |
Dopo l'installazione Kutools for Excel, si prega di fare come segue:
1. Seleziona l'intervallo di dati in cui desideri eliminare le righe o le colonne vuote, quindi fai clic su Kutools > Elimina > Elimina righe e colonne nascoste (visibili), vedi screenshot:
2. Nel Elimina righe e colonne nascoste (visibili) finestra di dialogo, selezionare Nell'intervallo selezionato in Guarda dentro elenco a discesa (puoi anche scegliere un'altra opzione in questo elenco a discesa di cui hai bisogno), seleziona Righe or colonne dal Elimina tipo sezione, e scegliere Righe vuote or Colonne vuote sotto il Tipo dettagliato sezione, vedi screenshot:
3. E poi clicca Ok pulsante, le righe o le colonne vuote nella selezione sono state rimosse immediatamente. Vedi screenshot:
Note:: Con questa funzione, puoi anche eliminare righe o colonne nascoste, righe o colonne visibili nella selezione, foglio di lavoro o cartella di lavoro di cui hai bisogno.
Fai clic su Scarica gratuitamente Kutools per Excel adesso!
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!