Задача показать форму с выделенным текстом в текстбоксе
на UserForm1.Show процедура останавливается и соответственно тект не выделяется.
Подскажите выход из положения пожалуйста
Код |
---|
Sub showform() UserForm1.TextBox1.Text = ActiveCell.Text UserForm1.Show UserForm1.TextBox1.SetFocus TextBox1.SelStart = 0 TextBox1.SelLength = Len(Text) End Sub |
Подскажите выход из положения пожалуйста