Savoir si le fichier est ouvert

[Sance]

Bonjour J'aimerai savoir comment faire pour savoir si un fichier .doc est déja ouvert.
Je m'explique, j'ai une macro excel qui m'ouvre un fichier word pour faire une recherche a l'interieure de se fichier word, par la suite j'aurai besoin de faire une autre recherche avec la meme macro dans le meme fichier word mais si je relance la macro il me réouvre un n'autre fichier et je voudrai éviter cela.
Donc j'aimerai savoir comment faire pour lui dire d'ouvrir le fichier word que s'il n'est pas ouvert sinon ne rien faire.

Merci de votre aide

 

[Guest]

Re : Savoir si le fichier est ouvert

Bonjour,

En nous joignant le fichier xl avec la macro se serait plus facile de répondre.

A+

 

[Sance]

Re : Savoir si le fichier est ouvert

Cela ne servirai a rien il me juste une fonction qui me permettra de savoir si le fichier est ouvert mettre ma macro en ligne ne servirai a rien.

 

[Denis]

Re : Savoir si le fichier est ouvert

Bonjour Sance, Hasco, et le Forum

ceci par exemple

On Error Resume Next
Set Source = Windows("TonFichier.xls")
If Err <> 0 Then Workbooks.Open ("C:\TonChemin\Cequetuveux.xls")

Bon courage et à +
Denis

 

[MJ13]

Re : Savoir si le fichier est ouvert

Bonjour àt ous

Sance, pas très sympa de ne pas mettre ta macro (c'est pas dans l'esprit d'XLD).

 

[Sance]

Re : Savoir si le fichier est ouvert

En faite se n'esp pas tout a fait cela qu'il me faut :
Je me rééxplique :
Set App_D2S_IHM = New Word.Application
Application.DisplayAlerts = True
App_D2S_IHM.Visible = True
Set Doc_D2S_IHM = App_D2S_IHM.Documents.Open
Ceci me permet d'ouvrir mon fichier word il se trouve dans une macro excel.
Je l'exécute une premiere fois pour faire une recherche a l'interieur se fichier word.
Ensuite j'éxécute a nouveau la macro excel pour faire une nouvelle recherche dans se meme fichier word mais comme il es déja ouvert je voudrai donc évité de le réouvrir.

Si je suis pas clair dite le moi
Merci

 

[Raja]

Re : Savoir si le fichier est ouvert

Bonjour, Salut à tous,

Regarde sur le lien suivant si ça peut te rendre service :

Code de macro pour vérifier si un fichier est déjà ouvert

 

[Sance]

Re : Savoir si le fichier est ouvert

Super merci pour votre aide