Hoe om afwisselende rijen voor samengevoegde cellen in Excel te kleuren?
Het is erg handig om afwisselende rijen met een andere kleur op te maken in grote hoeveelheden data om de gegevens beter te kunnen scannen. Maar soms kunnen er samengevoegde cellen in uw gegevens voorkomen. Om de rijen afwisselend met een andere kleur te markeren voor de samengevoegde cellen, zoals in onderstaande schermafbeelding wordt getoond, hoe zou u dit probleem in Excel kunnen oplossen?
Kleur afwisselende rijen voor samengevoegde cellen met Voorwaardelijke Opmaak
Kleur afwisselende rijen voor samengevoegde cellen met VBA-code
Kleur afwisselende rijen voor samengevoegde cellen met Voorwaardelijke Opmaak
In Excel kan de krachtige functie - Voorwaardelijke Opmaak - u helpen deze taak zo snel mogelijk uit te voeren. Volg hiervoor de volgende stappen:
1. Selecteer het gegevensbereik dat de samengevoegde cellen bevat die u afwisselend wilt kleuren, en klik vervolgens op Start > Voorwaardelijke Opmaak > Nieuwe Regel, zie onderstaande schermafbeelding:
2. Voer in het pop-upvenster Nieuwe Opmaakregel de volgende acties uit:
- Selecteer Gebruik een formule om te bepalen welke cellen moeten worden opgemaakt vanuit de lijst Keuze van regeltype;
- Voer vervolgens deze formule in: =MOD(AANTALARG($A$2:$A2),2)=0 in het tekstvak Waarden opmaken waar deze formule waar is.
- Opmerking: A2 is de eerste cel van uw gegevensbereik.
3. Klik vervolgens op de knop Opmaak om naar het dialoogvenster Celopmaak te gaan. Onder het tabblad Opvullen kiest u een kleur waarmee u de rijen wilt markeren, zie onderstaande schermafbeelding:
4. Klik op OK > OK om de dialoogvensters te sluiten, en de rijen met de samengevoegde cellen zijn gevuld met de kleur die u hebt gespecificeerd, zie onderstaande schermafbeelding:
5. Ga door met klikken op Start > Voorwaardelijke Opmaak > Nieuwe Regel om het venster Nieuwe Opmaakregel te openen en voer de volgende acties uit:
- Selecteer Gebruik een formule om te bepalen welke cellen moeten worden opgemaakt vanuit de lijst Keuze van regeltype;
- Voer vervolgens deze formule in: =MOD(AANTALARG($A$2:$A2),2)=1 in het tekstvak Waarden opmaken waar deze formule waar is.
- Klik vervolgens op de knop Opmaak om een andere kleur te kiezen waarmee u de rijen wilt markeren.
- Opmerking: A2 is de eerste cel van uw gegevensbereik.
6. Klik vervolgens op OK > OK om de dialoogvensters te sluiten, en nu kunt u zien dat het geselecteerde gegevensbereik afwisselend is gekleurd met twee verschillende kleuren op basis van de samengevoegde cellen, zoals in onderstaande schermafbeelding wordt getoond:
Kleur afwisselende rijen voor samengevoegde cellen met VBA-code
Naast de normale Voorwaardelijke Opmaak kunt u ook een VBA-code gebruiken om alternatieve rijkleuren voor samengevoegde cellen eenvoudig toe te passen.
1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.
2. Klik vervolgens op Invoegen > Module, en plak de volgende code in het venster Module.
VBA-code: Kleur afwisselende 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 de toets F5 om deze code uit te voeren. Selecteer in het eerste pop-upvenster het gegevensbereik dat u wilt gebruiken, zie onderstaande schermafbeelding:
4. Selecteer in het tweede venster de kolom met samengevoegde cellen, zie onderstaande schermafbeelding:
5. Klik vervolgens op de knop OK, en de rijen zijn afwisselend gekleurd op basis van de samengevoegde cellen, zoals in onderstaande schermafbeelding wordt getoond:
Video: Kleur afwisselende rijen voor samengevoegde cellen
Meer gerelateerde artikelen:
- Filter Alle Gerelateerde Gegevens Uit Samengevoegde Cellen
- Stel dat er een kolom met samengevoegde cellen in uw gegevensbereik staat, en u wilt deze kolom filteren om alle rijen weer te geven die gerelateerd zijn aan elke samengevoegde cel, zoals in onderstaande schermafbeeldingen wordt getoond. In Excel laat de Filterfunctie u alleen het eerste item filteren dat gerelateerd is aan de samengevoegde cellen. In dit artikel zal ik bespreken hoe u alle gerelateerde gegevens uit samengevoegde cellen kunt filteren in Excel.
- Kopieer En Plak Samengevoegde Cellen Naar Enkele Cellen
- Normaal gesproken, wanneer u samengevoegde cellen kopieert en ze in andere cellen plakt, worden de samengevoegde cellen direct geplakt. Maar u wilt deze samengevoegde cellen plakken als enkele cellen, zoals in onderstaande schermafbeelding wordt getoond, zodat u de gegevens kunt bewerken zoals u nodig hebt. In dit artikel zal ik bespreken hoe u samengevoegde cellen kopieert en plakt naar enkele cellen.
- Wis De Inhoud Van Meerdere Samengevoegde Cellen
- Als u een groot werkblad heeft dat meerdere samengevoegde cellen bevat, en u wilt alle inhoud van de samengevoegde cellen wissen maar de samengevoegde cellen behouden. Normaal gesproken probeert u misschien eerst de functie Zoeken en Vervangen te gebruiken om alle samengevoegde cellen te selecteren en drukt u vervolgens op Delete om de waarde te verwijderen, maar dan krijgt u een waarschuwing "We kunnen dat niet doen met een samengevoegde cel". In dit geval, hoe verwijdert u de waarden in samengevoegde cellen maar laat u de samengevoegde cellen snel in Excel?
- Automatisch Nummeren Samengevoegde Cellen
- Hoe kunnen we reeksnummers invullen in een lijst met verschillend formaat samengevoegde cellen in Excel? Eerst denken we aan het slepen van de automatische vulgreep om de samengevoegde cellen te vullen, maar in dit geval krijgen we het volgende waarschuwingsbericht en kunnen we de samengevoegde cellen niet vullen.
De Beste Office Productiviteitstools
Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%
- Super Formulebalk (bewerk eenvoudig meerdere regels tekst en formules); Leeslayout (lees en bewerk eenvoudig grote aantallen cellen); Plakken in gefilterd bereik...
- Cellen/Rijen/Kolommen samenvoegen en gegevens behouden; Celinhoud splitsen; Dubbele rijen combineren en optellen/gemiddelde berekenen... Voorkom dubbele cellen; Bereiken vergelijken...
- Selecteer dubbele of unieke rijen; Selecteer lege rijen (alle cellen zijn leeg); Super Zoeken en Fuzzy Zoeken in veel werkboeken; Willekeurige selectie...
- Exacte kopie van meerdere cellen zonder formuleverwijzing te wijzigen; Automatisch verwijzingen naar meerdere werkbladen maken; Opsommingstekens, selectievakjes en meer invoegen...
- Favoriete en snel formules, bereiken, grafieken en afbeeldingen invoegen; Cellen versleutelen met wachtwoord; Mailinglijst maken en e-mails versturen...
- Tekst extraheren, Tekst toevoegen, Verwijder tekens op een specifieke positie, Spaties verwijderen; Maak en print statistieken per pagina; Converteer tussen celinhoud en opmerkingen...
- Superfilter (filter schema's opslaan en toepassen op andere werkbladen); Geavanceerd sorteren op maand/week/dag, frequentie en meer; Speciaal filteren op vet, cursief...
- Werkboeken en werkbladen combineren; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere werkbladen; Batchconversie xls, xlsx en PDF...
- Draaitabelgroepering op weeknummer, dag van de week en meer... Toon ontgrendelde, vergrendelde cellen met verschillende kleuren; Markeer cellen die een formule/naam bevatten...
- Schakel tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project in.
- 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!
