Bucle para leer todos los reg.de Excel
Publicado por ino (4 intervenciones) el 09/08/2005 18:31:47
Una ayudita pls.
Necesito hacer un bucle en Word para leer una planilla de Excel y grabar los campos en Word. Como hago?
El dowhile debe terminar con EOF
Me imagino algo asi:
Ruta1 = App.Path & "\Reporte.xls"
Set objLibro = objExcel.WorkBooks.Open(Ruta1)
do while not eof()
read excel
MsgBox objLibro.Worksheets(1).Range("B2").Value
Enddo
Gracias
Necesito hacer un bucle en Word para leer una planilla de Excel y grabar los campos en Word. Como hago?
El dowhile debe terminar con EOF
Me imagino algo asi:
Ruta1 = App.Path & "\Reporte.xls"
Set objLibro = objExcel.WorkBooks.Open(Ruta1)
do while not eof()
read excel
MsgBox objLibro.Worksheets(1).Range("B2").Value
Enddo
Gracias
Valora esta pregunta
0