T
tduty
Вот код.
Dim MyT As New Class2
Private Sub StartButton_Click()
If StartButton.Caption = "START" Then
MyT.StartPlatform
StartButton.Caption = "STOP"
Else
MyT.StopPlatform
StartButton.Caption = "START"
End If
End Sub
в экселе создал кнопку, к ней добавил макрос указанный выше,
но ничего не получилось. Ни F5 ни работает ни кнопка.
VBA ошибок не выдает, но когда нажимаешь F5, макрос его не видит и не может прочитать.
В чем причина.
Был бы признателен, если приложили бы готовый файл.
Он самый простой но че то не получается
Dim MyT As New Class2
Private Sub StartButton_Click()
If StartButton.Caption = "START" Then
MyT.StartPlatform
StartButton.Caption = "STOP"
Else
MyT.StopPlatform
StartButton.Caption = "START"
End If
End Sub
в экселе создал кнопку, к ней добавил макрос указанный выше,
но ничего не получилось. Ни F5 ни работает ни кнопка.
VBA ошибок не выдает, но когда нажимаешь F5, макрос его не видит и не может прочитать.
В чем причина.
Был бы признателен, если приложили бы готовый файл.
Он самый простой но че то не получается