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.