Přejít k hlavnímu obsahu

Jak obarvit alternativní řádky pro sloučené buňky v aplikaci Excel?

Je velmi užitečné formátovat alternativní řádky s jinou barvou ve velkých datech, abychom mohli data naskenovat, ale někdy mohou být ve vašich datech sloučené buňky. Chcete-li zvýraznit řádky střídavě jinou barvou pro sloučené buňky, jak je znázorněno na obrázku níže, jak byste mohli vyřešit tento problém v aplikaci Excel?

Vybarvěte alternativní řádky pro sloučené buňky pomocí podmíněného formátování

Vybarvěte alternativní řádky pro sloučené buňky pomocí kódu VBA


Vybarvěte alternativní řádky pro sloučené buňky pomocí podmíněného formátování

V Excelu je výkonná funkce -Podmíněné formátování vám může pomoci dosáhnout tohoto úkolu co nejrychleji, proveďte prosím následující kroky:

1. Vyberte oblast dat, která obsahuje sloučené buňky, které chcete střídavě vybarvit, a potom klepněte Domů > Podmíněné formátování > Nové pravidlo, viz screenshot:

2. Ve vyskočené Nové pravidlo pro formátování dialogové okno, proveďte následující operace:

  • vybrat Pomocí vzorce určete, které buňky chcete formátovat možnost z nabídky Vyberte typ pravidla seznam;
  • A pak zadejte tento vzorec: =MOD(COUNTA($A$2:$A2),2)=0 do Formátovat hodnoty, kde je tento vzorec pravdivý Textové pole.
  • Poznámka: A2 je první buňka vašeho rozsahu dat.

3. Potom klepněte na tlačítko Formát pro přechod na Formát buněk dialogové okno. Pod Vyplnit vyberte jednu barvu, kterou chcete zvýraznit řádky, viz snímek obrazovky:

4, klikněte OK > OK zavřete dialogová okna a řádky se sloučenými buňkami se vyplní vámi zadanou barvou, viz snímek obrazovky:

5. Pokračujte kliknutím Domů > Podmíněné formátování > Nové pravidlo k otevření Nové pravidlo pro formátování dialogové okno, proveďte následující operace:

  • vybrat Pomocí vzorce určete, které buňky chcete formátovat možnost z nabídky Vyberte typ pravidla seznam;
  • A pak zadejte tento vzorec: =MOD(COUNTA($A$2:$A2),2)=1 do Formátovat hodnoty, kde je tento vzorec pravdivý Textové pole.
  • Potom klepněte na tlačítko Formát vyberte jinou barvu, kterou chcete zvýraznit řádky.
  • Poznámka: A2 je první buňka vašeho rozsahu dat.

6. A pak klikněte OK > OK zavřete dialogová okna a nyní můžete vidět, že vybraný rozsah dat byl stínován dvěma různými barvami střídavě na základě sloučených buněk, jak je uvedeno níže:


Vybarvěte alternativní řádky pro sloučené buňky pomocí kódu VBA

Kromě normálního podmíněného formátování můžete také použít kód VBA pro snadné použití alternativních barev řádků pro sloučené buňky.

1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2. Potom klepněte na tlačítko Vložit > Modula vložte následující kód do Modul okno.

Kód VBA: Vybarvěte alternativní řádky pro sloučené buňky

Sub Kutools_AlternateColor()
'Update by ExtendOffice
Dim xRg As Range
Dim xCRg As Range
Dim xIRg As Range
Dim xC1, xC2 As Integer
Dim xR1 As Integer
Dim xCnt As Long
Dim xLColor, xDCR1, xDCR2 As Long
Set xRg = Application.InputBox("Please select the data range:", "KutoolsforExcel", "", Type:=8)
If TypeName(xRg) = "Nothing" Then Exit Sub
Set xCRg = Application.InputBox("Please select the column with the merged cells:", "KutoolsforExcel", "", Type:=8)
If TypeName(xCRg) = "Nothing" Then Exit Sub
Set xIRg = Intersect(xRg, xCRg)
If xIRg Is Nothing Then
MsgBox "the data range doesn't contain merged cells"
Exit Sub
End If
xC1 = xRg.Column
xC2 = xIRg.Column
xR1 = xRg.Row
xLColor = RGB(221, 235, 247)
xDCR1 = RGB(221, 235, 247)
xDCR2 = RGB(250, 232, 222)
xRw = 0
Do
xLColor = xDCR1 + xDCR2 - xLColor
xCnt = Cells(xRw + xR1, xC2).MergeArea.Rows.Count
Cells(xRw + xR1, xC1).Resize(xCnt, xRg.Columns.Count).Interior.Color = xLColor
xRw = xRw + xCnt
Loop While xRw < xRg.Rows.Count - 1
End Sub

