¿Cómo añadir comentarios o notas en Word desde Excel?

Para añadir comentarios o notas en un documento de Word desde Excel usando VBA (Visual Basic for Applications), puedes seguir estos pasos básicos:

Sub InsertCommentInWord()
    Dim wdApp As Object
    Dim wdDoc As Object
    Dim commentText As String
    
    ' Cambia esta ruta al archivo de Word que quieres abrir.
    Dim filePath As String
    filePath = "C:rutaalarchivodocumento.docx"
    
    ' Texto del comentario.
    commentText = "Este es un comentario añadido desde Excel."
    
    On Error Resume Next
    ' Intenta apoderarse de una instancia existente de Word
    Set wdApp = GetObject(, "Word.Application")
    If wdApp Is Nothing Then
        ' Si no hay una instancia abierta, crea una nueva
        Set wdApp = CreateObject("Word.Application")
        wdApp.Visible = True
    End If
    On Error GoTo 0
    
    ' Abre el documento de Word
    Set wdDoc = wdApp.Documents.Open(filePath)
    
    ' Navega a la ubicación deseada en el documento
    ' Aquí simplemente se mueve al principio del documento
    wdApp.Selection.HomeKey Unit:=6 ' 6 es wdStory, el inicio del documento
    
    ' Inserta un comentario en la selección actual
    wdDoc.Comments.Add Range:=wdApp.Selection.Range, Text:=commentText
    
    ' Guardar los cambios y cerrar el documento
    wdDoc.Save
    wdDoc.Close
    wdApp.Quit
    
    ' Limpieza
    Set wdDoc = Nothing
    Set wdApp = Nothing
    
    MsgBox "Comentario añadido con éxito."
End Sub
  • Abrir el Editor de VBA:
    • Presiona `Alt + F11` en Excel para abrir el Editor de VBA.
  • Insertar un Módulo:
    • Haz clic en `Insertar` > `Módulo` para agregar un nuevo módulo a tu proyecto de VBA.
  • Escribir el Código VBA:
    • Copia y pega el siguiente código VBA en el módulo que acabas de crear. Este código abrirá un documento de Word y añadirá un comentario en un lugar específico del texto.
  • Modificar la Ruta del Archivo:
    • Asegúrate de cambiar la ruta del archivo `filePath` al documento de Word en el que deseas añadir el comentario.
  • Ejecutar el Código:
    • Presiona `F5` o ve a `Ejecutar` > `Ejecutar Sub/UserForm` para ejecutar el código.

Este script abrirá un documento de Word, añadirá un comentario al comienzo del documento y luego lo guardará. Puedes modificar la parte del código que determina dónde insertar el comentario para ajustarlo a tus necesidades específicas, como seleccionar un texto específico o una posición diferente.

Recuerda que este método utiliza automatización OLE, por lo que deberías tener tanto Excel como Word instalados en el sistema en el que ejecutas el script.

Conoce nuestros servicios

Conoce nuestra tienda

Mejora tu nivel y logra tus objetivo

Excel

Excel cursos

Access

cursos de Access

Power BI

cursos power BI

Deja un comentario