- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hi
I have a work around that i am using that works a dream.
The Catch turns VaultAddin Back on if it fails.
iLogic Version
Try
ThisApplication.SilentOperation = True
Dim oAddins As ApplicationAddIns
oAddins = ThisApplication.ApplicationAddIns
Dim oVaultAddin As ApplicationAddIn
oVaultAddin = ThisApplication.ApplicationAddIns.ItemById("{48B682BC-42E6-4953-84C5-3D253B52E77B}")
oVaultAddin.Deactivate()
'"Run your code"
oVaultAddin.Activate()
ThisApplication.SilentOperation = False
Catch
Dim oVaultAddin As ApplicationAddIn
oVaultAddin = ThisApplication.ApplicationAddIns.ItemById("{3AD251E3-02DD-4B8C-8882-86C97C80E00C}")
If oVaultAddin.Activated = False Then
oVaultAddin.Activate()
End If
ThisApplication.SilentOperation = True
End try