Microsoft KB Archive/186715

From BetaArchive Wiki
Knowledge Base


Article ID: 186715

Article Last Modified on 6/17/2005



APPLIES TO

  • Microsoft Word 98 for Macintosh



This article was previously published under Q186715

SYMPTOMS

When you view the Type property of a Word template (on the File menu click Properties, and then click the General tab), the Type shown is Microsoft Word Document.

WORKAROUND

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 work around this problem, use the following sample Microsoft Visual Basic for Applications macro to display the correct file type. You can assign this macro to a toolbar button or the File menu.

   Sub ShowFileType()

      If Documents.Count <> 0 Then
         Select Case ActiveDocument.SaveFormat
            Case wdFormatTemplate
               MsgBox "Word Template"
            Case wdFormatDocument
               MsgBox "Word Document"
            Case wdFormatDOSText
               MsgBox "MS-DOS Text"
            Case wdFormatDOSTextLineBreaks
               MsgBox "MS-DOS Text w/ LineBreaks"
            Case wdFormatRTF
               MsgBox "Rich Text Format"
            Case wdFormatText
               MsgBox "Text Only"
            Case wdFormatTextLineBreaks
               MsgBox "Text Only w/ Line Breaks"
            Case wdFormatUnicodeText
               MsgBox "Unicode Text"
            Case Else
               MsgBox FileConverters(ActiveDocument.SaveFormat).FormatName
         End Select
      End If

   End Sub
                

STATUS

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

MORE INFORMATION

For more information about adding a command to a menu, click Contents And Index on the Help menu (or on the Balloon Help menu if you are using a version of the Macintosh operating system earlier than 8.0), click the Index button in Word Help, type the following text

menus, commands


and then click Show Topics. Select the "Add a command or other item to a menu" topic, and click Go To. If you are unable to find the information you need, ask the Office Assistant.

For additional information, please see the following article in the Microsoft Knowledge Base:

181058 OFF98: How to Run Sample Code from Knowledge Base Articles


Keywords: kbbug kbmacroexample kbtemplate kbdtacode kbpending KB186715