Как знать, установлен ли компонент VBA Office?
Я не совсем уверен, примерила ли эта работа, поскольку я еще не использовал ее в живом производстве, но мне сейчас, тестовый репозиторий (я скопировал один из своих производственных), и это кажется для работы.
, Когда Вы будете в своем репозитории, используйте следующую команду:
svn update -r 24 trunk
, Где 24 число пересмотра, и , соединительная линия является файлом/папкой, который требуется обновить (или восстановление, в этом случае) к упомянутому числу пересмотра.
В моем тесте, несколько файлов были обновлены и (пере-) добавленный, и после выполнения фиксации, я не получил предупреждений вообще. Я тогда изменил файл с некоторым фиктивным текстом и попробовал еще одну фиксацию, и только сказал, что файл открылся в измененном списке. Таким образом, это, кажется, работает скорее хорошо!
Снова, я не использовал это прежде в живом производстве, поэтому если я неправ совет. Я хотел бы знать - ли это способ пойти также, потому что я вижу, что я нуждаюсь в этом в (почти) будущее.
-Dave
2 ответа
Одна из возможностей - проверить наличие VBE6.DLL в C: \ Program Files \ Common Files \ Microsoft Shared \ VBA \ VBA6. Или поройтесь в реестре в поисках ссылок на эту DLL или строку VBA.
Обратите внимание, что это расположение / имя файла может быть другим для Office 2010, так как в редакторе VBA есть некоторые изменения.
Почему бы вам не попробовать такую функцию ... Здесь можно найти
Option Explicit
Private Declare Function FreeLibrary Lib "kernel32" (ByVal hLibModule As Long) As Long
Private Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long
Private Sub cmdCheck_Click()
MsgBox "Exist ??? =" & CheckForComponent("user32.dll")
End Sub
Private Function CheckForComponent(ComPath As String) As Boolean
Dim Ret As Long
Ret = LoadLibrary(ComPath)
FreeLibrary Ret
If Ret = 0 Then
CheckForComponent = False
Else
CheckForComponent = True
End If
End Function