Hoe alternatieve rijen kleuren voor samengevoegde cellen in Excel?
Het is erg handig om afwisselende rijen met een andere kleur op te maken in grote gegevens, zodat we de gegevens kunnen scannen, maar soms kunnen er enkele samengevoegde cellen in uw gegevens zijn. Om de rijen afwisselend te markeren met een andere kleur voor de samengevoegde cellen, zoals hieronder afgebeeld, hoe zou u dit probleem in Excel kunnen oplossen?
Kleur alternatieve rijen voor samengevoegde cellen met voorwaardelijke opmaak
Kleur alternatieve rijen voor samengevoegde cellen met VBA-code
Kleur alternatieve rijen voor samengevoegde cellen met voorwaardelijke opmaak
In Excel, de krachtige functie-Conditionele opmaak kan u helpen om deze taak zo snel mogelijk te bereiken, voer dan de volgende stappen uit:
1. Selecteer het gegevensbereik dat de samengevoegde cellen bevat die u afwisselend een kleur wilt geven en klik vervolgens op Home > Conditionele opmaak > Nieuwe regel, zie screenshot:
2. In de pop-out Nieuwe opmaakregel dialoogvenster voert u de volgende bewerkingen uit:
- kies Gebruik een formule om te bepalen welke cellen moeten worden opgemaakt optie van de Selecteer een regeltype keuzelijst;
- En voer dan deze formule in: =MOD(COUNTA($A$2:$A2),2)=0 in de Formatteer waarden waar deze formule waar is tekstvak.
- Note: A2 is de eerste cel van uw gegevensbereik.
3. Dan klikken Formaat knop om naar de Cellen opmaken dialoog venster. Onder de Vulling tabblad, kies een kleur waarmee u de rijen wilt markeren, zie screenshot:
4. Klikken OK > OK om de dialoogvensters te sluiten en de rijen met de samengevoegde cellen worden gevuld met de kleur die u hebt opgegeven, zie screenshot:
5. Blijf klikken Home > Conditionele opmaak > Nieuwe regel om de te openen Nieuwe opmaakregel dialoogvenster voert u de volgende bewerkingen uit:
- kies Gebruik een formule om te bepalen welke cellen moeten worden opgemaakt optie van de Selecteer een regeltype keuzelijst;
- En voer dan deze formule in: =MOD(COUNTA($A$2:$A2),2)=1 in de Formatteer waarden waar deze formule waar is tekstvak.
- Dan klikken Formaat om een andere kleur te kiezen waarin u de rijen wilt markeren.
- Note: A2 is de eerste cel van uw gegevensbereik.
6. En klik dan OK > OK om de dialoogvensters te sluiten, en nu kunt u zien dat het geselecteerde gegevensbereik afwisselend is gearceerd met twee verschillende kleuren op basis van de samengevoegde cellen, zoals hieronder wordt weergegeven:
Kleur alternatieve rijen voor samengevoegde cellen met VBA-code
Behalve de normale voorwaardelijke opmaak, kunt u ook een VBA-code gebruiken om gemakkelijk alternatieve rijkleuren voor samengevoegde cellen toe te passen.
1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. Dan klikken Invoegen > Moduleen plak de volgende code in het Module venster.
VBA-code: kleur alternatieve rijen voor samengevoegde cellen
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. Druk vervolgens op F5 sleutel om deze code uit te voeren. Selecteer in het eerste uitgeklapte vak het gegevensbereik dat u wilt gebruiken, zie screenshot:
4. Selecteer in het tweede promptvenster de kolom met samengevoegde cellen, zie screenshot:
5. En klik dan OK knop, zijn de rijen afwisselend gearceerd op basis van de samengevoegde cellen, zoals hieronder afgebeeld:
Video: kleur afwisselende rijen voor samengevoegde cellen
Meer relatieve artikelen:
- Filter alle gerelateerde gegevens uit samengevoegde cellen
- Stel dat er een kolom met samengevoegde cellen in uw gegevensbereik is, en nu moet u deze kolom filteren met samengevoegde cellen om alle rijen weer te geven die gerelateerd zijn aan elke samengevoegde cel, zoals in de volgende schermafbeeldingen. In Excel kunt u met de filterfunctie alleen het eerste item filteren dat aan de samengevoegde cellen is gekoppeld, in dit artikel zal ik het hebben over hoe u alle gerelateerde gegevens uit samengevoegde cellen in Excel kunt filteren?
- Kopieer en plak samengevoegde cellen in afzonderlijke cellen
- Normaal gesproken worden de samengevoegde cellen direct geplakt als u de samengevoegde cellen kopieert en in andere cellen plakt. Maar u wilt deze samengevoegde cellen in afzonderlijke cellen plakken zoals in de volgende schermafbeelding wordt getoond, zodat u met de gegevens kunt omgaan zoals u nodig hebt. In dit artikel zal ik het hebben over het kopiëren en plakken van samengevoegde cellen naar afzonderlijke cellen.
- Wis de inhoud van meerdere samengevoegde cellen
- Als u een groot werkblad heeft met meerdere samengevoegde cellen, en u wilt nu alle inhoud van de samengevoegde cellen wissen, maar de samengevoegde cellen behouden. Normaal gesproken kunt u proberen om de functie Zoeken en vervangen toe te passen om eerst alle samengevoegde cellen te selecteren en vervolgens op de Delete-toets te drukken om de waarde te verwijderen. U krijgt echter een waarschuwingsbericht "Dat kunnen we niet doen met een samengevoegde cel". Hoe wist u in dit geval de waarden in samengevoegde cellen, maar laat u de samengevoegde cellen snel achter in Excel?
- Samengevoegde cellen automatisch nummeren
- Hoe kunnen we serienummers invullen in een lijst met samengevoegde cellen van verschillende grootte in Excel? We moeten eerst de hendel voor Automatisch aanvullen slepen om de samengevoegde cellen te vullen, maar in dit geval krijgen we het volgende waarschuwingsbericht te zien en kunnen we de samengevoegde cellen niet vullen.
De beste tools voor kantoorproductiviteit
Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%
- Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
- Voeg cellen / rijen / kolommen samen en het bewaren van gegevens; Gespleten cellen inhoud; Combineer dubbele rijen en som / gemiddelde... Voorkom dubbele cellen; Vergelijk Ranges...
- Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
- Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
- Favoriete formules en snel invoegen, Bereiken, grafieken en afbeeldingen; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
- Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
- Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
- Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
- Draaitabel groeperen op weeknummer, dag van de week en meer ... Toon ontgrendelde, vergrendelde cellen door verschillende kleuren; Markeer cellen met formule / naam...
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
