Moverse y editar tablas dococumento word desde VB

Juan
02 de Marzo del 2004
Hola,
quiero hacer unos informes y para ello utilizaré una plantilla de word con muchas tablas, quiero desde VB ir llenandolas.

He encontrado un método pero creo que es muy rudimentario y gasta muchos recursos, lo he empezado a implementar de la siguiente forma:

Dim CeldaEdicion As Cell

Set CeldaEdicion = Midoc.Tables(1).Cell(Row:=1, Column:=2)
CeldaEdicion.Range.InsertAfter "EXP1"
Set CeldaEdicion = Nothing

Set CeldaEdicion = Midoc.Tables(1).Cell(Row:=2, Column:=2)
CeldaEdicion.Range.InsertAfter "93.377.53.11"
Set CeldaEdicion = Nothing

Set CeldaEdicion = Midoc.Tables(2).Cell(Row:=1, Column:=1)
CeldaEdicion.Range.InsertAfter "segunda tabla 1/1"
Set CeldaEdicion = Nothing

Saben alguna otra forma de hacerlo sin tener que utilizar la variable tipo Cell? Es un documento de una solicitud y tiene como 100 o 120 campos (hago el informe en formato word)

Además, solo se utilizar el método "InsertAfter" y no puedo cambiar de fuente en la misma celda. Me gustaria saber si existe otra forma de hacerlo.

Un saludo y muchas gracias


sdemingo
02 de Marzo del 2004
échale un ojo a este truquillo....

http://puntovisualbasic.webcindario.com/tutoriales.php?id=1

salu2
sdemingo
http://boards.melodysoft.com/sdemingo