
Para guardar un documento de Word desde Excel con un nombre específico, necesitarás utilizar macros de VBA (Visual Basic for Applications). Aquí te dejo un ejemplo de cómo hacerlo:
- Abrir el Editor de VBA:
- Abre Excel.
- Presiona `Alt + F11` para abrir el editor de VBA.
- Insertar un nuevo módulo:
- En el editor de VBA, haz clic en `Insertar` > `Módulo` para crear un nuevo módulo.
- Escribe el código:
Aquí tienes un ejemplo de código que abre un documento de Word, edita o modifica el contenido si es necesario, y luego lo guarda con un nombre específico:
Sub GuardarDocumentoWord()
Dim WordApp As Object
Dim WordDoc As Object
Dim docPath As String
Dim savePath As String
' Establece la ruta del documento existente
docPath = "C:rutaaldocumentotuDocumento.docx"
' Establece la ruta donde deseas guardar el documento
savePath = "C:rutadeguardadoNuevoNombre.docx"
' Crea una instancia de Word
On Error Resume Next
Set WordApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
Set WordApp = CreateObject("Word.Application")
End If
On Error GoTo 0
' Abre el documento de Word
Set WordDoc = WordApp.Documents.Open(docPath)
' Aquí puedes realizar cualquier modificación al documento de Word
' WordDoc.Content.Find.Execute FindText:="TextoOriginal", ReplaceWith:="TextoNuevo", Replace:=2
' Guarda el documento con un nombre específico
WordDoc.SaveAs2 Filename:=savePath
' Cierra el documento y la aplicación de Word
WordDoc.Close
WordApp.Quit
' Libera las variables de objeto
Set WordDoc = Nothing
Set WordApp = Nothing
End Sub
- Modificar el código:
- Cambia `docPath` por la ruta de tu documento de Word actual.
- Cambia `savePath` por la ruta y el nombre que deseas dar al nuevo documento.
- Ejecutar la macro:
- Regresa a Excel, presiona `Alt + F8`, selecciona `GuardarDocumentoWord`, y haz clic en `Ejecutar`.
Con esto, tu documento de Word será guardado en la ubicación que especificaste con el nombre que decidiste. Asegúrate de que las rutas sean correctas y que tengas permisos para acceder a los directorios indicados.
Conoce nuestros servicios



