Hi Everyone,

I have an issue Im hoping you may be able to help with.

I have a list of hyperlinks in column "E2". They are a link to a sharepoint MS Project file. Once the file is open, a macro (Ref "F2") is run and the file is closed.

[CODE][/Dim A As Object
Set A = CreateObject("MSProject.Application")
A.Visible = False

Sheets("Link Data").Select
ThisWorkbook.FollowHyperlink Range("E2").Hyperlinks(1).Address
A.Macro Range("F2")
A.FileClose FalseCODE]

The code above works fine except that I get the generic "Are you sure you want to open this, as it may be a virus" message. How do I get round this?

In the past I have used 
, ReadOnly:=True
for read only. Is there an equivalent for "OK to open"?

Thanks for all your help
Alex