Как связать текстовое поле с несколькими ячейками в Excel?

Как всем известно, легко связать текстовое поле с конкретной ячейкой. Но можно ли связать несколько ячеек с одним и тем же текстовым полем, чтобы при клике на разные ячейки текстовое поле отображало разный текст? Эта статья поможет вам решить эту задачу в Excel.

Связывание текстового поля с несколькими ячейками с помощью кода VBA

Связывание текстового поля с несколькими ячейками с помощью кода VBA

Чтобы связать текстовое поле с несколькими ячейками, следующий код VBA может помочь вам, пожалуйста, выполните следующие действия:

1. Сначала вставьте текстовое поле ActiveX под вкладкой Разработчик.

2. Затем щелкните правой кнопкой мыши вкладку листа, содержащую текстовое поле, которое вы хотите использовать, затем выберите Вид кода из контекстного меню, и в открывшемся окне Microsoft Visual Basic for Applications скопируйте и вставьте следующий код в пустой Модуль:

Код VBA: связывание текстового поля с несколькими ячейками:

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

Примечание: В приведенном выше коде число 3 указывает номер столбца, в котором находятся связанные ячейки, а Textbox1 — это имя вставленного текстового поля, пожалуйста, измените их по своему усмотрению.

3. Затем сохраните и закройте это окно кода. Теперь, когда вы нажимаете на разные ячейки, различные значения будут автоматически отображаться в текстовом поле, см. скриншот: