Excel macro - Remote data not accessible:

I have a macro (in ThisWorkbook that uses application.onTime) that opens a macro in module1 at a certain time. This macro should open two other excel workbooks but I get this message:

Remote data not accessible:
To access this data Excel needs to start another application. Some legitimate applications on your computer could be used maliciously to spread viruses or damage your computer. Only click Yes if you trust the source of theis workbook and you want to let the workbook start the application. Start application 'IT.EXE'?  YES NO

Is there a way to automatically say "YES"

The macro works fine without the autotimer.

Thanks,
CC
CC10Asked:
Who is Participating?
 
MWGainesJRConnect With a Mentor Commented:
try this and see if works.....if it does, your problem is the updatelinks......
Workbooks.Open("C:\CiceroTradingSystem_2010\datacollection\Cicerocollect.xlsm")
Workbooks.Open("C:\CiceroTradingSystem_2010\datacollection\Cicerocollect2.xlsm")

0
 
BardobraveCommented:
Sadly there's no way to bypass this security check from code. If it could be so, viruses will use it to bypass the protection, making it totally useless.

Maybe there's a way to include your macro in a "trusted programs" list inside windows?
0
 
CC10Author Commented:
Does this mean that you cannot set macros to open workbooks at specific times anymore? The other two workbooks are in the same folder on the hard drive. As said, the macro works fine if you manually run it.
0
Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
MWGainesJRCommented:
can you post your code?
0
 
CC10Author Commented:
Here we go:
This is in the ThisWorkbook section

Private Sub Workbook_Open()

Application.OnTime TimeValue("11:24:00"), "CopyRowsByDateRun_ALL"

End Sub

This is in Module2:

Sub CopyRowsByDateRun_ALL()
   
         Workbooks.Open Filename:= _
        "C:\CiceroTradingSystem_2010\datacollection\Cicerocollect.xlsm", UpdateLinks:=xlUpdateLinksAlways

    Workbooks.Open Filename:= _
        "C:\CiceroTradingSystem_2010\datacollection\Cicerocollect2.xlsm", UpdateLinks:=xlUpdateLinksAlways
End Sub
0
 
CC10Author Commented:
Yes that works. Thanks.

The two workbooks are connected to a datasource via a DDE link. It was many years ago but I think sometimes the link did not update. So that was why we inserted the Updatelinks code.  Is that code out of date now?
0
 
MWGainesJRCommented:
I'm not sure......I usually toggle external links options....
0
 
CC10Author Commented:
I don't know what that means.
Basically my structure consists of a downloading data into some Excel workbooks that create a trading system. The signals are automatically sent via e-mail. It all works fine manually and used to work automatically but that was a few years ago. I am now trying to get it to work again. It is clear that the links must update efficiently.
Do you want me to close this question as solved and ask a new one about the updates?
0
 
MWGainesJRCommented:
Go into Excel options and look for the external links options....if that doesn't answer your question, then sure, start another one.
0
 
CC10Author Commented:
Thanks for you help.CC
0
All Courses

From novice to tech pro — start learning today.