Application.FileSaveWorkspace method (Project)

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


expression. FileSaveWorkspace( _Name_ )

expression A variable that represents an Application object.


Name Required/Optional Data type Description
Name Optional String The name of the file to create. If Name is omitted, Project prompts for the file name.

Return value



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" 
        WSName = Projects(1).Name & ".MPW" 
    End If 
    FileSaveWorkspace WSName 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.