Partager via


Méthode Application.FileSaveWorkspace (Project)

Enregistre une liste des fichiers ouverts et les paramètres actifs de la boîte de dialogue Options.

Syntaxe

expression. FileSaveWorkspace( _Name_ )

expression Variable qui représente un objet « Application ».

Paramètres

Nom Requis/Facultatif Type de données Description
Name Facultatif String Nom du fichier à créer. Si Name n'est pas spécifié, Project demande le nom du fichier.

Valeur renvoyée

Boolean

Exemple

L'exemple suivant montre comment enregistrer l'espace de travail en fonction du nom du premier fichier de projet.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.