Изменить заголовок в форме в VBA

Я создал 2 формы в excel, userform1 и userform2. Как установить заголовок userform2, чтобы он отображал все, что находится в textbox1 из userform1, и обновлялся при изменении значения textbox1?


forms excel vba auto-update caption
person safoura    schedule 03.12.2015    source источник
comment
Пользовательская форма имеет свойство Caption, а текстовое поле имеет событие Change...   -  person Rory    schedule 03.12.2015
comment
Что вы имеете в виду? это возможно?   -  person safoura    schedule 03.12.2015
comment
Да - используйте событие Change текстового поля, чтобы установить заголовок другой пользовательской формы - при условии, что они оба загружаются одновременно?   -  person Rory    schedule 03.12.2015
comment
Как?Какой код?   -  person safoura    schedule 03.12.2015
comment
Вы также хотите, чтобы заголовок UserForm1 менялся, когда вы вводите текст в поле TextBox?   -  person Jean-Pierre Oosthuizen    schedule 03.12.2015

Ответы (1)


arrow_upward
1
arrow_downward

Как упоминал Рори здесь, просто добавьте его в UserForm1 TextBox1 Change Sub.

Вставьте приведенный ниже скрипт в часть кода UserForm1.

Private Sub TextBox1_Change()

    'Assign the TextBox Text to a variant
    SomeText = TextBox1.Text
    'Set the UserForm2 Caption to the variant
    UserForm2.Caption = SomeText

End Sub

Чтобы вставить скрипт в кодовую часть вашего UserForm, дважды щелкните Userform в левой части окна VBA под названием «Окно проектов», затем нажмите кнопку F7 на клавиатуре, чтобы получить доступ к кодовой части UserForm, затем вставьте код в внизу страницы.

person Jean-Pierre Oosthuizen    schedule 03.12.2015