Comobinar corresondencia desde una macro

Estimados Amigos,

Entorno: Office 2000

El tema es el siguiete: Tengo una macro realizada en Excel, en la cual abro
un documento Word (que previamente se le han insertado unos campos de
combinación tipo {MergeField NombreEmpresa} ) y le asocio un origen de datos
que en este caso es el propio libro Excel desde donde se llama al documento.
El caso es que cada vez que ejecuto la macro, Word me vuelve abrir el origen
de datos, cuando en realidad ya esta abierto, con el consiguiente mensaje "El
fichero ya esta en uso y si deseo abrirlo como solo lectura". ¿Sabe alguien
como evitar que se abra el origen de datos si ya esta abierto?

El codigo de la macro es el siguiente:

appWD.Documents.Open sFichero
Set DocComent = appWD.ActiveDocument
With DocComent.MailMerge
.OpenDataSource Name:=ThisWorkbook.FullName, _
ReadOnly:=True, _
Revert:=False, _
Connection:="DatosWord"
End With

El metodo "Revert", es para indicarle que hacer si el origen de datos esta
abierto. Lo he probado tanto con "true" como con "False" y me sigue abriendo
el origen de datos.

Agradeceria cualquier ayuda.

Muchas Gracias de antemano.

Hola:
No acabo de entender. Dices que llamas a la macro desde Excel que es donde tienes el
origen de datos ¿no? Entonces no creo que Word vuelva a abrir el origen de datos sino
que, sino has cerrado Word, estás intentando abrir un fichero ya abierto. ¿Cuál es el
fichero que te dice que está abierto: el de excel o el de word?

Marta PM
Saúdos/Saludos
MVP Office

(Si quieres escribirme ya sabes lo que no quiero)
Más consejos en www.fermu.com
__________
La información contenida en este mensaje se proporciona "TAL CUAL", sin garantías
explícitas ni implícitas, y no otorga derecho alguno. Usted asume cualquier riesgo al
poner en práctica lo recomendado o sugerido en el presente mensaje.

¿Quieres saber que es un MVP?
http://mvp.support.microsoft.com/

"oze de Antakira" <oze de escribió en el mensaje
news:
> Estimados Amigos,
>
> Entorno: Office 2000
>
> El tema es el siguiete: Tengo una macro realizada en Excel, en la cual abro
> un documento Word (que previamente se le han insertado unos campos de
> combinación tipo {MergeField NombreEmpresa} ) y le asocio un origen de datos
> que en este caso es el propio libro Excel desde donde se llama al documento.
> El caso es que cada vez que ejecuto la macro, Word me vuelve abrir el origen
> de datos, cuando en realidad ya esta abierto, con el consiguiente mensaje "El
> fichero ya esta en uso y si deseo abrirlo como solo lectura". ¿Sabe alguien
> como evitar que se abra el origen de datos si ya esta abierto?
>
> El codigo de la macro es el siguiente:
>
> appWD.Documents.Open sFichero
> Set DocComent = appWD.ActiveDocument
> With DocComent.MailMerge
> .OpenDataSource Name:=ThisWorkbook.FullName, _
> ReadOnly:=True, _
> Revert:=False, _
> Connection:="DatosWord"
> End With
>
> El metodo "Revert", es para indicarle que hacer si el origen de datos esta
> abierto. Lo he probado tanto con "true" como con "False" y me sigue abriendo
> el origen de datos.
>
> Agradeceria cualquier ayuda.
>
> Muchas Gracias de antemano.
>
>