No se realiza la combinación
Publicado por jes (4 intervenciones) el 07/04/2008 10:36:04
Hola.
Explico el escenario.
Realizo una base de datos que se combinaba con unos documentos de Word 2000,
al evento de unos botones.
Al actualizar a 2003 no me combina, es decir siempre me aparace combinado el
mismo registro.
El código es el siguiente:
Dim objWord As Word.Application
Set objWord = New Word.Application
If Dir("\servidor uta" & carpeta, vbDirectory) = "" Then
fs.CreateFolder "\servidor uta" & carpeta
objWord.Documents.Open ("\servidor utaejemplo.doc")
objWord.DDETerminateAll
objWord.ActiveDocument.SaveAs FileName:="\servidor uta" & carpeta & "" &
"ejemplo.doc", FileFormat:=wdFormatRTF
objWord.Documents.Close (yes)
Como podría solucionarlo.
Explico el escenario.
Realizo una base de datos que se combinaba con unos documentos de Word 2000,
al evento de unos botones.
Al actualizar a 2003 no me combina, es decir siempre me aparace combinado el
mismo registro.
El código es el siguiente:
Dim objWord As Word.Application
Set objWord = New Word.Application
If Dir("\servidor uta" & carpeta, vbDirectory) = "" Then
fs.CreateFolder "\servidor uta" & carpeta
objWord.Documents.Open ("\servidor utaejemplo.doc")
objWord.DDETerminateAll
objWord.ActiveDocument.SaveAs FileName:="\servidor uta" & carpeta & "" &
"ejemplo.doc", FileFormat:=wdFormatRTF
objWord.Documents.Close (yes)
Como podría solucionarlo.
Valora esta pregunta


0