Vai al contenuto principale

Come copiare e incollare solo celle non vuote in Excel?

La maggior parte di noi potrebbe soffrire di questo problema, quando copiamo un elenco di dati che contengono alcune celle vuote e quindi li incolliamo in un'altra colonna, anche le celle vuote verranno incollate. Questo è molto fastidioso quando non abbiamo bisogno degli spazi vuoti e vogliamo incollare solo celle non vuote. In questo caso, come possiamo copiare e incollare solo celle non vuote in Excel in modo rapido e conveniente? Ecco alcuni trucchi rapidi per risolverlo:

Copia e incolla solo celle non vuote con il comando Vai a speciale

Copia e incolla solo celle non vuote con la funzione Filtro

Copia e incolla solo celle non vuote con Formula di matrice

Copia e incolla solo celle non vuote con codice VBA

Copia e incolla solo celle non vuote con Kutools per Excel buona idea 3


freccia blu freccia destra Copia e incolla solo celle non vuote con il comando Vai a speciale

Grazie alla Vai a speciale comando, puoi prima selezionare tutti i dati, quindi copiarli e incollarli in un'altra posizione.

1. Seleziona l'elenco dei dati che desideri utilizzare.

doc-copy-only-non-blanks1

2. Quindi fare clic Casa > Trova e seleziona > Vai a speciale, vedi screenshot:

doc-copy-only-non-blanks1

3. Nel Vai a speciale finestra di dialogo, controllare Costante opzione, vedi screenshot:

doc-copy-only-non-blanks1

4. Quindi fare clic OKe nell'elenco sono state selezionate solo le celle dei valori.

doc-copy-only-non-blanks1

5. Quindi copia e incolla i dati nella posizione che desideri. E sono stati incollati solo i valori delle celle non vuote. Vedi screenshot:

doc-copy-only-non-blanks1

Note:: Questo metodo è disponibile solo per le costanti, non viene applicato alle celle della formula.


freccia blu freccia destra Copia e incolla solo celle non vuote con la funzione Filtro

I Filtro La funzione può aiutarti a filtrare prima le celle non vuote, quindi puoi copiarle e incollarle in altre celle di cui hai bisogno.

2. Clic Dati > Filtro, vedi screenshot:

doc copia solo non vuoti 6

3. Quindi fare clic sul pulsante a discesa nell'angolo destro della cella nell'elenco selezionato e deselezionare il Blanks opzione nel menu a discesa. Vedi screenshot:
doc-copy-only-non-blanks1

4. E poi clicca OK, tutte le celle non vuote sono state filtrate come mostrato nella seguente schermata:

doc-copy-only-non-blanks1

5. Alla fine, puoi copiare i dati filtrati e incollarli in qualsiasi posizione di cui hai bisogno.

Note:: Sia i valori che le formule vengono applicati in questo modo.


Seleziona contemporaneamente celle non vuote

Fai clic per provare gratuitamente tutte le funzionalità in 30 giorni!
doc kutools seleziona celle non vuote

freccia blu freccia destra Copia e incolla solo celle non vuote con Formula di matrice

Per copiare e incollare solo le celle non vuote, puoi anche applicare la seguente formula di matrice.

1. Oltre ai tuoi dati, inserisci la seguente formula in una cella vuota:

=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))

doc-copy-only-non-blanks1

Note:: Nella formula sopra, A1: A15 è l'elenco di dati che desideri utilizzare. Puoi modificarlo in base alle tue necessità.

2. Quindi premere Maiusc + Ctrl + Invio chiavi insieme, quindi selezionare la cella B1 e trascinare il quadratino di riempimento sull'intervallo in cui si desidera contenere questa formula e tutti i valori delle celle non vuote sono stati estratti. Vedi screenshot:

doc-copy-only-non-blanks1

3. Poiché sono formule, quando le copi in un altro posto, dovresti copiarle e incollarle come valori.

Note:: Questa formula sarà disponibile solo per le costanti, non applicata alle celle della formula.


freccia blu freccia destra Copia e incolla solo celle non vuote con codice VBA

Se sei interessato al codice VBA, puoi eseguire il codice seguente per completare questa attività.

1. Tieni premuto il ALT + F11 chiavi e apre il file Finestra di Microsoft Visual Basic, Applications Edition.

2. Clic inserire > Modulie incolla il codice seguente nel file Finestra del modulo.

Codice VBA: copia e incolla solo celle non vuote in Excel

Sub PasteNotBlanks()
'Update 20140325
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
If InputRng.Columns.Count > 1 Then
    MsgBox "Please select one column."
    Exit Sub
End If
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
InputRng.SpecialCells(xlCellTypeConstants).Copy Destination:=OutRng.Range("A1")
End Sub

3. Quindi premere F5 chiave per eseguire questo codice, verrà visualizzata una finestra di messaggio per ricordare di selezionare l'intervallo di dati che si desidera utilizzare. Vedi screenshot:

doc-copy-only-non-blanks1

4. E poi clicca OK, verrà visualizzata un'altra finestra di messaggio per consentire di scegliere una cella in cui inserire i dati.

doc-copy-only-non-blanks1

5. Clicchi OK per completare questo codice e solo i valori delle celle non vuote sono stati incollati nella posizione specificata.

Note:: Questo codice è disponibile solo per le costanti.


freccia blu freccia destra Copia e incolla solo celle non vuote con Kutools per Excel

C'è un modo molto più semplice di quello sopra? Ovviamente, Kutools for Excel's Seleziona Cella non vuotaL'utilità di s può aiutarti a selezionare prima le celle non vuote, quindi copiarle e incollarle.

Kutools for Excel, con oltre 300 funzioni utili, rende il tuo lavoro più facile. 

Dopo shavasana, sedersi in silenzio; saluti; installazione gratuita Kutools per Excel, per favore fai come di seguito:

1. Selezionare l'intervallo di celle e fare clic su Kutools > Seleziona > Seleziona Celle non vuote. Vedi screenshot:
doc seleziona cella non vuota 2

2. Quindi le celle non vuote sono selezionate, premere Ctrl + C per copiarli, quindi andare a selezionare una cella in cui si desidera produrre il risultato passato, premere Ctrl + V per incollare le celle selezionate non vuote. Vedi screenshot:
doc seleziona cella non vuota 3

freccia blu freccia destra Copia e incolla solo celle non vuote

Kutools per Excel: oltre 300 funzioni che devi avere in Excel, 30 giorni di prova gratuita da qui

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

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...

Descrizione


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!
Comments (11)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
=Filter(A:A,A:A<>"")
This comment was minimized by the moderator on the site
Array formula Works fine on text
but don't work on numbers.
This comment was minimized by the moderator on the site
Not working on Numbers !!!
Works fine on text !!!
Please guide
This comment was minimized by the moderator on the site
Thanks for the great tips! I am using the Find & Select feature, but it's taking a long time because my spreadsheet contains 70 columns and 450k rows. Is there a way to fasten the process?
This comment was minimized by the moderator on the site
When i select and copy only non-blank cells, how can i then paste it somewhere else with keeping the same empty ranges between them?
This comment was minimized by the moderator on the site
These tools delete the blank cells and compress the row. I want the format to be retained, including the spaces, but I do not want empty cells to overwrite cells containing existing data. i.e. I want to add the new, copied, cells in a column onto an existing column.
This comment was minimized by the moderator on the site
Hi #abc I have used your formula =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX('List of Overdue items'!A:A,SMAL L(IF('List of Overdue items'!A$1:A$15 00"",ROW('List of Overdue items'!A$1:A$15 00)),ROWS('List of Overdue items'!B$1:B2)) ))) I have data in one Worksheet and want to copy that data into another worksheet (same doc). Can you help?
This comment was minimized by the moderator on the site
Is there a way to make the macro work when referencing between different sheets?
This comment was minimized by the moderator on the site
This formula is absolutely amazing, thank you. Unfortunately it breaks when trying to copy from another sheet, is there a workaround?
This comment was minimized by the moderator on the site
correct the references when using the formula between different sheets. It does work. =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX('List of Overdue items'!A:A,SMALL(IF('List of Overdue items'!A$1:A$1500"",ROW('List of Overdue items'!A$1:A$1500)),ROWS('List of Overdue items'!B$1:B2)))))
This comment was minimized by the moderator on the site
thanks for the super formula: =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations