imprimir reporte en word

[jose58]

buenos dias, muchachos (A)s d casulaidad sabran como hago para exportar datos de visual a word para luego imprimir un reporte, o en todo caso a excel el fin es imprimir un pequeño recibo, no quiero usar cristal report porque esto es de urgencia...

[Xmundus]

Iniciado por jose58

buenos dias, muchachos (A)s d casulaidad sabran como hago para exportar datos de visual a word para luego imprimir un reporte, o en todo caso a excel el fin es imprimir un pequeño recibo, no quiero usar cristal report porque esto es de urgencia...

amigo si llegas a saber com exportar los datos te los agradeceria que me lo comunicaras yo tambien ando en las misma s

[email protected]

[DurinVii]

La manera de la que yo he solucionado este problema es a través de código de vba. Si te creas un objeto y luego lo declaras de tipo word

Código:

Dim objWord As Object 
Set objWord = CreateObject("Word.Application"

luego te declaras como quieres que tenga las propiedades el documento y toda la pesca, reyenando el documento como tu quieras, esto búscalo en internet que está, yo lo he encontrado xD. La forma de escribir en un doc es:

Código:

With objWord
            .Selection.TypeParagraph
            .Selection.TypeText Text:=""
end with

Dentro de este with u end with, es donde has de poner el documento de word como tu quieras, aquí podras hacer las cosas a tu gusto e imaginación, pero hacerlo todo a pelo es tedioso. Y despues de terminar te recomiendo que hagas lo siguiente:

Código:

With objWord.ActiveDocument
            .SaveAs "" & sDirectorio & "" & sNombre & ".doc"
            .Close
End With
objWord.Quit
Set objWord = Nothing

sDirectorio es la cadena del directorio donde quieres guardar el documento y el snombre es el nombre del documento podria ser algo así, "c:\documento.doc"