Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Agrega una carpeta a la biblioteca de documentos en un área de trabajo compartida. Devuelve un objeto SharedWorkspaceFolder.
Nota:
A partir de Microsoft Office 2010, este objeto o miembro no se debe usar más.
Sintaxis
expresión. Agregar (FolderName, ParentFolder)
expresión necesaria. Variable que representa un objeto SharedWorkspaceFolders.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| FolderName | Obligatorio | String | Nombre de la carpeta que se va a agregar a la actual área de trabajo compartida. |
| ParentFolder | Opcional | SharedWorkspaceFolder | Subcarpeta en la que se va a ubicar la nueva carpeta, si no se coloca en la carpeta principal de la biblioteca de documentos en el área de trabajo compartida. Si desea agregar la carpeta a la carpeta principal de la biblioteca de documentos, deje en blanco este argumento opcional. |
Ejemplo
En el siguiente ejemplo se agrega una nueva carpeta a la colección de carpetas del área de trabajo compartida.
Dim swsFolder As Office.SharedWorkspaceFolder
Set swsFolder = ActiveWorkbook.SharedWorkspace.Folders.Add("MyNewFolder")
MsgBox "New folder: " & swsFolder.FolderName, _
vbInformation + vbOKOnly, _
"New Folder in Shared Workspace"
Set swsFolder = Nothing
Vea también
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.