Инициализация пользовательской формы с заданными значениями?

Question

Работа в VBA для Excel 2010. Это мой первый опыт работы с VBA и пользовательскими формами. Прямо сейчас у меня есть barebones userform «UserForm1», пытающийся сортировать эту проблему. Он состоит из двух переключателей «OptionButton1» и «OptionButton2», принадлежащих GroupName «WK», и двух текстовых полей «TextBox1» и «TextBox2».

Когда я запускаю пользовательскую форму, я хочу выбрать «OptionButton1» и последующие операторы if/then. Однако сейчас я не могу заставить это сделать это. Мой код:

Public Sub UserForm1_Initialize() 
UserForm1.Show 
Me.OptionButton1.Value = False 
Me.OptionButton1.Value = True 
MsgBox ("dia locked") 
Me.TextBox1.Value = "blah" 
End Sub 

Public Sub UserForm1_Activate() 

End Sub 

Public Sub OptionButton1_Click() 

If Me.OptionButton1.Value = True Then 
MsgBox ("dia locked") 
Me.TextBox1.Value = "blah" 
End If 

End Sub 

Private Sub TextBox1_Change() 

End Sub 

Когда я запускаю форму, ничего не происходит, а «OptionButton1» является ложным. Если я нажму на него, появится окно сообщения, и текстовое поле отобразит текст. Он просто не будет делать это при запуске. Я попытался войти в свойства optionbutton и установить значение «значение» в true, что делает его истинным при запуске, , но окно сообщения все еще не отображается, а текстовое поле пуста, пока я не щелкнул по нему.

... пожалуйста, помогите. Спасибо.

Answer 1

Я понял.

Я неожиданно обнаружил выпадающие списки. По-видимому, я должен был поставить Userform_Initialize() вместо UserForm1_Initialize(), а вместо OptionButton1_Click() я поместил код в OptionButton1_Change(), который выполнил последующую последовательность инициализации.

Вы, ребята, или gals are awesomesauce. Я все узнал от чтения ваших потоков. Спасибо!