Sbarazzarsi di righe vuote dopo l'importazione

Ci sono numerosi momenti in cui Tom ha un foglio di lavoro importato da un altro programma in Excel, così da poter lavorare con i dati. L'importazione funziona bene, ma il processo di importazione aggiunge un sacco (decine ea volte centinaia) di righe aggiuntive senza i dati in loro. Dopo l'importazione Tom deve eliminare manualmente le righe in più, così da poter utilizzare il resto dei dati. Tom si chiede se c'è un modo per ottenere facilmente liberarsi di queste righe vuote.

Ci sono un certo numero di modi per affrontare questo problema. Il modo più semplice può essere quello di ordinare semplicemente i dati importati dalla colonna di vostra scelta. Tutte le righe che contengono nulla in quella colonna finiscono alle due alla fine o all'inizio dei dati (a seconda se si ordina in ordine crescente o decrescente) e si può facilmente eliminare le righe.

Ovviamente, quando si fa una specie in questo modo si potrebbe finire con i tuoi dati fuori di quella originale, ordine importato. Se avete bisogno dei vostri dati per essere in originale ordine, ma con le righe vuote rimossi: basta inserire una colonna a sinistra oa destra dei vostri dati, riempire con numeri sequenziali, eseguire l'ordinamento per qualsiasi colonna tranne quella colonna aggiunto, e quindi eliminare le righe che sono vuoti (con solo qualcosa nella colonna numerazione). È quindi possibile ordinare una seconda volta in base alla colonna numerazione ei dati saranno di nuovo in ordine originale.

Un altro approccio è quello di attenersi alla seguente procedura:

  1. Selezionare un'intera colonna.
  2. Premere F5. Excel visualizza la finestra di dialogo Vai a.
  3. Fare clic su Speciale. Excel visualizza la finestra di dialogo Vai speciale.
  4. Scegli Blanks e quindi fare clic su OK. Excel seleziona solo le celle della colonna che sono vuoti.
  5. Scegliere Elimina dal menu Modifica. Excel visualizza la finestra di dialogo Elimina.
  6. Scegli intera riga e quindi fare clic su OK.

Se si preferisce utilizzare una macro per eliminare le righe vuote, è possibile utilizzare qualcosa di simile a quanto segue:

DeleteEmptyRows Sub ()
Dim LastRow As Long
Dim J As Long

LastRow = ActiveSheet.UsedRange.Rows.Count + _
ActiveSheet.UsedRange.Rows (1) .row - 1
Application.ScreenUpdating = False
Per J = LastRow Per 1 Step -1
If Application.WorksheetFunction.CountA (righe (J)) = 0 Then
Righe (J) .Delete
End If
Successivo J
Application.ScreenUpdating = True
End Sub

Perché si vuole utilizzare una macro? Perché potrebbe essere necessario eliminare le righe vuote settimana dopo settimana. Basta mettere la macro nella cartella di lavoro personale e quindi è possibile accedervi quando ne hai bisogno.

Per ulteriori informazioni su questo argomento si possono trovare su queste pagine:

http://www.cpearson.com/Excel/deleting.htm#DeleteBlankRows
http://dmcritchie.mvps.org/excel/lastcell.htm

ExcelTips è la vostra fonte per la formazione Microsoft Excel conveniente. Questo suggerimento (7986) si applica a Microsoft Excel 97, 2000, 2002, e 2003. È possibile trovare una versione di questo suggerimento per l'interfaccia ribbon di Excel (Excel 2007 e versioni successive) qui: Come liberarsi di righe vuote dopo l'importazione.