Table of contents
TOC
Collapse the table of content
Expand the table of content

Application.FileSaveWorkspace Method (Project)

office 365 dev account|Last Updated: 6/12/2017
|
1 Contributor

Saves a list of open files and the current settings in the Options dialog box.

Syntax

expression. FileSaveWorkspace( ** Name** )

expression A variable that represents an Application object.

Parameters

NameRequired/OptionalData TypeDescription
NameOptionalStringThe name of the file to create. If Name is omitted, Project prompts for the file name.

Return Value

Boolean

Example

The following example saves the workspace based upon the name of the first project file.

Sub SaveWorkspaceByProjectName() 

    Dim WSName As String 

    If InStr(Projects(1).Name, ".") Then 
        WSName = Left$(Projects(1).Name, Len(Projects(1).Name) - 1) &; "W" 
    Else 
        WSName = Projects(1).Name &; ".MPW" 
    End If 

    FileSaveWorkspace WSName 
End Sub
© 2018 Microsoft