Note: The other languages of the website are Google-translated. Back to English

Kako kopirati in prilepiti samo neprazne celice v Excelu?

Večina nas lahko trpi zaradi te težave, ko kopiramo seznam podatkov, ki vsebujejo nekaj praznih celic, in jih nato prilepimo v drug stolpec, bodo tudi prazne celice prilepljene. To je zelo moteče, če ne potrebujemo praznih prostorov in želimo prilepiti samo neprazne celice. Kako bi lahko v tem primeru hitro in priročno kopirali in prilepili samo prazne celice v Excelu? Tukaj je nekaj hitrih trikov za njegovo rešitev:

Kopirajte in prilepite samo neprazne celice z ukazom Pojdi na posebno

Kopirajte in prilepite samo prazne celice s funkcijo filtra

Kopirajte in prilepite samo neprazne celice z Array Formula

Kopirajte in prilepite samo neprazne celice s kodo VBA

Kopirajte in prilepite samo neprazne celice s programom Kutools za Excel dobra ideja3


puščica modri desni mehurček Kopirajte in prilepite samo neprazne celice z ukazom Pojdi na posebno

Z Pojdi na posebno ukaz, lahko najprej izberete vse podatke, nato pa jih kopirate in prilepite na drugo mesto.

1. Izberite seznam podatkov, ki jih želite uporabiti.

doc-copy-only-nonblanks1

2. Nato kliknite Home > Poiščite in izberite > Pojdi na posebno, glej posnetek zaslona:

doc-copy-only-nonblanks1

3. v Pojdi na posebno pogovorno okno, preverite Konstante možnost, glej posnetek zaslona:

doc-copy-only-nonblanks1

4. Nato kliknite OK, in na seznamu so bile izbrane samo celice vrednosti.

doc-copy-only-nonblanks1

5. Nato podatke kopirajte in prilepite na želeno mesto. Prilepljene so bile le vrednosti, ki niso prazne. Oglejte si posnetek zaslona:

doc-copy-only-nonblanks1

Opombe: Ta metoda je na voljo samo za konstante, ne uporablja se za celice formule.


puščica modri desni mehurček Kopirajte in prilepite samo prazne celice s funkcijo filtra

O filter Funkcija vam lahko pomaga najprej filtrirati neprazne celice, nato pa jih lahko po potrebi kopirate in prilepite v druge celice.

2. Kliknite datum > filter, glej posnetek zaslona:

doc kopiraj samo prazne6

3. Nato kliknite spustni gumb v desnem kotu celice na izbranem seznamu in počistite polje Blanks pod spustnim menijem. Oglejte si posnetek zaslona:
doc-copy-only-nonblanks1

4. In nato kliknite OK, so bile vse neprazne celice filtrirane, kot je prikazano na sliki spodaj:

doc-copy-only-nonblanks1

5. Končno lahko kopirajte filtrirane podatke in jih prilepite na poljubno mesto.

Opombe: Tako vrednosti začnejo učinkovati tako vrednosti kot formule.


Naenkrat izberite prazne celice

Kliknite za brezplačen preizkus vseh funkcij v 30 dnevi!
doc kutools izbere neprazne celice

puščica modri desni mehurček Kopirajte in prilepite samo neprazne celice z Array Formula

Če želite kopirati in prilepiti samo prazne celice, lahko uporabite tudi naslednjo formulo matrike.

1. Poleg svojih podatkov v prazno celico vnesite naslednjo formulo:

=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-nonblanks1

Opombe: V zgornji formuli, A1: A15 je seznam podatkov, ki ga želite uporabiti. Lahko ga spremenite po svojih željah.

2. Nato pritisnite Shift + Ctrl + Enter nato izberite celico B1 in povlecite ročico za polnjenje do obsega, ki ga želite vsebovati v tej formuli, in vse neprazne vrednosti celice so bile izvlečene. Oglejte si posnetek zaslona:

doc-copy-only-nonblanks1

3. Ker so formule, jih kopirajte na drugo mesto in jih kopirajte in prilepite kot vrednosti.

Opombe: Ta formula je na voljo samo za konstante, ne velja za celice formule.


puščica modri desni mehurček Kopirajte in prilepite samo neprazne celice s kodo VBA

Če vas zanima koda VBA, lahko za dokončanje te naloge izvedete naslednjo kodo.

1. Držite tipko ALT + F11 in odpre tipko Okno Microsoft Visual Basic for Applications.

2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Okno modula.

Koda VBA: Kopirajte in prilepite samo neprazne celice v Excelu

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. Nato pritisnite F5 tipko za zagon te kode, se prikaže pozivno polje, ki vas opomni, da izberete obseg podatkov, ki ga želite uporabiti. Oglejte si posnetek zaslona:

