Skip i'r prif gynnwys

Sut i gopïo a gludo celloedd nad ydynt yn wag yn Excel yn unig?

Efallai y bydd y broblem hon yn dioddef i'r mwyafrif ohonom, pan fyddwn yn copïo rhestr o ddata sy'n cynnwys rhai celloedd gwag, ac yna'n eu pastio i golofn arall, bydd y celloedd gwag hefyd yn cael eu pastio hefyd. Mae hyn yn annifyr iawn pan nad oes angen y bylchau arnom ac eisiau pastio celloedd nad ydynt yn wag yn unig. Yn yr achos hwn, sut y gallem gopïo a gludo dim ond celloedd nad ydynt yn wag yn Excel yn gyflym ac yn gyfleus? Dyma rai triciau cyflym i chi eu datrys:

Copïwch a gludwch gelloedd nad ydynt yn wag yn unig gyda gorchymyn Ewch i Arbennig

Copïwch a gludwch gelloedd nad ydynt yn wag yn unig sydd â nodwedd Hidlo

Copïwch a gludwch gelloedd nad ydynt yn wag yn unig gyda Fformiwla Array

Copïwch a gludwch gelloedd nad ydynt yn wag yn unig gyda chod VBA

Copïwch a gludwch gelloedd nad ydynt yn wag yn unig gyda Kutools ar gyfer Excel syniad da3


swigen dde glas saeth Copïwch a gludwch gelloedd nad ydynt yn wag yn unig gyda gorchymyn Ewch i Arbennig

Efo'r Ewch i Arbennig gorchymyn, gallwch ddewis yr holl ddata yn gyntaf, ac yna eu copïo a'u pastio i leoliad arall.

1. Dewiswch eich rhestr o ddata rydych chi am ei ddefnyddio.

doc-copi-yn-unig-nonblanks1

2. Yna cliciwch Hafan > Dod o Hyd i a Dewis > Ewch i Arbennig, gweler y screenshot:

doc-copi-yn-unig-nonblanks1

3. Yn y Ewch i Arbennig blwch deialog, gwirio Cwnstabl opsiwn, gweler y screenshot:

doc-copi-yn-unig-nonblanks1

4. Yna cliciwch OK, a dim ond y celloedd gwerth sydd wedi'u dewis ar y rhestr.

doc-copi-yn-unig-nonblanks1

5. Ac yna copïwch a gludwch y data i leoliad rydych chi ei eisiau. A dim ond y gwerthoedd celloedd nad ydynt yn wag sydd wedi'u pastio. Gweler y screenshot:

doc-copi-yn-unig-nonblanks1

Nodyn: Mae'r dull hwn ar gael ar gyfer y cysonion yn unig, nid yw'n cael ei gymhwyso i'r celloedd fformiwla.


swigen dde glas saeth Copïwch a gludwch gelloedd nad ydynt yn wag yn unig sydd â nodwedd Hidlo

Mae adroddiadau Hidlo gall nodwedd eich helpu i hidlo'r celloedd nad ydyn nhw'n wag yn gyntaf, ac yna gallwch chi eu copïo a'u pastio i gelloedd eraill yn ôl yr angen.

2. Cliciwch Dyddiad > Hidlo, gweler y screenshot:

copi doc yn unig nonblanks6

3. Yna cliciwch y botwm gwympo ar gornel dde'r gell yn y rhestr a ddewiswyd, a dad-diciwch y Blanciau opsiwn o dan y gwymplen. Gweler y screenshot:
doc-copi-yn-unig-nonblanks1

4. Ac yna cliciwch OK, mae'r holl gelloedd nad ydynt yn wag wedi'u hidlo allan fel y dangosir y llun a ganlyn:

doc-copi-yn-unig-nonblanks1

5. O'r diwedd, gallwch chi gopïo'r data wedi'i hidlo a'u pastio i unrhyw leoliad sydd ei angen arnoch chi.

Nodyn: Daw gwerthoedd a fformwlâu i rym trwy ddefnyddio fel hyn.


Dewiswch gelloedd nonblank ar unwaith

Cliciwch i gael treial llawn am ddim mewn 30 diwrnod!
mae doc kutools yn dewis celloedd nad ydynt yn wag

swigen dde glas saeth Copïwch a gludwch gelloedd nad ydynt yn wag yn unig gyda Fformiwla Array

I gopïo a gludo'r celloedd nad ydynt yn wag yn unig, gallwch hefyd gymhwyso'r fformiwla arae ganlynol.

1. Heblaw am eich data, rhowch y fformiwla ganlynol i gell wag:

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

doc-copi-yn-unig-nonblanks1

Nodyn: Yn y fformiwla uchod, A1: A15 yw'r rhestr ddata rydych chi am ei defnyddio. Gallwch chi ei newid i'ch angen.

2. Yna pwyswch Shift + Ctrl + Enter allweddi gyda'i gilydd, ac yna dewiswch gell B1, a llusgwch y ddolen llenwi i'r ystod rydych chi am gynnwys y fformiwla hon, ac mae'r holl werthoedd celloedd nad ydyn nhw'n wag wedi'u tynnu. Gweler y screenshot:

doc-copi-yn-unig-nonblanks1

3. Gan mai fformiwlâu ydyn nhw, pan fyddwch chi'n eu copïo i le arall, dylech chi eu copïo a'u pastio fel gwerthoedd.

