Close window

[zealot]

Hello,
I open a file which has links and the following window shows:

\1

I wonder if there is away to automatically clsoe this window from vba script?

I tried this method and it did not work:

Please Login or Register  to view this content.

Thank you

[Logit]

.
Your image link goes to an advertisement. Are you advertising for that company ?

[zealot]

nope - could nto embed it here as usual...dialog says there are links which need to be updated...can it be clsoed from a macro?

[Logit]

.
See if this helps :

http://https://www.extendoffice.com/...ks-prompt.html


The following information can be found at : https://code.i-harness.com/en/q/e37bd4

Answers

Open the VBA Editor of Excel and type this in the Immediate Window (See Screenshot)

Application.AskToUpdateLinks = False
Close Excel and then open your File. It will not prompt you again. Remember to reset it when you close the workbook else it will not work for other workbooks as well.

ScreenShot:

EDIT

So applying it to your code, your code will look like this

Function getWorkbook(bkPath As String) As Workbook
Application.AskToUpdateLinks = False
Set getWorkbook = Workbooks.Open(bkPath, False)
Application.AskToUpdateLinks = True
End Function
FOLLOWUP

Sigil, The code below works on files with broken links as well. Here is my test code.

Test Conditions

Create 2 new files. Name them Sample1.xlsx and Sample2.xlsx and save them on C:\
In cell A1 of Sample1.xlsx, type this formula ='C:\[Sample2.xlsx]Sheet1'!$A$1
Save and close both the files
Delete Sample2.xlsx!!!
Open a New workbook and it's module paste this code and run Sample. You will notice that you will not get a prompt.
Code

Option Explicit

Sub Sample()
getWorkbook "c:\Sample1.xlsx"
End Sub

Function getWorkbook(bkPath As String) As Workbook
Application.AskToUpdateLinks = False
Set getWorkbook = Workbooks.Open(bkPath, False)
Application.AskToUpdateLinks = True
End Function

[zealot]

hank you for your kidn reply.....I inserted this code at the start of my macro and it did nto help((

Please Login or Register  to view this content.

I also used all the instrucitons here:

https://www.extendoffice.com/documen...ks-prompt.html


not sure why excel continues to show this promt......I also restarted excel - what do you think is the problem?

[zealot]

I also created a separate macro run it once and restarted excel -

Please Login or Register  to view this content.

excel simply ignores this(((

[zealot]

It appears that this message is coming up for workbooks that have not been recalculated; . Is it possible to suppress the warning when the link is to workbooks that have not been recalculated?

Also, I'm using Excel 2010.

[Logit]

.
It is difficult for me to provide specific information as I am not experiencing the same issue here. Nor have I
in the past.

Hopefully someone else will provide assistance to rectify the issue.

Please accept my apologies.