Discussion :

[Libris]

Bonjour à tous,

Je viens solliciter votre expérience sur VBA Access car je suis un réel débutant (je viens tout juste de commencer avec VBA ACCESS), et je rencontre un problème.
Je vous remercie d'avance pour tous les conseils et solutions que vous pouvez m'apporter.

Alors voila, j'ai créé un formulaire avec à l'intérieur donc des champs pour enregistrer une machine avec différents attributs. Chaque machine a un numéro de livre d’entretien ainsi qu’un numéro de registre de sécurité, avec bien évidemment un numéro de machine qui est son id et d’autres attributs la décrivant telle que le type (appareil dangereux, etc ..).
Cela se présente sous cette forme





Et voici la structure à laquelle je voudrais accéder.



Je veux par exemple, pouvoir accéder à un document présent dans le dossier fiches d'intervention en cliquant sur un bouton, et que le bouton prenne en paramètre le contenu du champs désignation de la machine pour savoir à quel dossier de machier accéder ( exemple : si sur le formulaire je suis sur l'enregistrement concernant un ascenseur, je veux pouvoir accéder aux documents relatifs à son livre d'entretien ou à son registre de sécurité).

Je réalise la complexité de la chose, j'ai déjà tenté d'ouvrir un simple fichier word en cliquant sur un bouton mais je me retrouve face à un problème que je n'arrive pas a résoudre.



Je vous remercie de prendre la peine de lire ce pavé.

J'aimerai réellement comprendre comment fonctionne ce langage, et après de longues recherches je reste bloqué.
Voici le code de mon bouton.

[martii843]

Salut,

Pour ouvrir le document tu peux essayer :

Code :

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

1
2
3
4
 
Dim chemin as String
chemin= ".../.../../..."
APPLICATION.FollowHyperlink chemin

[Libris]

Salut et merci de ta réponse,

le fait est que je ne peux executer aucun code, je suis confronté au message d'erreur précédent peut importe ou je le place, sur le click sur un bouton, sur un formulaire ..
Je m'y prends mal pour intégrer le code je pense.



Je clique sur ces 3 petits points et ensuite je sélectionne générateur de code et j'écris le code, c'est bête à dire mais c'est bien la non ?

Pardonne moi je suis un vrai newbie sur Access (mais pas en termes de programmation, sauf VBA bien sur).

Merci encore

[madefemere]

Bonjour Libris,

Je te conseillerais d'utiliser plutôt ShellExecute avec une déclaration :

Code :

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

1
2
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Et l'appel :

Code :

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

1
2
3
 
chemin = "C:\Users\Briki\Downloads\.........................."
ShellExecute 0, "open", chemin, vbNullString, vbNullString, 1

Cordialement.

[Libris]

Bonjour et merci de ta réponse,

Cependant j'ai toujours le même problème avec la même erreur à l'exécution.

Comment intégrer vous le code VBA a un bouton ? Je veux dire, de quelle façon ?

La mienne semble mauvaise.

Merci.

[Jean-Philippe André]

Salut
Pense a compiler ton code + compacter la base, histoire de nettoyer la pile d'erreurs residuelles.

[Libris]

Bonjour,

Je suis parvenu à l'ouvrir, maintenant, ma seule interrogation serait, comment faire en sorte de pouvoir passer un paramètre a l'url qui va chercher le fichier, comme le cas avec l'ascenceur.

[madefemere]

Bonsoir,

Je n'ai pas compris ce que tu veux dire par :

...comment faire en sorte de pouvoir passer un paramètre a l'url qui va chercher le fichier, comme le cas avec l'ascenceur.

Est-ce que tu veux dire que tu veux pouvoir choisir un nom de fichier dans une boite de dialogue et l'assigner au variable "chemin" ??

Cordialement.

[Libris]

Bonjour,

Oui en quelques sortes.

Je souhaite par exemple, lorsque je me trouve sur l'enregistrement concernant un ascenseur par exemple (donc désignation = ascenseur), cela passe ce paramètre à l'url et fais en sorte de fouiller dans le bon répertoire.



Je voudrais qu'ici, en étant sur l'enregistrement ascenseur, on puisse consulter automatique les documents relatifs à cette ascenceur en cliquant sur un bouton ( en gros qu'il remplace le nom machine par le contenu du champs désignation).
Je ne sais pas comment passer de paramètre à une url, je ne sais même pas si c'est possible en VBA en réalité.

Votre idée est tout aussi intéressante tout de même, j'aimerai en savoir plus.

Merci beaucoup de prendre la peine de me lire et de me répondre.

[madefemere]

Donc, j'imagine que ces noms de répertoire sont conservés quelque part dans un champ d'une table ?

Cordialement.