Как создать ЕХЕ файл в VB?
Формулировка задачи:
Необходимо!!! На VB сделать *.exe файл чтобы он зыпускал приложение написанное на VBA. Сапасибо.
Решение задачи: «Как создать ЕХЕ файл в VB?»
textual
Листинг программы
Public Sub Command1_Click()
Dim obj as Object
On Error Resume Next
Set obj = GetObject(, 'Word.Application')
If Err <> 0 Then
Err = 0
On Error GoTo OpenWordError
Set obj = CreateObject('Word.Application')
End If
' А теперь делай с ним что хочеш
Exit Sub
OpenWordError:
' Обработка ошибки...
End Sub