VBA - метод обнаружения сбоя компиляции - PullRequest
Новая
       14

VBA - метод обнаружения сбоя компиляции

0 голосов
/ 11 апреля 2019

У меня есть следующий код: 

Public Function Compiler()
    On Error GoTo ErrorHandler

    Compiler = "Successfully Compiled"

    Dim compileMe As Object
    Set compileMe = Application.VBE.CommandBars.FindControl(Type:=msoControlButton, ID:=578)

    If compileMe.Enabled Then
        compileMe.Execute
    End If

    Exit Function

ErrorHandler:

    Compiler = "Unable to Compile - " & Err.Description

End Function

Это очень похоже на предложение , размещенное здесь , и оно не работает.Если вы введете ошибки в оставшуюся часть приложения и запустите это, вы будете получать «Успешно скомпилированные» каждый раз (после нажатия на сообщения об ошибках).

Есть ли способ вернуть метод «Unable toКомпилировать », если файл не может быть скомпилирован?

...