Jak sloučit buňky a vyplnit duplicitní hodnoty v aplikaci Excel?
Pokud máte list, který obsahuje mnoho sloučených buněk, a nyní je musíte zrušit a automaticky vyplnit původní hodnoty ze sloučených buněk, jak je znázorněno na následujících obrázcích. Jak jste se mohli rychle vyrovnat s tímto úkolem?
 |
 |
 |
Oddělte buňky a vyplňte duplicitní data pomocí příkazu Přejít na speciální
Oddělte buňky a vyplňte duplicitní data pomocí kódu VBA
Oddělte buňky a jedním kliknutím vyplňte duplicitní data
Oddělte buňky a vyplňte duplicitní data pomocí příkazu Přejít na speciální
S Přejít na speciální příkaz, můžete buňky sloučit a vyplnit hodnoty. Ale tato metoda je poněkud problematická, proveďte následující kroky:
1. Vyberte sloupce, které mají sloučené buňky.
2, klikněte Domů > Sloučit a vycentrovat > Sloučit buňky. Viz snímek obrazovky:
3. A sloučené buňky byly sloučeny a pouze první buňka bude vyplněna původními hodnotami. A poté znovu vyberte rozsah.
4. Pak klikněte na tlačítko Domů > Najít a vybrat > Přejít na speciální. V Přejít na speciální dialogové okno vyberte Blanks volba. Viz screenshot:
5. A pak klikněte na tlačítko OK, byly vybrány všechny prázdné buňky v rozsahu. Poté zadejte = a stiskněte Up šipka na klávesnici. Viz screenshot:
6. Pak stiskněte tlačítko Ctrl + Enter klíče, všechny prázdné buňky byly vyplněny původními sloučenými daty. Viz screenshot:
Oddělte buňky a vyplňte duplicitní data pomocí kódu VBA
S následujícím kódem VBA můžete rychle zrušit sloučení buněk a vyplnit hodnoty.
1. Podržte ALT + F11 klíče a otevře se Microsoft Visual Basic pro aplikace okno.
2, klikněte Vložit > Modula vložte následující makro do souboru Modulokno.
Sub UnMergeSameCell () 'Upadateby Extendoffice
Dim Rng As Range, xCell As Range xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox ("Range", xTitleId, WorkRng.Address, Type: = 8) Application.ScreenUpdating = False Application.DisplayAlerts = False for each Rng In WorkRng If Rng.MergeCells Then With Rng.MergeArea .UnMerge .Formula = Rng.Formula End With End If Next Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub
3. Poté stiskněte tlačítko F5 klíč ke spuštění tohoto kódu, zobrazí se dialogové okno pro výběr rozsahu pro práci, viz screenshot:
4. klikněte OK, poté byly sloučené buňky sloučeny a automaticky vyplněny původní sloučené hodnoty.
Oddělte buňky a jedním kliknutím vyplňte duplicitní data
S Sloučit buňku užitečnost Kutools pro Excel„Můžete sloučit buňky a vyplnit duplicitní data jedním kliknutím, tato metoda je velmi jednoduchá a praktická.
| Kutools pro Excel : s více než 300 praktickými doplňky Excel, můžete si je vyzkoušet bez omezení do 30 dnů. |
Po instalaci Kutools pro Excel, můžete postupovat následovně:
1. Vyberte sloupce, které chcete sloučit, a vyplňte data.
2, klikněte Kutools > Sloučit a rozdělit > Sloučit buňky a vyplnit hodnotu, viz screenshot:
3. A sloučené buňky byly sloučeny a naplněny duplicitními hodnotami najednou. Zobrazit snímky obrazovky:
|
|
|
Sloučení buněk a vyplnění duplicitních dat pomocí Kutools pro Excel
Související článek:
Sloučit sousední řádky se stejnými daty v aplikaci Excel
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
