Discussion :

[DJBORIE]

Bonjour,

Je cherche à ouvrir un fichier (word, txt, excel, ...), et attendre la fermeture de celui-ci.

J'ai trouvé le code ci-dessous :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Public Function ExecCmd(ByRef vsCmdLine As String, Optional ByRef vsParameters As String, Optional ByRef vsCurrentDirectory As String = vbNullString, Optional ByVal vnShowCmd As Long = SW_SHOW, Optional ByVal vnTimeOut As Long = 200) As Long
Dim lpShellExInfo As SHELLEXECUTEINFOA
    With lpShellExInfo
        .cbSize = Len(lpShellExInfo)
        .lpDirectory = vsCurrentDirectory
        .lpVerb = "open"
        .lpFile = vsCmdLine
        .lpParameters = vsParameters
        .nShow = vnShowCmd
        .fMask = SEE_MASK_DOENVSUBST Or SEE_MASK_NOCLOSEPROCESS Or SEE_MASK_IDLIST
    End With
 
    If ShellExecuteEx(lpShellExInfo) Then
        Do While WaitForSingleObject(lpShellExInfo.hProcess, vnTimeOut) = WAIT_TIMEOUT
            DoEvents
        Loop
 
        GetExitCodeProcess lpShellExInfo.hProcess, ExecCmd
        CloseHandle lpShellExInfo.hProcess
    Else
        ExecCmd = vbError
    End If
End Function

Cependant si j'ai déjà un fichier Word ouvert, et que j'en lance un second, le programme continu de s'exécuter sans attendre la fermeture du fichier.
(Je ne sais pas si je m'exprime clairement).

Quelqu'un a-t-il une solution ?

Merci

[Kloun]

La FAQ a la réponse .

[DJBORIE]

Ben en fait c'est un fichier déjà existant sur le disque, que je veux lancer avec son application par défaut.

Je voudrais passer le chemin d'accès de mon fichier en paramètre, et que cela m'exécute le programme associé au fichier.
(La fonction utilisée dans mon premier post fonctionne bien, sauf si un fichier de l'application est déjà ouvert --> voir mon exemple du fichier Word)

[DJBORIE]

En fait, pour reformuler mon problème, je souhaite récupérer la fermeture d'un fichier (et non de l'application qui lui est associé).
Par exemple, si j'ouvre 2 fichiers "toto.doc" et "titi.doc", je veux pouvoir récupérer séparément la fermeture de ces 2 fichiers.

Est-ce possible ?