Q117826 - WD: WordBasic Macro to Test for an Existing Style Name

WD: WordBasic Macro to Test for an Existing Style Name

Q117826

The information in this article applies to:

Microsoft Word for Windows, versions 6.0, 6.0a, 6.0c
Microsoft Word for Windows 95, versions 7.0, 7.0a
Microsoft Word for the Macintosh, versions 6.0, 6.0.1, 6.0.1a

SUMMARY

When you write macros in Microsoft Word, you may need to test for the existence of a style name before modifying or deleting the style. If your macro does not check for the existence of a style before attempting to modify or delete the style, the FormatStyle command may return the following error message:

This style name does not exist.

MORE INFORMATION

The following WordBasic macro tests for an existing style named "Test." If the style exists, Word deletes the style.


   Sub MAIN
   sStyleName$ = "Test"
   If StyleDesc$(sStyleName$) = "" Then
    MsgBox sStyleName$ + " does not exist", "Style Name"
   Else
    FormatStyle .Name = sStyleName$, .Delete
   End If
   End Sub

For more information about how to do this in Word 97, please see the following articles in the Microsoft Knowledge Base:

Q158847 Word 97: Macro To Test For An Existing Style Name

REFERENCES

"Microsoft Word Developer's Kit," version 6.0, pages 706-707

Additional query words: WordBasic delete style FormatStyle

Keywords : kberrmsg kbmacro kbprogramming kbdtacode kbmacroexample winword macword word6 word7 word95
Issue type : kbhowto
Technology : kbHWMAC kbOSMAC kbWordSearch kbWordMacSearch kbWord700Search kbZNotKeyword2 kbWord600Mac kbWord601aMac kbWord601Mac kbWord600 kbWord600a kbWord600c kbWord700 kbWord700a