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

Sut i ddadmer celloedd a'u llenwi â gwerthoedd dyblyg yn Excel?

Os oes gennych daflen waith sy'n cynnwys nifer o gelloedd unedig, ac yn awr mae angen i chi eu dadmer a llenwi'r gwerthoedd gwreiddiol o'r celloedd unedig yn awtomatig fel y dangosir sgrinluniau canlynol. Sut allech chi ddelio â'r dasg hon yn gyflym?

Unmerge celloedd a'u llenwi â data dyblyg gyda Go To Special command

Unmerge celloedd a'u llenwi â data dyblyg gyda chod VBA

Unmerge celloedd a'u llenwi â data dyblyg gydag un clic


swigen dde glas saeth Unmerge celloedd a'u llenwi â data dyblyg gyda Go To Special command

Efo'r Ewch i Arbennig gorchymyn, gallwch ddadmer celloedd a llenwi'r gwerthoedd. Ond mae'r dull hwn ychydig yn drafferthus, gwnewch y camau canlynol:

1. Dewiswch y colofnau sydd wedi uno celloedd.

2. Cliciwch Hafan > Uno a Chanolfan > Celloedd Unmerge. Gweler y screenshot:

3. Ac mae'r celloedd unedig wedi bod yn ddigyfnewid a dim ond y gell gyntaf fydd yn cael ei llenwi â'r gwerthoedd gwreiddiol. Ac yna dewiswch yr ystod eto.

4. Yna cliciwch Hafan > Dod o Hyd i a Dewis > Ewch i Arbennig. Yn y Ewch i Arbennig blwch deialog, dewiswch Blanciau opsiwn. Gweler y screenshot:

5. Ac yna cliciwch OK, dewiswyd pob un o'r celloedd gwag yn yr ystod. Yna mewnbwn = ac yn y wasg Up allwedd saeth ar y bysellfwrdd. Gweler y screenshot:

6. Yna pwyswch Ctrl + Enter allweddi, mae'r holl gelloedd gwag wedi'u llenwi â'r data unedig gwreiddiol. Gweler y screenshot:


swigen dde glas saeth Unmerge celloedd a'u llenwi â data dyblyg gyda chod VBA

Gyda'r cod VBA canlynol, gallwch chi ddadmer y celloedd yn gyflym a llenwi'r gwerthoedd.

1. Daliwch i lawr y ALT + F11 allweddi, ac mae'n agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlauffenestr.

Is UnMergeSameCell () 'Upadateby Extendoffice
Dim Rng As Range, xCell As Range xTitleId = "KutoolsforExcel" Gosod WorkRng = Set Cais.Selection WorkRng = Application.InputBox ("Ystod", xTitleId, WorkRng.Address, Math: = 8) Application.ScreenUpdating = Cais Ffug.DisplayAlerts = Anghywir Ar Gyfer Pob Rng Mewn WorkRng Os Rng.MergeCells Yna Gyda Rng.MergeArea .UnMerge .Formula = Rng.Formula Diwedd Gyda Diwedd Os Y Cais Nesaf.DisplayAlerts = Gwir Gymhwysiad.ScreenUpdating = Gwir Ddiwedd Is

3. Yna pwyswch y F5 yn allweddol i redeg y cod hwn, arddangosir deialog ar gyfer dewis ystod i weithio gyda hi, gweler y screenshot:

4. Cliciwch OK, yna mae'r celloedd unedig wedi bod yn ddigyfnewid ac wedi'u llenwi'n awtomatig i lawr y gwerthoedd unedig gwreiddiol.


swigen dde glas saeth Unmerge celloedd a'u llenwi â data dyblyg gydag un clic

Efo'r Cell Unmerge cyfleustodau Kutools ar gyfer Excel, gallwch ddadmer celloedd a llenwi â data dyblyg gydag un clic, mae'r dull hwn yn syml iawn ac yn ddefnyddiol.

Kutools ar gyfer Excel : gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod

Ar ôl gosod Kutools ar gyfer Excel, gallwch wneud fel a ganlyn:

1. Dewiswch y colofnau rydych chi am eu dadwneud a llenwch y data.

