Discussion :

[Clonn2b]

Bonjour à tous.
Je sollicite à nouveau votre aide pour le problème suivant:

Dans un formulaire « fiche_marche », j’ai créé un bouton de commande « lance_word »
Le but est, par clic sur ce bouton, de lancer l’affichage d’un fichier word, après un test préalable sur son existence.

Le nom du fichier en question correspond au contenu du champ texte « Marche » du formulaire « affiche_marche ».

Voici le code… qui ne produit rien après clic sur le bouton de commande :

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub Lance_word_Click()
If Dir("C:\Users\Chemin…\” & Forms!affiche_marche!Marche & ".doc") = "" Then
     MsgBox "FICHIER WORD NON CREE", vbExclamation, "AFFICHAGE IMPOSSIBLE"
Else
   ShellExecute Me.Hwnd, "open", "C:\Users\Chemin…\" & Forms!affiche_marche!Marche & ".doc", "", CurrentProject.Path, 1
 
End If
 
End Sub

Erreur de syntaxe ? Erreur de conception ?

Merci de votre aide.

[User]

Salut,

Une idée : peut-être est-ce dû à la fonction Shellexecute, dans ce cas il te faut tester ce qu'elle te renvoie et l'interpréter:

Nok_shellexecute

A+