Tutorial para agregar tablas de Word Visual Basic

Las tablas son una característica esencial de la Palabra . Aparecen en todo tipo de documentos para ayudar a los usuarios de Word organizar visualmente los datos . Puede llevar mucho tiempo para crear las tablas de su agrado, pero si usted sabe algo acerca de Visual Basic , el lenguaje de scripting de Word , puede crear más rápidamente, poblar y dar formato a tablas . Estudiar el siguiente programa de Visual Basic le dará una ventaja inicial en la manipulación de tablas de Word a través de código . Tipo de código para crear una tabla

Sub mac () Dim donde As RangeDim NuTab Como cuadro

Set where = Selection.RangeSet NuTab = ActiveDocument.Tables.Add (donde , numrows : = 7 , NumColumns : . . . . = 3 )
nuTab.Columns

( 1 ) Pilas ( 1 ) Rango = nuTab.Columns " algunas cosas " ( 2 ) Las células ( 2 ) Rango = " algunas cosas más "

nuTab.AutoFormat wdTableFormatClassic1

Con nuTab.Columns ( 2 ) . células ( 2 ) Con . Fronteras ( wdBorderTop ) . LineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd withwith Fronteras . ( wdBorderBottom ) . LineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd conend With End Sub

------------------------- ------------- introduzca el código anterior en el IDE de Visual Basic ( entorno de desarrollo integrado) , que se puede entrar desde dentro de Word pulsando alt- F11 , y asegurando que está en la ventana de código (Ver> Código ) .

Ejecute el guión de regresar a Word, seleccionando " Developer > Macros ", seleccionando "mac " en la lista y pulsando " Ejecutar". Visual Basic crea una nueva tabla en el punto de inserción actual , añade algunos datos y formatos de una de las celdas .
Aprende el script funciona

Regresar a la IDE para estudiar el código. El comunicado conjunto en el = Selection.Range define una variable que representa la ubicación actual del cursor. Aquí es donde se va a instalar una nueva tabla. La segunda línea (Set NuTab = ... ) en realidad crea la tabla , con el objeto ActiveDocument hacerlo.

El par de declaraciones después de la declaración nuTable Set añade contenido a las tablas , a través de las columnas y celdas propiedades del objeto de tabla .
Buscar Miembros del objeto con el objeto Browser

Si usted está preocupado acerca de no conocer las funciones y propiedades ( por ejemplo, columnas específicas , células) de un objeto, usted puede obtener fácilmente una lista descriptiva de ellos pulsando F2 , que se llama el explorador de objetos . En el cuadro de búsqueda del navegador de objetos , puede introducir el término " Tablas" y presionar " Enter", seleccione "Tabla" en el panel de resultados de la derecha, y obtener una lista de todos los miembros de la Mesa .
< p> Volviendo al código , consulte la declaración "Con nuTab.Columns ( 2 ) . celdas ... " La palabra clave Con indica a Visual Basic que no desea que escribir una larga cadena de palabras de puntos de referencia en repetidas ocasiones a un método o una propiedad de un objeto (por ejemplo Object1.Object2.Object3.doThis ()) . En su lugar, desea acercar justo a los miembros de un objeto particular de la cadena. Por ejemplo :

Object1.Object2.Object3.doThis () End Con
aplicar formato

nuTab.AutoFormat declaración ... se aplica un esquema de borde a la tabla completa , mientras que la primera instrucción With empieza a formatear una celda individual . El formato de su código está aplicando no es específico de celdas de la tabla , pero puede trabajar con cualquier objeto Range . Los nuTab.Columns ( 2 ) . Células ( 2 ) objeto pasa a ser el objeto Range en este caso.

Experimente con diferentes opciones de formato que ofrece Word. Utilice el Examinador de objetos para encontrarlas. Comienza con la búsqueda de una opción conocida (por ejemplo wdLineStyleSingle ) , y darse cuenta de la recaudación de opciones similares de las que forma parte

.