3. Poté stiskněte tlačítko F5 klíč ke spuštění tohoto kódu. V prvním vyskakovacím poli vyberte rozsah dat, který chcete použít, viz snímek obrazovky:

4. V druhém poli výzvy vyberte sloupec se sloučenými buňkami, viz snímek obrazovky:

5. A pak klikněte OK tlačítko, řádky jsou střídavě stínované podle sloučených buněk, jak je znázorněno na obrázku níže:


Video: Vybarvěte alternativní řádky pro sloučené buňky


Více relativních článků:

  • Filtrovat všechna související data ze sloučených buněk
  • Předpokládejme, že ve vašem datovém rozsahu existuje sloupec sloučených buněk, a nyní musíte tento sloupec filtrovat se sloučenými buňkami, aby se zobrazily všechny řádky, které souvisejí s každou sloučenou buňkou, jak je znázorněno na následujících obrázcích. V aplikaci Excel vám funkce Filtr umožňuje filtrovat pouze první položku spojenou se sloučenými buňkami, v tomto článku budu hovořit o tom, jak filtrovat všechna související data ze sloučených buněk v aplikaci Excel?
  • Zkopírujte a vložte sloučené buňky do jednotlivých buněk
  • Normálně, když zkopírujete sloučené buňky a vložíte je do jiných buněk, sloučené buňky se vloží přímo. Ale chcete vložit tyto sloučené buňky do jednotlivých buněk, jak ukazuje následující snímek obrazovky, abyste mohli s daty nakládat, jak potřebujete. V tomto článku budu hovořit o tom, jak kopírovat a vložit sloučené buňky do jednotlivých buněk.
  • Vymažte obsah více sloučených buněk
  • Pokud máte velký list, který obsahuje více sloučených buněk, a nyní chcete vymazat veškerý obsah sloučených buněk, ale zachovat sloučené buňky. Za normálních okolností se můžete pokusit nejprve použít funkci Najít a nahradit, abyste vybrali všechny sloučené buňky, a poté stisknutím klávesy Odstranit hodnotu smažete, ale zobrazí se varovná zpráva „U sloučené buňky to nemůžeme udělat“. Jak v tomto případě vymažete hodnoty ve sloučených buňkách, ale sloučené buňky rychle necháte v aplikaci Excel?
  • Automatické číslování sloučených buněk
  • Jak bychom mohli vyplnit čísla sérií do seznamu sloučených buněk různé velikosti v aplikaci Excel? Nejprve v naší mysli je přetáhnout popisovač automatického vyplňování, aby se vyplnily sloučené buňky, ale v tomto případě se zobrazí následující varovná zpráva a nemůžeme vyplnit sloučené buňky.

  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce a uchovávání údajů; Rozdělit obsah buněk; Zkombinujte duplicitní řádky a součet / průměr... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Oblíbené a rychlé vkládání vzorců„Rozsahy, grafy a obrázky; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Seskupování kontingenčních tabulek podle číslo týdne, den v týdnu a další ... Zobrazit odemčené, zamčené buňky různými barvami; Zvýrazněte buňky, které mají vzorec / název...
karta kte 201905
  • 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!
officetab dno
Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
А еще у вас неверная формула:)
Ну нет такой формулы - СЧЕТЧИК
Правильнее СЧЕТЗ =)
This comment was minimized by the moderator on the site
Hello, Влад
The formulas in this article have been translated, so you can try the below formulas in English:
=MOD(COUNTA($A$2:$A2),2)=0
=MOD(COUNTA($A$2:$A2),2)=1
Please try, hope it can help you!
This comment was minimized by the moderator on the site
Здравствуйте!
Спасибо за статью

У меня есть некоторое замечание
= ОСТАТ (СЧЕТЧИК ($ A $ 2: $ A 2), 2) = 0
правильно , сменить на ;
= ОСТАТ (СЧЕТЧИК ($ A $ 2: $ A 2); 2) = 0

но даже после этого не работает
This comment was minimized by the moderator on the site
Hello, Vlad
The formulas in this article have been translated, so you can try the below formulas in English:
=MOD(COUNTA($A$2:$A2),2)=0
=MOD(COUNTA($A$2:$A2),2)=1

Please try, hope it can help you!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations