Вывод данных в UserForm

[levohotnik]

Форма запускается кликом на фигуру, расположенную в листе.
На форме должна выводиться информация, часть из которой имеет переменный характер.
Вопрос: как присвоить Label значение переменной, которое будет выводиться на форме?

[EducatedFool]

как присвоить Label значение переменной

какой переменной?
прикрепите файл с примером
там одна строка кода нужна - но ради этого рисовать файл с формой, а потом переделывать код после дополнительных пояснений как-то не очень хочется...

[levohotnik]

Сообщение от EducatedFool

какой переменной?
прикрепите файл с примером
там одна строка кода нужна - но ради этого рисовать файл с формой, а потом переделывать код после дополнительных пояснений как-то не очень хочется...

Sub Прямоугольник_Щелчок()
Dim NK As Integer
NK = Worksheets("Справочно").Cells(7, 4)
LbNK = NK ' LbNK - метка
UserForm1.Show
End Sub

В форме есть соответствующий объект LbNK(Label).

[levohotnik]

Sub Прямоугольник1_Щелчок()
Dim NK As Integer
NK = Worksheets("Справочно").Cells(1, 1)
Caption.LbNK = NK ' LbNK - метка
UserForm1.Show
End Sub

[nilem]

Sub Прямоугольник1_Щелчок()
Dim NK As Integer
NK = Worksheets("Справочно").Cells(1, 1)
UserForm1.LbNK.Caption = NK ' LbNK - метка
UserForm1.Show
End Sub

[levohotnik]

Сообщение от nilem

Sub Прямоугольник1_Щелчок()
Dim NK As Integer
NK = Worksheets("Справочно").Cells(1, 1)
UserForm1.LbNK.Caption = NK ' LbNK - метка
UserForm1.Show
End Sub

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