2. Cliciwch Kutools > Uno a Hollti > Celloedd Unmerge a Gwerth Llenwi, gweler y screenshot:

3. Ac mae'r celloedd unedig wedi bod yn ddigyfnewid ac wedi'u llenwi â'r gwerthoedd dyblyg ar unwaith. Gweler sgrinluniau:


swigen dde glas saeth Unmerge celloedd a'u llenwi â data dyblyg gyda Kutools ar gyfer Excel

Kutools ar gyfer Excel: gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod. Dadlwythwch a threial am ddim Nawr!

Erthygl gysylltiedig:

Uno rhesi cyfagos gyda'r un data yn Excel


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a 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!
gwaelod officetab
sylwadau (44)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am y cod vba daduno a dyblyg
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Gwych!! Mae cod VBA yn gweithio'n berffaith. trwsio fy problem allforio i CSV :)
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Gweithiodd y VBA yn wych ac eithrio i mi ei ddefnyddio ar gyfer rhif 16 digid ac mae excel yn troi'r digid olaf i "0". Unrhyw awgrymiadau ar waith o gwmpas ar gyfer hynny?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'r ddau ddull yn gweithio'n berffaith iawn. Diolch :-)
Lleihawyd y sylw hwn gan y safonwr ar y wefan
OMG, rydych chi newydd arbed CYMAINT O AMSER i mi.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn yn arbennig. achubwr bywyd
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Arbedodd hyn oriau di-rif i mi, diolch yn fawr iawn am hyn. Sylwais ar un peth y deuthum ar ei draws gyda'r Go To Special Command a oedd yn fy nrysu am eiliad. Roedd angen i mi chwilio o fewn y ddogfen, ac mae'r swyddogaeth ctrl+enter yn copïo'r cod, ond nid y gwerth. Rwy'n argymell (os ydych chi eisiau chwilio fel gwnes i) i gopïo'r rhes a gafodd ei huno, gludo gwerthoedd arbennig. Bydd hyn yn cael gwared ar y cod ac yn gwneud testun chwiliadwy. Diolch eto am y tric anhygoel hwn.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Gwaith neis. Ond gweithiodd y dull Swyddogaeth ar y da cyntaf ar y 2288 llinell gyntaf, yna heb gamgymeriad na rhybudd, ni wnaeth llinellau heibio hynny. Mae gen i dros 6000 o linellau (rhesi). Os byddaf yn dewis unrhyw ystod y tu hwnt i'r llinell 2288 â llaw, nid yw'r dull Swyddogaeth yn gweithio. Yn anffodus, mae gwerthwr data yn uno llinellau yn y cyflenwad data Excel. Unrhyw awgrymiadau? Diolch am y wybodaeth wych.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae eich cyfarwyddiadau mor syml â phwerus !!! Mae arna i ginio i chi.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Syr fe wnaethoch chi achub fy mywyd, chi yw'r rheswm pam wnes i nod tudalen y dudalen hon :) !!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Cymwynasgar dros ben! Diolch!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Cymwynasgar iawn ..! Diolch yn fawr iawn.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Rydych chi wedi gwneud fy wythnos! 8)
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr mae hwn yn swydd ddefnyddiol iawn. Mae wir yn arbed llawer o amser i mi
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr am eich datrysiad...
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Anhygoel! Daliwch ati gyda'r gwaith da!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn yn ddefnyddiol iawn ond mae gen i un cwestiwn. A oes ffordd i addasu'r cod VBA i hepgor celloedd gwag sydd wedi'u cyfuno? Dim ond os oes gwerth heblaw'r wag y dymunaf i'r gell fod heb ei chyfuno a'i dyblygu. Rwy'n siŵr na fyddai'n cymryd llawer mwy na datganiad os/arall neu ddau, rwy'n rhy fud i'w wneud.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Esboniad neis iawn gyda sgrin lun.... diolch yn fawr...
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Wedi achub fy mywyd! Diolch yn fawr iawn!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Un Da. arbed llawer o amser Diolch
Nid oes unrhyw sylwadau wedi'u postio yma eto
Llwytho mwy o
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir