View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Jim Rech Jim Rech is offline
external usenet poster
 
Posts: 2,718
Default File freezing - Trust access to Visual Basic Project setting

I don't understand the freezing part because code will usually run or
generate an error. It doesn't just stop. But anyway this seems to return
whether VBE access is trusted.

Sub TestVBE_Trusted()
If VBE_Trusted Then
MsgBox "VBE Trusted"
Else
MsgBox "VBE NOT Trusted"
End If
End Sub

Function VBE_Trusted() As Boolean
Dim X As Variant
On Error Resume Next
Err.Clear
X = Application.VBE.Version
VBE_Trusted = (Err.Number = 0)
End Function

--
Jim
"Cresta" wrote in message
...
| Hello and help.
| I am getting frequent service desk calls regarding a heavily macro'd Excel
| file freezing when it is being opened, and its all because the "Trust
access
| to Visual Basic Project" setting is not ticked.
| I know the setting cannot be changed by code, for obvious security
reasons,
| so I am trying to get the file to check this setting at startup, give the
| user a message to make the relevant setting changes, and to stop the file
| from freezing.
| Is there any simple code to check this setting and return a value to
trigger
| the above steps if required.
| Thanks
|