Hoe een tekstvak aan meerdere cellen in Excel koppelen?

Zoals we allemaal weten, is het eenvoudig om een tekstvak aan een specifieke cel te koppelen. Maar is het mogelijk om meerdere cellen aan hetzelfde tekstvak te koppelen, zodat wanneer je op verschillende cellen klikt, het tekstvak verschillende tekst weergeeft? Dit artikel helpt je deze taak in Excel op te lossen.

Tekstvak aan meerdere cellen koppelen met VBA-code

Tekstvak aan meerdere cellen koppelen met VBA-code

Om een tekstvak aan meerdere cellen te koppelen, kan de volgende VBA-code je helpen. Doe het volgende:

1. Voeg eerst een ActiveX-tekstvak in onder het tabblad Ontwikkelaar.

2. Klik vervolgens met de rechtermuisknop op het werkbladtabblad dat het tekstvak bevat dat je wilt gebruiken, en kies Weergave Code uit het contextmenu. Kopieer en plak in het geopende Microsoft Visual Basic for Applications-venster de volgende code in de lege Module:

VBA-code: tekstvak aan meerdere cellen koppelen:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 3 Then ActiveSheet.TextBox1.Text = Target
End Sub

Opmerking: In de bovenstaande code geeft het getal 3 het kolomnummer aan waarin je gekoppelde cellen zich bevinden, en Textbox1 is de naam van het tekstvak dat je hebt ingevoegd. Pas deze aan naar behoefte.

3. Sla daarna deze codevenster op en sluit het. Nu, wanneer je op verschillende cellen klikt, worden de verschillende waarden automatisch weergegeven in het tekstvak. Zie screenshot: