Ouvrir un fichier dans une autre application

[Lu K]

Bonjour à toutes et à tous,

Je cherche à ouvrir à fichier dans une application ouverte, j'arrive à ouvrir une application et un fichier en même temps mais pas quand l'appli est ouverte.

Mon code :

'Fonction pour voir si l'appli est ouverte
Function ApplyLancee(strChemin As String) As Boolean
 
    On Error Resume Next
 
    Open strChemin For Binary Access Read Write Lock Read Write As #1
    Close #1
 
    If Err.Number <> 0 Then
        ApplyLancee = True
        Err.Clear
    End If
 
End Function

'Code
    If ApplyLancee("C:\Program Files\Mon_appli.exe") = True Then
        MsgBox "l'application est déja lancéé"
        Shell "C:\Mes documents\Mon fichier.(extension)" 'là j'ai un problème !!!!
    Else
        'MsgBox "application non lancée"
        Shell "C:\Program Files\Mon_appli.exe C:\Mes documents\Mon fichier.(extension)" 'là tout va bien
    End If

Merci d'avance pour votre aide.

 

[david84]

Re : Ouvrir un fichier dans une autre application

Bonjour,
pourrais-tu être plus explicite ? Je ne comprends pas ton problème.
A+

 

[Lu K]

Re : Ouvrir un fichier dans une autre application

Bonjour à tous,

Tout simplement j'arrive à ouvrir mon appli avec le fichier ( Shell "C:\Program Files\Mon_appli.exe C:\Mes documents\Mon fichier.(extension)"), mais quand l'appli est ouverte je n'arrive pas à ouvrir le fichier :
Shell "C:\Mes documents\Mon fichier.(extension)" 'là j'ai un problème !!!!

Bonne journée

 

[david84]

Re : Ouvrir un fichier dans une autre application

Quelle est l'application dont tu parles et que tu ouvres ?
Quel est le type de fichier que tu veux ouvrir et quel est son extension ?
A+

 

[Lu K]

Re : Ouvrir un fichier dans une autre application

Re,

Il s'agit d'un logiciel de dessin ou je veux ouvrir une macro (texte) au format .bsc

L'ouverture de l'appli ne me pose pas de problème, c'est juste ouvrir mon fichier quand l'appli est déja ouverte !

Merci.

 

[david84]

Re : Ouvrir un fichier dans une autre application

La fonction Shell lance un programme exécutable. Si ce n'est pas le cas de ton fichier Shell ne te l'ouvrira pas.
Je pense qu'il te faut tester d'autres méthodes (peut-être en passant par FileSystemObject ou des API Windows) mais comme je ne peux tester je n'en suis pas sûr.
A+