Печать страницы - VBA Макросы. Как записать в TextBox значение, если в другом TextBox'е не пусто?

Название: VBA Макросы. Как записать в TextBox значение, если в другом TextBox'е не пусто?
Отправлено: Посетитель от 19 марта 2021, 14:29

На форме есть два текстбокса: TextBox1, TextBox2.
Если в TextBox1 появилось значение, то в TextBox2 нужно записать текст: Заполнено.
Если же TextBox1 очистили, то TextBox2 тоже нужно очистить.

Название: Re: VBA Макросы. Как записать в TextBox значение, если в другом TextBox'е не пусто?
Отправлено: Администратор от 19 марта 2021, 18:56

Private Sub TextBox1_Change()
If Me.TextBox1.Text <> "" Then
Me.TextBox2.Text = "Заполнено"
Else
Me.TextBox2.Text = ""
End If
End Sub

Название: Re: VBA Макросы. Как записать в TextBox значение, если в другом TextBox'е не пусто?
Отправлено: Посетитель от 19 марта 2021, 19:25

Огромное спасибо!!!

Форум по VBA и MS Office

VBA, Excel => VBA, макросы в Excel => Тема начата: Посетитель от 19 марта 2021, 14:29