Discussion :

[tinous]

Bonjour à tous,

Je reprends pour amélioration une base Access que j'ai dévellopée il y a 3 ans, dur-dur de se remettre dans le bain.

j'ai devellopé un formulaire qui permet l'affichage de graphiques ou de photos dont les noms de fichier sont stockés dans ma base P1. Le code VBA vient tester la valeur du champs "image" et si non null [Len(me.image > 0) ] il vient mettre le chemin du fichier + nom dans la zone Me.photo.Picture pour affichage. Avec du code pour tester si le fichier existe ou pas etc...
Idem pour les x photos possibles.

Je souhaite créer plusieurs formulaires plus ou moins simplifiés ayant pour source la base P1 ou le résultat d'une requete en gardant comme partie commune la zone des x photos. Est-il possible de ne pas repéter le code VBA? J'ai essayé en définissant mon code VBA initial en "PUBLIC" mais ça ne fonctionne pas.


Merci de votre aide

Tinous

[Brunodm13]

Bonsoir,

As-tu essayé de coller ton code dans un module, puis de l'appeler avec l'instruction Call ?

[tinous]

Je viens d'essayer mais cela ne fonctionne pas (du premier coup). En effet, je me fais jeter sur la premier Me. recontrer, j'imagine que c'est parce que le module est bien en peine pour savoir de quelle donnée je cause !
il faut que je creuse ça.
merci pour ta réponse

[Brunodm13]

Re,

Il faut modifier un peu ton code du genre :

Code :

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

1
2
3
4
5
Public Sub TaProcédure(Formulaire As Form, Champs As acObjectFrame)
 
Ton Code...
 
End Sub

Bonnée soirée