Hoe teksten van meerdere cellen samen te voegen in een tekstvak in Excel?
Het kan voor u gemakkelijk zijn om teksten van meerdere cellen samen te voegen tot een nieuwe cel met formule. Maar weet u hoe u meerdere celwaarden samenvoegt in een tekstvak (ActiveX-besturingselement)? Eigenlijk kan de methode in dit artikel u helpen om dit te bereiken.
Voeg teksten van meerdere cellen samen in een tekstvak met VBA-code
Voeg teksten van meerdere cellen samen in een tekstvak met VBA-code
De onderstaande methode kan u helpen om teksten van meerdere cellen samen te voegen tot een tekstvak in Excel.
1. In het werkblad dat u meerdere cellen wilt samenvoegen, voegt u een tekstvak in door op te klikken Ontwikkelaar > Invoegen > Tekstvak (ActiveX-besturingselement). Zie screenshot:
2. Dan klikken Ontwikkelaar > Invoegen > Commandoknop (ActiveX-besturingselement) om een opdrachtknop in het werkblad in te voegen.
3. Klik met de rechtermuisknop op de ingevoegde opdrachtknop en selecteer Bekijk code vanuit het contextmenu. Zie screenshot:
4. In de Microsoft Visual Basic voor toepassingen venster, vervang dan de originele code door onderstaande VBA-code.
VBA-code: voeg teksten van meerdere cellen samen in een tekstvak
Private Sub CommandButton1_Click()
Dim xRg As Range
Dim xCell As Range
Dim xStr As String
On Error Resume Next
Set xRg = Application.Selection
If xRg Is Nothing Then Exit Sub
With Me.TextBox1
.Text = vbNullString
.MultiLine = True
.WordWrap = True
For Each xCell In xRg
xStr = xCell.Value
.Text = Me.TextBox1 & xStr & Chr(10)
Next
End With
End Sub
Note: CommandButton1 is de naam van de ingevoegde opdrachtknop. Wijzig het op basis van uw behoefte.
5. Schakel de ontwerpmodus uit door op te klikken Ontwikkelaar > Ontwerpmodus.
6. Selecteer de cellen die u nodig hebt om de teksten samen te voegen tot een tekstvak en klik vervolgens op de Command-knop. En dan wordt de inhoud van alle geselecteerde cellen onmiddellijk samengevoegd in het tekstvak, zoals hieronder wordt getoond.
Gerelateerde artikelen:
- Hoe automatisch tekst van een tekstvak selecteren wanneer deze is geselecteerd in Excel?
- Hoe een tekstvak automatisch aanvullen tijdens het typen in Excel?
- Hoe de inhoud van het tekstvak te wissen wanneer erop wordt geklikt in Excel?
- Hoe kan ik bewerken in tekstvak uitschakelen om te voorkomen dat de gebruiker in Excel invoert?
- Hwil je een tekstvak opmaken als een percentage in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- 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!