Para meter una tabla seria asi:
Cita:
Variant TablasWord= WordDoc.OlePropertyGet("Tables");
Variant selRange = Selection.OlePropertyGet("Range");
//Con la siguiente linea creamos una tabla, con 1 fila y 4 columnas, visible
//y ancho fijo.
Variant NuevaTabla= TablasWord.OleFunction("Add", selRange, (Variant) 1,(Variant) 4, (Variant) 1, (Variant) 0);
|
Y para meter datos en la tabla:
Cita:
//Seleccionamos la tabla sobre la que queremos escribir.
Variant Tabla1= TablasWord.OleFunction("Item", (Variant) 1);
//Seleccionamos la fila y columna (1,1)
Variant tableCell = Tabla1.OleFunction("Cell", (Variant) 1,(Variant) 1);
Variant cellRange = tableCell.OlePropertyGet("Range");
//Escribimos el valor que queramos.
cellRange.OlePropertySet("Text", (Variant) "1-1");
|
Por si le sirve a alguien.
Un saludo
Antonio