Dim objDoc As Document

Hej Jeg har et script som skulle åbne et word dokument og derefter ændre dens template til "Normal".

Når jeg aktivere scriptet får jeg følgende fejl.

Compile error:
Use-defined type not defined

problemet ser ud til at være
  Dim objDoc As Document
  Dim objTemplate As Template
  Dim dlgTemplate As Dialog
da den ikke kender Document, Template og Dialog

Mit spørgsmål er så hvordan definere man nye data typer?

*** script ***
Private Sub CommandButton1_Click()

    Dim strFilePath As String
    Dim strPath As String
    Dim intCounter As Integer
    Dim strFileName As String
    Dim OldServer As String
    Dim objDoc As Document
    Dim objTemplate As Template
    Dim dlgTemplate As Dialog
    Dim nServer As Integer

    'hardcode the name of the old server.


    OldServer = "filserver"
    nServer = Len(OldServer)
    strFilePath = InputBox("What is the folder location that you want to use?")


    If Right(strFilePath, 1) <> "\" Then strFilePath = strFilePath & "\"
        strFileName = Dir(strFilePath & "*.doc")
        Do While strFileName <> ""
        Set objDoc = Documents.Open(strFilePath & strFileName)
        Set objTemplate = objDoc.AttachedTemplate
        Set dlgTemplate = Dialogs(wdDialogToolsTemplates)
        strPath = dlgTemplate.Template
   
    If LCase(Left(strPath, nServer)) = LCase(OldServer) Then
        objDoc.AttachedTemplate = NormalTemplate

    End If

    strFileName = Dir()
    objDoc.Save
    objDoc.Close

    Loop

    Set objDoc = Nothing
    Set objTemplate = Nothing
    Set dlgTemplate = Nothing

End Sub