Opening a word doc without opening all attached links/reference

macropod · #9 07-20-2015, 11:48 PM

Unfortunately, Word doesn't provide a global setting, or even a 'Links' collection that one could use to programmatically change all the links. All that leaves you with is a macro to go through every field, shape and inlineshape in the document, looking for links to re-set. A macro you might use for that is:

Code:

Sub ToggleLinkUpdates()
Application.ScreenUpdating = False
Dim Rng As Range, Fld As Field, Shp As Shape, iShp As InlineShape, Rslt As Variant, bUpd As Boolean
Rslt = MsgBox("Set Link Updates to Auto (Y) or Manual (N)?", vbYesNoCancel, "Toggle Link Updates")
If Rslt = vbCancel Then Exit Sub: If Rslt = vbYes Then bUpd = True: If Rslt = vbNo Then bUpd = False
With ActiveDocument
  For Each Rng In .StoryRanges
    For Each Fld In Rng.Fields
      If Fld.Type = wdFieldLink Then Fld.LinkFormat.AutoUpdate = bUpd
    Next
    For Each Shp In Rng.ShapeRange
      If Not Shp.LinkFormat Is Nothing Then Shp.LinkFormat.AutoUpdate = bUpd
    Next
    For Each iShp In Rng.InlineShapes
      If Not iShp.LinkFormat Is Nothing Then iShp.LinkFormat.AutoUpdate = bUpd
    Next
  Next
End With
Application.ScreenUpdating = True
End Sub

You might also take a look at: https://support.microsoft.com/en-us/kb/970154 . Although written for Office 2007, the same applies to Office 2010. The Office 2010 Registry key, though, would be in -
HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\W ord\Options

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Word Template Always Opening	Hobbes	Word	7	09-24-2014 11:00 PM
Need Help With Opening a Word Document	PosseJohn	Word VBA	1	12-06-2013 01:16 PM
Word files not opening	dogMarine	Word	1	10-15-2012 11:32 AM
Opening Word XML files in IE8?	RBizzle	Word	0	09-13-2010 08:25 AM
Opening word docs	Bemklaver	Word	1	03-31-2010 02:22 AM