Como lo Hago?
Publicado por Iván Calderón (76 intervenciones) el 07/02/2005 19:33:16
Saludos a Todos de Antemano Muchas Gracias Mi Problema es el Siguiente, Estoy desarrollando un sistema que crea un documento llamado hoja de asignacion dicho documento es una hoja de word donde aparecen los datos de las personas que se seleccionen en un formulario, yo cree un documento en word con marcadores de forma que cuando llamo al documento modifico los valores de los marcadores por los campòs q hay en una tabla temporal q utiliso. pero necesito que ese documento imprima una hoja por cada persona que se encuentre en la temporal, entonces hice lo siguiente
with dtatemporal
.movefirst
do while not .eof
xdocumento.documents(1).bookmarks("cedula").select
xdocumento.documents(1).bookmarks("cedula").range=!cedula
xdocumento.documents(1).bookmarks("nombre").select
xdocumento.documents(1).bookmarks("nombre").range=!nombre
' y asi con todos los campos y despues
xdocumento.documents(1).printout
.movenext
loop
end with
xdocumento.visible=true
set xdocumento=nothing
'para el primer registro funciona bien pero cuando vuelve a
'ejecutar el ciclo no reconoce los marcadores y da error
'es decir, necesito que los marcadores se mantengan y no se borren
'cualquier ayuda y sugerencia q me puedan brindar se los
'agradecere enormente
with dtatemporal
.movefirst
do while not .eof
xdocumento.documents(1).bookmarks("cedula").select
xdocumento.documents(1).bookmarks("cedula").range=!cedula
xdocumento.documents(1).bookmarks("nombre").select
xdocumento.documents(1).bookmarks("nombre").range=!nombre
' y asi con todos los campos y despues
xdocumento.documents(1).printout
.movenext
loop
end with
xdocumento.visible=true
set xdocumento=nothing
'para el primer registro funciona bien pero cuando vuelve a
'ejecutar el ciclo no reconoce los marcadores y da error
'es decir, necesito que los marcadores se mantengan y no se borren
'cualquier ayuda y sugerencia q me puedan brindar se los
'agradecere enormente
Valora esta pregunta


0