Combinar correspondencia
Publicado por Carlos (15 intervenciones) el 13/04/2009 14:13:38
Hola:
Tengo un documento word que combina campos de una tabla de SQ Server, esto lo hace perfectamente abriéndolo desde word
El problema se presenta cuando abro el documento desde Visual, los iconos de combinar correspondencia aparecen desactivados.
Dim Wrd As New Word.ApplicationClass()
Dim Documento As Word.Document
Try
Documento = Wrd.Documents.Open("c:imprimir SQL.DOC", , , , "abrir")
Wrd.Visible = True ' //Se Abre el documento WORD
Catch Exp As Exception
MsgBox(Exp.Message, MsgBoxStyle.Critical, "Error")
End Try
Qué línea de programación falta para que al abrir el documento desde visual se activen los iconos de combinar correspondencia.
Un saludo.
Tengo un documento word que combina campos de una tabla de SQ Server, esto lo hace perfectamente abriéndolo desde word
El problema se presenta cuando abro el documento desde Visual, los iconos de combinar correspondencia aparecen desactivados.
Dim Wrd As New Word.ApplicationClass()
Dim Documento As Word.Document
Try
Documento = Wrd.Documents.Open("c:imprimir SQL.DOC", , , , "abrir")
Wrd.Visible = True ' //Se Abre el documento WORD
Catch Exp As Exception
MsgBox(Exp.Message, MsgBoxStyle.Critical, "Error")
End Try
Qué línea de programación falta para que al abrir el documento desde visual se activen los iconos de combinar correspondencia.
Un saludo.
Valora esta pregunta
0