Preskoči na glavno vsebino

Kako obarvati nadomestne vrstice za združene celice v Excelu?

Zelo koristno je formatirati nadomestne vrstice z drugačno barvo v velikih podatkih, da skeniramo podatke, vendar je včasih v vaših podatkih morda nekaj združenih celic. Kako bi lahko rešili to težavo v Excelu, če želite izmenično označiti vrstice z drugo barvo za združene celice, kot je prikazano na spodnjem posnetku zaslona?

Barva nadomestnih vrstic za spojene celice s pogojnim oblikovanjem

Barva nadomestnih vrstic za spojene celice s kodo VBA


Barva nadomestnih vrstic za spojene celice s pogojnim oblikovanjem

V Excelu je zmogljiva funkcijaPogojno oblikovanje vam lahko pomaga čim hitreje doseči to nalogo, naredite naslednje korake:

1. Izberite obseg podatkov, ki vsebuje združene celice, ki jih želite izmenično obarvati, in kliknite Domov > Pogojno oblikovanje > Novo pravilo, glej posnetek zaslona:

2. V izskočil Novo pravilo oblikovanja v pogovornem oknu izvedite naslednje postopke:

  • Izberite S formulo določite, katere celice želite formatirati možnost iz Izberite vrsto pravila polje s seznamom;
  • In nato vnesite to formulo: =MOD(COUNTA($A$2:$A2),2)=0 v Oblikujte vrednosti, kjer je ta formula resnična Polje z besedilom.
  • Opombe: A2 je prva celica vašega obsega podatkov.

3. Nato kliknite oblikovana , da odprete Oblikuj celice pogovorno okno. Pod Izpolnite izberite eno barvo, s katero želite označiti vrstice, glejte posnetek zaslona:

4. Kliknite OK > OK da zaprete pogovorna okna in se vrstice z združenimi celicami zapolnijo z barvo, ki ste jo določili, glejte posnetek zaslona:

5. Pojdi na klik Domov > Pogojno oblikovanje > Novo pravilo da odprete Novo pravilo oblikovanja v pogovornem oknu izvedite naslednje postopke:

  • Izberite S formulo določite, katere celice želite formatirati možnost iz Izberite vrsto pravila polje s seznamom;
  • In nato vnesite to formulo: =MOD(COUNTA($A$2:$A2),2)=1 v Oblikujte vrednosti, kjer je ta formula resnična Polje z besedilom.
  • Nato kliknite oblikovana izberite drugo barvo, s katero želite označiti vrstice.
  • Opombe: A2 je prva celica vašega obsega podatkov.

6. In nato kliknite OK > OK da zaprete pogovorna okna, zdaj pa lahko vidite, da je bil izbrani obseg podatkov osenčen z dvema različnima barvama izmenično na podlagi združenih celic, kot je prikazano na spodnjem posnetku zaslona:


Barva nadomestnih vrstic za spojene celice s kodo VBA

Razen običajnega pogojnega oblikovanja lahko uporabite tudi kodo VBA za enostavno uporabo alternativnih barv vrstic za združene celice.

1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. Nato kliknite Vstavi > Moduliin prilepite naslednjo kodo v Moduli okno.

Koda VBA: Barva nadomestnih vrstic za spojene celice

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. Nato pritisnite F5 ključ za zagon te kode. V prvem pojavnem polju izberite obseg podatkov, ki ga želite uporabiti, glejte posnetek zaslona:

4. V drugem pozivnem polju izberite stolpec z združenimi celicami, glejte posnetek zaslona:

5. In nato kliknite OK so vrstice izmenično osenčene na podlagi spojenih celic, kot je prikazano na spodnjem posnetku zaslona:


Video: pobarvajte nadomestne vrstice za združene celice


Več relativnih člankov:

  • Filtrirajte vse povezane podatke iz združenih celic
  • Recimo, da je v vašem obsegu podatkov stolpec združenih celic, zdaj pa morate ta stolpec filtrirati z združenimi celicami, da bodo prikazane vse vrstice, ki so povezane z vsako združeno celico, kot kažejo naslednji posnetki zaslona. V Excelu funkcija filtriranja omogoča filtriranje samo prvega elementa, ki je povezan z združenimi celicami. V tem članku bom govoril o tem, kako filtrirati vse povezane podatke iz združenih celic v Excelu?
  • Kopirajte in prilepite združene celice v posamezne celice
  • Ko kopirate združene celice in jih prilepite v druge celice, jih običajno prilepite neposredno. Vendar pa želite prilepiti teze združenih celic v posamezne celice, kot je prikazano na spodnjem posnetku zaslona, ​​tako da boste lahko obdelali podatke, kot jih potrebujete. V tem članku bom govoril o tem, kako kopirati in prilepiti združene celice v posamezne celice.
  • Počisti vsebino več združenih celic
  • Če imate velik delovni list, ki vsebuje več združenih celic, in zdaj želite počistiti vso vsebino združenih celic, vendar obdržati združene celice. Običajno lahko poskusite uporabiti funkcijo Najdi in zamenjaj, da najprej izberete vse združene celice, nato pa pritisnete tipko Delete, da izbrišete vrednost, vendar boste dobili opozorilno sporočilo "Tega ne moremo storiti v združeni celici". V tem primeru, kako počistite vrednosti v združenih celicah, a združite celice hitro v Excelu?
  • Samodejno oštevilči združene celice
  • Kako lahko v Excel vnesemo serijske številke na seznam združenih celic različnih velikosti? Najprej v mislih povlecimo ročico za samodejno izpolnjevanje, da zapolnimo združene celice, vendar bomo v tem primeru dobili naslednje opozorilno sporočilo in združenih celic ne moremo zapolniti.

  • 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 in vodenje podatkov; Vsebina razdeljenih celic; Združite podvojene vrstice in vsoto / povprečje... 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č ...
  • Priljubljene in hitro vstavite formule, Obsegi, grafikoni in slike; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
  • 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...
  • Razvrščanje vrtilne tabele po številka tedna, dan v tednu in še več ... Prikaži odklenjene, zaklenjene celice po različnih barvah; Označite celice s formulo / imenom...
zavihek kte 201905
  • 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
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