doc-copy-only-nonblanks1

4. In nato kliknite OK, se bo odprlo novo pozivno polje, v katerem boste lahko izbrali celico za vnos podatkov.

doc-copy-only-nonblanks1

5. klik OK Če želite končati to kodo, so na vaš določen položaj prilepljene samo vrednosti, ki niso prazne.

Opombe: Ta koda je na voljo samo stalnicam.


puščica modri desni mehurček Kopirajte in prilepite samo neprazne celice s programom Kutools za Excel

Ali obstaja kakšen lažji način kot zgoraj? Seveda, Kutools za Excel's Izberite Nonblank CellPripomoček s vam lahko pomaga najprej izbrati prazne celice, nato pa jih kopirati in prilepiti.

Kutools za Excel, z več kot 300 priročne funkcije, vam olajša delo. 

po brezplačna namestitev Kutools za Excel, naredite spodaj:

1. Izberite obseg celic in kliknite Kutools > Izberite > Izberite Neprazne celice. Oglejte si posnetek zaslona:
doc izberite prazno celico 2

2. Nato izberete neprazne celice in pritisnite Ctrl + C če jih želite kopirati, nato izberite celico, v katero želite prikazati pasetirani rezultat, pritisnite Ctrl + V da prilepite izbrane neprazne celice. Oglejte si posnetek zaslona:
doc izberite prazno celico 3

puščica modri desni mehurček Kopirajte in prilepite samo neprazne celice

Kutools za Excel: 300+ funkcij, ki jih morate imeti v Excelu, 30-dnevni brezplačni preskus od tukaj

Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%

  • Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
  • Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
  • Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
  • Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
  • Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
  • Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
  • Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
  • Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
  • Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.
zavihek kte 201905

Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
dno pisarniške mize
Komentarji (11)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
hvala za super formulo: =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15"),ROW($A$1: $A$15)),VRSTIC($B$1:B1)))))
Ta komentar je moderator na spletnem mestu minimiziral
Ta formula je popolnoma neverjetna, hvala. Na žalost se zlomi, ko poskušate kopirati z drugega lista, ali obstaja rešitev?
Ta komentar je moderator na spletnem mestu minimiziral
popravite reference pri uporabi formule med različnimi listi. Deluje. =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX('Seznam zapadlih artiklov'!A:A,SMALL(IF('Seznam zapadlih artiklov'!A$1:A$1500"), ROW('Seznam zapadlih artiklov'!A$1:A$1500)),ROWS('Seznam zapadlih predmetov'!B$1:B2)))))
Ta komentar je moderator na spletnem mestu minimiziral
Ali obstaja način, da makro deluje pri sklicevanju med različnimi listi?
Ta komentar je moderator na spletnem mestu minimiziral
Živjo #abc Uporabil sem vašo formulo =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX('Seznam zapadlih artiklov'!A:A,SMAL L(IF('Seznam zapadlih artiklov' !A$1:A$15 00"",ROW('Seznam zapadlih artiklov'!A$1:A$15 00)),ROWS('Seznam zapadlih predmetov'!B$1:B2)) ))) Podatke imam v en delovni list in želite te podatke kopirati v drug delovni list (isti dokument). Lahko pomagate?
Ta komentar je moderator na spletnem mestu minimiziral
Ta orodja izbrišejo prazne celice in stisnejo vrstico. Želim, da se ohrani oblika, vključno s presledki, vendar ne želim, da prazne celice prepišejo celice, ki vsebujejo obstoječe podatke. tj. želim dodati nove, kopirane celice v stolpcu v obstoječi stolpec.
Ta komentar je moderator na spletnem mestu minimiziral
Ko izberem in kopiram samo celice, ki niso prazne, kako jih lahko prilepim nekam drugam, pri čemer ohranim enake prazne obsege med njimi?
Ta komentar je moderator na spletnem mestu minimiziral
Hvala za odlične nasvete! Uporabljam funkcijo Find & Select, vendar to traja dolgo, ker moja preglednica vsebuje 70 stolpcev in 450 vrstic. Ali obstaja način za pospešitev postopka?
Ta komentar je moderator na spletnem mestu minimiziral
Ne deluje na številkah !!!
Dobro deluje na besedilo!!!
Prosim vodnik
Ta komentar je moderator na spletnem mestu minimiziral
Formula matrike dobro deluje na besedilu
vendar ne delajte na številkah.
Ta komentar je moderator na spletnem mestu minimiziral
=Filter(A:A,A:A<>"")
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL