Come eliminare rapidamente più colonne vuote in Excel?
A volte, quando importi dati in Microsoft Excel da una fonte, come pagina web, CSV, testo, ecc., Potrebbero esserci molte colonne vuote con esso. Deve richiedere molto tempo eliminare ciascuna colonna vuota una alla volta. Pertanto, alcuni di noi cercano modi semplici per risolvere questo problema. Questo articolo raccoglie alcuni suggerimenti complicati per aiutarti a eliminare rapidamente più colonne vuote.
Elimina più colonne vuote nel foglio di lavoro con la formula
Elimina più colonne vuote nel foglio di lavoro con codice VBA
Elimina più colonne vuote con un'intestazione utilizzando il codice VBA
Elimina più colonne vuote nel foglio di lavoro con la formula
In Excel, puoi applicare una formula per identificare se le colonne sono vuote o meno, quindi utilizzare il Riordina funzione per ordinare tutte le colonne vuote insieme e quindi eliminarle contemporaneamente. Per favore, fai come segue:
1. Aggiungi una nuova riga nella parte superiore dell'intervallo di dati, vedi screenshot:
2. Quindi inserisci la formula seguente nella cella A1, quindi trascina il quadratino di riempimento sul lato destro per applicare questa formula ad altre celle, verrà visualizzato un VERO se la colonna è vuota, altrimenti viene visualizzato un FALSO, vedi screenshot:
3. Quindi selezionare l'intervallo di dati inclusa la riga helper, quindi fare clic su Dati > Riordina, vedi screenshot:
4. Nel saltò fuori Riordina finestra di dialogo, fare clic Opzioni pulsante, di seguito Opzioni di ordinamento finestra di dialogo, selezionare Ordina da sinistra a destra opzione, vedi screenshot:
5. Clic OK per tornare al file Riordina finestra di dialogo, quindi selezionare Riga 1 dal Ordina per menu a discesa e selezionare Valori di cella da Ordina sezione, scegliere Dal più grande al più piccolo dal Ordina sezione, vedi screenshot:
6. Quindi, tutte le colonne vuote sono state ordinate a sinistra dei tuoi dati e ora, devi solo selezionare tutte le colonne e quindi fare clic con il tasto destro, scegliere Elimina per eliminare queste colonne vuote contemporaneamente, vedi screenshot:
Elimina più colonne vuote nel foglio di lavoro con codice VBA
Se desideri utilizzare la macro VBA, le cose vanno molto più facilmente. Il seguente codice VBA può aiutarti, per favore fai come segue:
1. Tieni premuto il altro + F11 chiavi in Excel e apre il file Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Modulie incolla la seguente macro nel file Moduli Finestra.
Codice VBA: elimina più colonne vuote nella selezione:
Sub DeleteEmptyColumns () 'Updateby Extendoffice Dim rng As Range Dim InputRng As Range xTitleId = "KutoolsforExcel" Set InputRng = Application.Selection Set InputRng = Application.InputBox ("Range:", xTitleId, InputRng.Address, Type: = 8) Application.ScreenUpdating = False For i = InputRng.Columns.Count To 1 Step -1 Set rng = InputRng.Cells (1, i) .EntireColumn If Application.WorksheetFunction.CountA (rng) = 0 Then rng.Delete End If Next Application.ScreenUpdating = True End Sub
3. premi il F5 tasto per eseguire questa macro, selezionare l'intervallo di lavoro necessario nella finestra di dialogo a comparsa. Vedi screenshot:
4. Clicchi OK, quindi tutte le colonne vuote nella selezione vengono rimosse. Vedi screenshot:
Elimina più colonne vuote nella selezione / foglio attivo / intera cartella di lavoro con una funzione utile
I Elimina righe e colonne nascoste (visibili) utilità di Kutools for Excel può aiutarti a rimuovere rapidamente più righe o colonne vuote contemporaneamente.
Dopo l'installazione Kutools for Excel, per favore fai come questo:
1. Clic Kutools > Elimina > Elimina righe e colonne nascoste (visibili), vedi screenshot:
2. Nel Elimina righe e colonne nascoste (visibili) finestra di dialogo, specificare l'ambito da cui si desidera applicare l'operazione Guarda dentro menu `A tendina. (Se scegli Nell'intervallo selezionato, è necessario selezionare prima un intervallo che si desidera utilizzare). Quindi selezionare colonne per Elimina tipo. E selezionare Colonne vuote da Tipo dettagliato. Vedi screenshot:
3. Quindi fare clic OK. E le colonne vuote sono state eliminate dall'intervallo selezionato. Vedi screenshot:
Elimina più colonne vuote con un'intestazione utilizzando il codice VBA
A volte, potresti voler eliminare tutte le colonne vuote che contengono solo un'intestazione nel foglio di lavoro, il seguente codice VBA può farti un favore, esegui i seguenti passaggi:
1. Tieni premuto il altro + F11 chiavi in Excel e apre il file Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Modulie incolla la seguente macro nel file Moduli Finestra.
Codice VBA: elimina tutte le colonne vuote con un'intestazione
Sub deleteblankcolwithheader()
'updateby Extendoffice
Dim xEndCol As Long
Dim I As Long
Dim xDel As Boolean
On Error Resume Next
xEndCol = Cells.Find("*", SearchOrder:=xlByColumns, SearchDirection:=xlPrevious).Column
If xEndCol = 0 Then
MsgBox "There is no data on """ & ActiveSheet.Name & """ .", vbExclamation, "Kutools for Excel"
Exit Sub
End If
Application.ScreenUpdating = False
For I = xEndCol To 1 Step -1
If Application.WorksheetFunction.CountA(Columns(I)) <= 1 Then
Columns(I).Delete
xDel = True
End If
Next
If xDel Then
MsgBox "All blank column(s) with only a header row have been deleted.", vbInformation, "Kutools for Excel"
Else
MsgBox "There are no Columns to delete as each one has more data (rows) than just a header.", vbExclamation, "Kutools for Excel"
End If
Application.ScreenUpdating = True
End Sub
3. Quindi premere F5 chiave per eseguire questo codice e verrà visualizzata una finestra di messaggio per ricordarti che le colonne vuote con l'intestazione verranno eliminate, vedi screenshot:
4. Quindi, fare clic sul pulsante OK, tutte le colonne vuote con solo l'intestazione nel foglio di lavoro corrente vengono eliminate contemporaneamente. Vedi screenshot:
Articoli più relativi:
- Elimina tutte le righe o le colonne nascoste in Excel
- Se hai una cartella di lavoro di grandi dimensioni con molte righe e colonne nascoste e ora i dati nascosti non sono disponibili, ti consigliamo di eliminarli tutti. Come potresti eliminarli rapidamente?
- Elimina tutte le immagini o altri oggetti in Excel
- Se si desidera eliminare tutte le immagini da Microsoft Excel, potrebbe essere necessario molto tempo selezionare ciascuna immagine ed eliminarle una alla volta. I seguenti trucchi possono facilitare il tuo lavoro per eliminare tutte le immagini.
- Elimina le righe in base al colore di sfondo in Excel
- Come potresti eliminare intere righe in base al colore di sfondo? In questo esempio, devo eliminare tutte le righe le cui celle sono state riempite con il colore di sfondo blu come mostrato nella seguente schermata. Con questo articolo, otterrai alcuni codici per eseguire questa attività in Excel.
- Elimina tutte le righe contenenti testo specifico all'interno di una colonna in Fogli Google
- Supponendo che tu abbia un intervallo di dati in un foglio google, ora vorresti eliminare le righe in base ai valori delle celle in una colonna. Ad esempio, voglio eliminare tutte le righe che contengono il testo "Completo" nella colonna C. In questo articolo, parlerò di come risolverlo nei fogli di Google.
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!