Bonjour à tous,
Ma question ne posera sûrement aucun problème aux experts que vous êtesmais à moi elle m'en pose énormément... cela me semblait pourtant si simple...
Je travaille sur une base de donnée sur laquelle je dois faire plein de liens pour ouvrir des documents extérieurs à la base de donnée : un classeur excel, un répertoire téléphonique sous word...
J'ai donc créer un bouton de commande (Commande36) et ait exécuté l'assistant en choisissant l'action "exécuter une application", puis en parcourant mes documents et en choisissant celui que je voulais (a savoir un document excel : Suivi RDV stagiaires)... ca ne marche pas... ("Argument ou appel de procédure incorrect") voilà le code que ça m'a donné :
mais aucune ligne de ce code n'est apparue comme erreur...
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 Private Sub Commande36_Click() On Error GoTo Err_Commande36_Click Dim stAppName As String stAppName = "C:\Documents and Settings\CASTELLANI\Mes documents\Suivi RDV stagiaires.xls" Call Shell(stAppName, 1) Exit_Commande36_Click: Exit Sub Err_Commande36_Click: MsgBox Err.Description Resume Exit_Commande36_Click End Sub
Donc j'ai essayé ça :
mais ça marche pas...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Private Sub Commande36_Click() On Error GoTo Err_Commande36_Click Dim objDoc As Object Set objDoc = Application.Documents.Open("C:\Documents and Settings\CASTELLANI\Mes documents\Suivi RDV stagiaires.xls") End Sub
Si quelqu'un peut m'aider... et m'expliquer quelle sera la méthode que je devrai suivre par la suite pour que je puisse ouvrir ce que je veux à partir de boutons de commande, d'étiquettes de texte....
Merci d'avance, j'avais trouvé, me semble-t'il, la solution dans la FAQ et sur Internet, mais vraiment je ne comprends rien aux explications... trop novice (voir très nul...) en Vba pour ça ...
Encore merci d'avance à tous ceux qui voudront bien m'aider...
Partager