Показать данные листа в пользовательской форме

Question

Извините, если это опубликовано ранее, не могу найти простое руководство / ответ.Я хочу использовать пользовательскую форму для отображения данных из другой таблицы.Я использовал следующий код:

Private Sub Label1_Click()

Label1.Caption = Sheets("Sheet1").Range("A1")

End Sub

При использовании этого кода появляется пользовательская форма, но сначала она не показывает значение.Когда я нажимаю на ярлык, он делает.

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

Answer 1

Этот метод запускается только при нажатии на ярлык, поэтому он называется Label1_Click ().

Если вы хотите, вы можете использовать метод, подобный:

Private Sub SetLabel1()
    Label1.Caption = Sheets("Sheet1").Range("A1").Value
End Sub

Для отображения пользовательской формы:

Private Sub CommandButton1_Click()

YourUserForm.Show

End Sub

А затем вызвать SetLabel1 в подпрограмме UserFormName_Initialize ():

Private Sub UserForm_Initialize()
    SetLabel1()
End Sub 

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