добавить несколько текстовых полей, связанных с другим источником управления

Question

Мне нужно добавить различные текстовые поля с разными значениями источников управления и изменить при изменении значений. Я перебираю различные текстовые поля, которые могут быть добавлены в пользовательскую форму. Проблема, с которой я сталкиваюсь, заключается в том, что Control Source не позволяет меняться каждый раз, когда я петлю и создаю новое текстовое поле для подключения к новой ячейке.

Set qtextbox1 = Me.Controls.Add("Forms.textbox.1", "Uquantity_TextBox_" & i) 
    Set myrangeused = Cells(userow + i, usecol) 
    add = myrangeused.Address 
    With qtextbox1 
     .ControlSource = "'Lookup Lists'!F4" 

код работает, когда я добавляю конкретную ячейку, но не связывает различные коробки с тагами в разных источниках.

Answer 1

спасибо, если кто-нибудь попробовал это. Я получил решение для вышеуказанной проблемы. источник управления может быть динамическим, если вместо

 With qtextbox1 
    .ControlSource = "'Lookup Lists'!F4" 

мы

 With qtextbox1 
     .ControlSource = add <<~~ address of the targetcell `