Microsoft KB Archive/181529

= WD98: Reference Type Changed in Code, Not in Cross- Reference =

Article ID: 181529

Article Last Modified on 6/17/2005

-

APPLIES TO


 * Microsoft Word 98 for Macintosh

-



This article was previously published under Q181529





SYMPTOMS
When you attempt to set the Reference Type in the Cross-reference dialog box using a Microsoft Visual Basic for Applications procedure or macro, the Reference Type you specify in your procedure or macro is not selected as the Reference Type when you view the Cross-reference dialog box. The dialog box ignores the Reference Type specified in the procedure or macro.



WORKAROUND
In Microsoft Word Visual Basic for Applications code us the SendKeys statement to access and set the built-in dialog box argument list items.



STATUS
Microsoft has confirmed this to be a problem in the Microsoft products listed at the beginning of this article.



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. To demonstrate the problem, the following Visual Basic macro attempts to set the Reference Type to "Bookmark": Sub SetXRefType With Dialogs(wdDialogInsertCrossReference) .Referencetype = "Bookmark" .Update .Show End With End Sub When you view the Cross-reference dialog box, the Reference Type is not set to Bookmark. (To view the Cross-reference dialog box, click Cross-reference on the Insert menu.)

To change the type to "Bookmark" and the reference to "Page Number" in the Cross Reference dialog box use the following example. Sub WorkaroundSetXRefType With Dialogs(WdDialogInsertCrossReference) SendKeys "%tb" SendKeys "{enter}" SendKeys "%r" SendKeys "{down 1}" SendKeys "{enter 2}" .Show End With End Sub