Nodyn: Mae'r fformiwla hon ar gael ar gyfer y cysonion yn unig, heb ei chymhwyso i'r celloedd fformiwla.


swigen dde glas saeth Copïwch a gludwch gelloedd nad ydynt yn wag yn unig gyda chod VBA

Os oes gennych ddiddordeb mewn cod VBA, gallwch weithredu'r cod canlynol i orffen y dasg hon.

1. Daliwch i lawr y ALT + F11 allweddi, ac mae'n agor y Ffenestr Microsoft Visual Basic for Applications.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Ffenestr Modiwl.

Cod VBA: Copïwch a gludwch gelloedd nad ydynt yn wag yn Excel yn unig

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. Yna pwyswch F5 yn allweddol i redeg y cod hwn, bydd blwch prydlon yn ymddangos i'ch atgoffa o ddewis yr ystod ddata rydych chi am ei defnyddio. Gweler y screenshot:

doc-copi-yn-unig-nonblanks1

4. Ac yna cliciwch OK, bydd blwch prydlon arall yn popio allan i adael i chi ddewis cell i roi'r data.

doc-copi-yn-unig-nonblanks1

5. Cliciwch OK i orffen y cod hwn, a dim ond y gwerthoedd celloedd nad ydynt yn wag sydd wedi'u pastio i'ch safle penodedig.

Nodyn: Mae'r cod hwn ar gael i'r cysonion yn unig.


swigen dde glas saeth Copïwch a gludwch gelloedd nad ydynt yn wag yn unig gyda Kutools ar gyfer Excel

A oes unrhyw ffordd haws o lawer nag uchod? Wrth gwrs, Kutools ar gyfer Excel's Dewiswch Nonblank Cells gall cyfleustodau eich helpu i ddewis y celloedd nonblank yn gyntaf, ac yna eu copïo a'u pastio.

Kutools ar gyfer Excel, gyda mwy na 300 swyddogaethau defnyddiol, yn gwneud eich swyddi yn haws. 

Ar ôl gosod am ddim Kutools ar gyfer Excel, gwnewch fel isod:

1. Dewiswch yr ystod celloedd, a chlicio Kutools > dewiswch > Dewiswch Gelloedd Nonblank. Gweler y screenshot:
doc dewis nonblank cell 2

2. Yna dewisir y celloedd nonblank, pwyswch Ctrl + C i'w copïo, yna ewch i ddewis cell lle rydych chi am allbwn y canlyniad sydd wedi'i basio, pwyswch Ctrl + V i gludo celloedd dethol nonblank. Gweler y screenshot:
doc dewis nonblank cell 3

swigen dde glas saeth Copïwch a gludwch gell nad yw'n wag yn unig

Kutools ar gyfer Excel: 300+ swyddogaethau y mae'n rhaid i chi eu cael yn Excel, Treial am ddim 30 diwrnod o'r fan hon

Offer Cynhyrchiant Swyddfa Gorau

🤖 Kutools AI Aide: Chwyldro dadansoddi data yn seiliedig ar: Cyflawniad Deallus   |  Cynhyrchu Cod  |  Creu Fformiwlâu Personol  |  Dadansoddi Data a Chynhyrchu Siartiau  |  Invoke Swyddogaethau Kutools...
Nodweddion Poblogaidd: Darganfod, Amlygu neu Adnabod Dyblygiadau   |  Dileu Rhesi Gwag   |  Cyfuno Colofnau neu Gelloedd heb Colli Data   |   Rownd heb Fformiwla ...
Super-edrych: VLookup Meini Prawf Lluosog    VLookup Gwerth Lluosog  |   VLookup Ar Draws Taflenni Lluosog   |   Edrych Niwlog ....
Rhestr gwympo Uwch: Creu Rhestr Gollwng yn Gyflym   |  Rhestr Gollwng Dibynnol   |  Rhestr Gollwng Aml-ddewis ....
Rheolwr Colofn: Ychwanegu Nifer Penodol o Golofnau  |  Symud Colofnau  |  Toglo Statws Gwelededd Colofnau Cudd  |  Cymharwch Ystodau a Cholofnau ...
Nodweddion dan Sylw: Ffocws ar y Grid   |  Golwg Dylunio   |   Bar Fformiwla Mawr    Rheolwr Llyfr Gwaith a Thaflen   |  Llyfrgell Adnoddau (Testun Auto)   |  Dewiswr Dyddiad   |  Cyfuno Taflenni Gwaith   |  Amgryptio/Dadgryptio Celloedd    Anfon E-byst trwy Restr   |  Hidlo Super   |   Hidlo Arbennig (hidlo mewn print trwm/italig/strikethrough...) ...
15 Set Offer Gorau12 Testun offer (Ychwanegu Testun, Dileu Cymeriadau,...)   |   50 + Siart Mathau (Siart Gantt,...)   |   40+ Ymarferol Fformiwlâu (Cyfrifwch oedran yn seiliedig ar ben-blwydd,...)   |   19 mewnosod offer (Mewnosod Cod QR, Mewnosod Llun o'r Llwybr,...)   |   12 Trosi offer (Rhifau i Eiriau, Trosi arian cyfred,...)   |   7 Uno a Hollti offer (Rhesi Cyfuno Uwch, Celloedd Hollt,...)   |   ... a mwy

Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser.  Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...

Disgrifiad


Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
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