Método Application.FileSaveWorkspace (Project)

Guarda una lista de archivos abiertos y la configuración actual en el cuadro de diálogo Opciones.

Sintaxis

expresión. FileSaveWorkspace( _Name_ )

expresión Variable que representa un objeto Application.

Parámetros

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Name	Opcional	String	El nombre de archivo que desea crear. Si se omite Name, Project solicitará el nombre de archivo.

Valor devuelto

Boolean

Ejemplo

En el ejemplo siguiente se guarda el área de trabajo en función del nombre del primer archivo del proyecto.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.