Microsoft Word 2000 o una versión posterior
Mostrar más instrucciones
1
Abra la aplicación Microsoft Word y crear un nuevo documento con la plantilla en blanco .
Página 2
Abrir el editor de Visual Basic utilizando las teclas de "F11 ", "Alt " y .
3
Seleccione "Herramientas" en la barra de menús , haga clic en el tema "Referencia". Desplazarse a través de las referencias disponibles a la entrada " Microsoft Visual Basic para Aplicaciones de extensibilidad . " Después de seleccionar el elemento, haga clic en el botón " OK" .
4
Seleccione la opción " Insertar " de la barra de menús y haga clic en la opción "Módulo " .
5
Inserte el siguiente código para crear un botón que al hacer clic se mostrará un mensaje de texto :
Sub Test ()
'Agregar un botón de comando a un nuevo documentDim doc Como Word.DocumentDim shp Como Palabra . InlineShapeSet doc = Documents.Add
Set env = = " Haga clic aquí"
'Añadir un procedimiento para el evento click del InlineShape ' ** Nota : El evento click reside en el presente Documento moduleDim sCode Como StringsCode = " Private Sub " y shp.OLEFormat . Object.Name & " _Click ( ) " & vbCrLf & _ " MsgBox " " ha hecho clic en el botón de comando " "" & vbCrLf & _ " " doc.VBProject.VBComponents End Sub ( " ThisDocument ") . CodeModule . AddFromString sCode
End Sub
6
ejecutar el código con la tecla "F5 " . Seleccione la macro "Test " de la lista del menú y haga clic en " Ejecutar".
7
Haga clic en el botón " Haz clic aquí" en el nuevo documento de Word en la pantalla . Un cuadro de mensaje aparecerá con el texto " ha hecho clic en el botón de comando . "