No Visual Basic Method for SET.UPDATE.STATUS (108384)

MORE INFORMATION

Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. NOTE: The macros provided in this article will work only if the link was created by following these steps:

1. Copy the information you want linked from your Microsoft Word document (or other document).
2. Switch to Microsoft Excel.
3. On the Edit menu, click Paste Special.
4. In the Paste Special dialog box, click Microsoft Word Document Object (or another document object type), and then click Paste Link.
5. Click OK.

Otherwise, if you linked to your Word document with the following steps, the link is different and the macros shown below will not work:

1. Click Object on the Insert menu in Microsoft Excel.
2. On the "Create from File" tab, enter the name of the source Word document, click to select the "Link to File" check box, and then click OK.

The following sample macro sets the update status to Manual in the Links dialog box (click Links on the Edit menu). This macro assumes that the link in Microsoft Excel is to a Microsoft Word document titled "Document1" or "Doc" (without the quotation marks).

NOTE: SET.UPDATE.STATUS requires that the document name include the correct path to the document and the three letter Windows file name extension if present.

Microsoft Excel 97 and Microsoft Excel 98 Macro Example

 Sub LinkStatus()

       ExecuteExcel4Macro _
         "SET.UPDATE.STATUS(""Word.Document.8|Document1!!OLE_LINK1"",2,2)"

   End Sub

Microsoft Excel version 7.0 Macro Example

   Sub LinkStatus()

       ExecuteExcel4Macro _
         "SET.UPDATE.STATUS(""Word.Document.6|Document1!!OLE_LINK1"",2,2)"

   End Sub

Microsoft Excel version 5.0 Macro Example

   Sub LinkStatus()

       ExecuteExcel4Macro _
         "SET.UPDATE.STATUS(""Word.Document.6|Doc!!DDE_LINK1"",2,2)"

   End Sub