This documentation is archived and is not being maintained.

TemplateFolderPath Property.TemplateFolderPath Property

Office 2007
Returns a String that represents the location where Microsoft Office Publisher templates are stored. Read-only.



expression   A variable that represents a TemplateFolderPath Property object.

Return Value


This example creates a new publication and edits the master page to contain a page number in a star in the upper-left corner of the page; then it saves the new publication to the template folder location so that it can be used as a template.

Visual Basic for Applications
Sub CreateNewPubTemplate()
    Dim AppPub As Application
    Dim DocPub As Document
    Dim strFolder As String

    Set AppPub = New Publisher.Application
    Set DocPub = AppPub.NewDocument
    AppPub.ActiveWindow.Visible = True
    strFolder = AppPub.TemplateFolderPath

    With DocPub
        With .MasterPages(1).Shapes.AddShape _
                (Type:=msoShape5pointStar, Left:=36, _
                Top:=36, Width:=50, Height:=50)
            .Fill.ForeColor.RGB = RGB(Red:=255, Green:=0, Blue:=0)
            With .TextFrame.TextRange
                .ParagraphFormat.Alignment = pbParagraphAlignmentCenter
                With .Font
                    .Bold = msoTrue
                    .Color.RGB = RGB(Red:=255, Green:=255, Blue:=255)
                    .Size = 12
                End With
            End With
        End With
        .SaveAs FileName:=strFolder & "\"
    End With
End Sub