CreateObject("excel","xlLabel")....

[ADVM]

Помогите плиз ... при написании такого кода ошибок не получаю, но и нет результата:

Dim CB As Object

CB = CreateObject("Excel.xlLabel")
CB.Visible = True
CB.Top = 200
CB.Left = 40
CB.Width = 40
CB.Height = 20
CB.Caption = "dasflkhfkljhnfkdjs"

[EducatedFool]

А какой результат Вы хотите получить?

Ну, создали Вы объект, изменили его свойства, но вывести-то его (на форму, или на лист) забыли...

Где Вам надо отобразить этот Label?
Желательно прикрепить пример файла...

[ADVM]

как отобразить его на UserForm1

[EducatedFool]

Private Sub UserForm_Initialize()
    Dim CB As MSForms.Label
    Set CB = Me.Controls.Add("Forms.Label.1", "MyFirstLabel", True)
    CB.Top = 20: CB.Left = 40: CB.Width = 40: CB.Height = 20
    CB.Caption = "текст"
End Sub

[ADVM]

спасибо, буду пробовать