Hoe maakt u een deel van de tekst vet tijdens het samenvoegen van twee kolommen in Excel?
Bij het werken met gegevens in Excel moet u vaak informatie uit twee kolommen samenvoegen tot één cel voor betere leesbaarheid of rapportage. Denk bijvoorbeeld aan klantnamen samen met hun locaties of productnamen gecombineerd met codes. Normaal gesproken doet u dit met formules zoals SAMENVATTEN of &. Een veelvoorkomend probleem is echter dat Excel, na het samenvoegen van celwaarden, de gecombineerde tekst als een eenvoudige tekenreeks behandelt en geen gedeeltelijke opmaak ondersteunt. Dat betekent dat u via formules niet automatisch slechts een deel van de gecombineerde tekst vet kunt maken; eventuele opmaak geldt altijd voor de hele cel. Deze beperking is vervelend wanneer u een specifiek segment wilt benadrukken, zoals het eerste woord vetgedrukt weergeven. In deze handleiding laten we u zien hoe u gedeeltelijke vetgedrukte opmaak kunt toepassen bij het samenvoegen van twee kolommen in Excel, bespreken praktische scenario’s hiervoor en geven alternatieve oplossingen.
Een deel van de tekst vet maken bij het samenvoegen van twee kolommen met VBA-code
Alternatief: Waarden samenvoegen met formules (met opmaaktips)
Een deel van de tekst vet maken bij het samenvoegen van twee kolommen met VBA-code
Stel dat u twee kolommen heeft: één met Voornaam en één met Achternaam. U wilt deze combineren in een nieuwe kolom, waarbij de voornaam (uit de eerste kolom) vetgedrukt wordt weergegeven en de achternaam in normale stijl — net als bij professionele opmaakvoorbeelden. De afbeelding hieronder illustreert dit doel, waarbij het gecombineerde resultaat opvalt door het vetgedrukte eerste deel:
Deze aanpak is vooral handig voor lijsten waarin u een primair gegeven – zoals een naam of productcode – binnen een langere beschrijving wilt markeren. Aangezien reguliere Excel-formules geen gedeeltelijke celopmaak kunnen toepassen, kunt u een VBA-macro gebruiken om het samenvoegen én opmaken te automatiseren. Dit is ideaal voor gebruikers die vertrouwd zijn met eenvoudige macro’s en een herbruikbare oplossing zoeken voor gedeeltelijke opmaak in samengevoegde resultaten. Houd er rekening mee dat het uitvoeren van VBA vereist dat macro’s zijn ingeschakeld en dat Ctrl+Z niet werkt – sla dus uw werk op voordat u begint.
1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen. Als u VBA voor het eerst gebruikt, controleer dan of het tabblad Ontwikkelaar is ingeschakeld in Excel (Bestand > Opties > Aanpassen Lint > vink ‘Ontwikkelaar’ aan).
2. Klik in het VBA-venster op Invoegen > Module om een nieuwe module te maken. Plak vervolgens de volgende code in het codedeel van de module. Deze macro voegt per rij de waarden van twee kolommen samen en maakt de eerste waarde in de uitvoer vetgedrukt:
VBA-code: Een deel van de tekst vet maken bij het samenvoegen van twee kolommen:
Sub JoinCellsWithBoldFormatForFirstWord()
'Updateby Extendoffice 20160725
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim I As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
LInput:
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "does not support multiple selections", vbInformation, "Kutools for Excel"
GoTo LInput
End If
If xRg.Columns.Count <> 2 Then
MsgBox "only two columns in the selection", vbInformation, "Kutools for Excel"
GoTo LInput
End If
Set xRg = xRg.Resize(xRg.Rows, 3)
On Error Resume Next
For Each xCell In xRg.Columns(3).Cells
xCell = xRg.Cells(xCell.Row, 1) & " " & xRg.Cells(xCell.Row, 2)
xCell.Font.Bold = False
xCell.Characters(1, Len(xRg.Cells(xCell.Row, 1))).Font.FontStyle = "Bold"
Next
End Sub
3. Druk in het menu op F5 om de macro uit te voeren. Er verschijnt een dialoogvenster waarin u het bereik van cellen kunt selecteren dat u wilt samenvoegen en opmaken. U kunt uw muis gebruiken om het bereik te selecteren of het handmatig typen, zoals A1:B10. Zie hieronder het selectiescherm:
Tips vóór het uitvoeren:
- Zorg ervoor dat het geselecteerde bereik beide kolommen omvat die u wilt samenvoegen.
- Deze macro plaatst resultaten naast de oorspronkelijke selectie, dus controleer of de doelcellen leeg zijn om te voorkomen dat uw gegevens worden overschreven.
- Als u ‘Samengevoegd’ of formules hebt geselecteerd in het bereik, verwijder of wis deze, aangezien dit fouten kan veroorzaken.
Als u per ongeluk het verkeerde bereik selecteert, klikt u op Annuleren en voert u de macro opnieuw uit.
4. Klik op OK in het dialoogvenster. De macro verwerkt de gegevens en combineert voor elke rij in uw geselecteerde bereik de waarden uit beide kolommen in een nieuwe cel direct rechts ervan. De eerste waarde in elk resultaat wordt automatisch vetgedrukt, zoals hieronder wordt getoond:
U kunt deze resultaten nu direct gebruiken voor verdere rapportage, afdrukken of exporteren. Komen de resultaten niet overeen met uw verwachtingen? Controleer dan uw selectie en zorg ervoor dat elke rij in beide oorspronkelijke kolommen de juiste waarden bevat.
Voordelen:
- Maakt gedeeltelijke opmaak mogelijk, zoals vetgedrukt of andere stijlveranderingen, tijdens het samenvoegen — iets wat standaardformules niet kunnen.
- Automatiseert repetitieve taken voor uitgebreide lijsten.
Nadelen: Vereist het uitvoeren van macro’s, wat in sommige omgevingen beperkt kan zijn.
Als u problemen ondervindt (zoals geen uitvoer, foutmeldingen of ontbrekende opmaak):
- Controleer de beveiligingsinstellingen om zeker te weten dat macro’s zijn ingeschakeld (Bestand > Opties > Trustcentrum > Instellingen voor het Trustcentrum > Macro-instellingen).
- Zorg ervoor dat er geen beveiligde werkbladen of samengevoegde cellen in het doelgebied aanwezig zijn.
- Als het bereik onjuist is geselecteerd, voert u de macro opnieuw uit en selecteert u alleen twee aangrenzende kolommen.
Alternatief: Waarden samenvoegen met formules (met opmaaktips)
Voor gebruikers die geen VBA willen gebruiken, zijn er Excel-formules zoals SAMENVATTEN, TEKST.SAMENVATTENof simpelweg het ampersand-teken ()&) om waarden uit twee kolommen samen te voegen. Hoewel formules geen vetgedrukte opmaak kunnen toepassen op een deel van de uitvoer, kunt u kolommen snel samenvoegen en daarna handmatig de tekst in elke cel opmaken.
Twee kolommen (A en B) samenvoegen in Excel:
1. Klik op de eerste cel in de doelkolom (bijvoorbeeld C2) en voer deze formule in:
=A2 & " " & B22. Druk op Enter om het gecombineerde resultaat te bevestigen. Sleep de vulgreep naar beneden om de formule toe te passen op andere rijen. Als u handmatig een deel van de tekst in het formuleresultaat vetgedrukt wilt weergeven, kopieert u eerst de resultaatcellen en plakt u ze als waarden op dezelfde plaats. Dubbelklik vervolgens op de cel, selecteer het gewenste deel en druk op Ctrl + B of gebruik de knop Start > Vetgedrukt.
3. Wilt u andere scheidingstekens of een aangepast formaat gebruiken? Pas dan de formule naar wens aan. Bijvoorbeeld om een komma tussen de teksten in te voegen:
=A2 & ", " & B2Voordelen:
- Eenvoudig in gebruik en vereist geen macro's of speciale instellingen.
- Flexibel: combineert een willekeurig aantal cellen of maakt gebruik van aangepaste scheidingstekens.
Nadelen:
- Gedeeltelijke opmaak (bijvoorbeeld slechts een deel van de tekst vetgedrukt) moet handmatig worden toegepast en is niet dynamisch: na updates van waarden dient de opmaak opnieuw te worden aangebracht.
- Schaalt niet goed bij zeer grote datasets wanneer handmatige opmaak vereist is.
Voor optimale resultaten bij gedeeltelijke opmaak, gebruik kleine datasets of presentatietafels nadat de gegevens definitief zijn vastgesteld.
Samengevat: met VBA is gedeeltelijke opmaak van samengevoegde resultaten haalbaar voor grootschalige of geautomatiseerde projecten, terwijl formules ideaal zijn voor eenvoudig samenvoegen en dagelijks gebruik. Als u liever alleen formuleoplossingen gebruikt zonder u zorgen te maken over opmaak, kunt u terugvallen op de standaard Excel-samenvoegtechnieken. Maak altijd eerst een back-up van uw werkmap voordat u macro’s gebruikt en controleer uw selecties zorgvuldig voordat u geautomatiseerde taken uitvoert.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins