Cómo establecer una referencia a un objeto de Word Uso de Excel VBA

Conocer cómo hacer referencia a un objeto de Word le puede ahorrar tiempo al programar en Visual Basic para Aplicaciones ( VBA) . Microsoft Word es un procesador de texto incluido en la suite de Microsoft Office. VBA es un lenguaje de programación de uso general en los programas de Microsoft Office para automatizar tareas rutinarias. Es necesario hacer referencia a un objeto de Word antes de escribir código VBA para leer un documento de Word. En pocos pasos se puede escribir algunas subrutinas para leer un documento de Word. Instrucciones
1

Abra Microsoft Excel 2007 y haga clic en la pestaña " desarrolladores" y luego seleccione "Visual Basic ".

Haga clic en el menú " Herramientas " y seleccione "Referencias ... " . Marque la casilla junto a "Word 12.0 biblioteca de objetos de Microsoft " y seleccione " Aceptar".
2

Escriba lo siguiente para crear un nuevo subprograma:

Sub Wordreference ()

Pulse " Enter".
3

Escriba el siguiente para hacer referencia a un objeto de Word :

wordDoc As Word.Document

Set wordApplication = CreateObject ( " Word.Application " )

Set wordDoc = wordApplication.Documents.Open ("C: \\ WordDoc.doc " )

puede editar "C: \\ WordDoc.doc " e introduzca una ruta al documento de Word que desea hacer referencia
4

escriba lo siguiente para llamar al " ReadWord " subprograma: .

Call ReadWord ( wordDoc )

5

Escriba lo siguiente para crear el subprograma " ReadWord " y aparecerá un cuadro de mensaje con el texto leído en el documento de Word :

Private Sub ReadWord ( wrdDoc As Object )

Dim PRANGE Como Word.Range

Pcnt Dim As Long

wrdDoc

Para Pcnt = 1 To. Paragraphs.Count

Set PRANGE = . Range ( Inicio: . . = párrafos ( Pcnt ) Range.Start , _

finales: . . = párrafos ( Pcnt ) Range.End )

MsgBox ( pRange.Text )
< p > Siguiente Pcnt

. Close to

extremo con

End Sub
6

Press "F5 " para ejecutar la subrutina " Wordreference " .