Discussion :

[GuyDuLac]

Bonjour à tous,

J'ai plusieurs formulaires qui doivent utiliser les même calculs d'une procédure public. J'ai trouvé un sujet traitant de cela de Pepito, mais ça ne fonctionne pas.

Je voudrais que frmUse est la valeur de la variable Public comme nom de formulaire
ex: ComposantePourQuelForm = "frmABC"
Select case forms!frmUse.PmatDashboard équivaudrait à Select case forms!frmABC.PmatDashboard

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Dim frmUse As Form
 
Set frmUse = Application.Forms(ComposantePourQuelForm)
 
Select Case Forms!frmUse.PmatDashboard
    Case 283   ' pied linéaire
'                Forms!frmUse.PmatQteEstime = Forms!frmDashboardMur!MeoLongueurMur
 
    ....
End select

Merci à l'avance

[ClaudeLELOUP]

Bonjour,

Je ne suis pas sûr de comprendre ta question.

La syntaxe : Forms!Untel se réfère au formulaire appelé Untel.

Si dans une variable NomDuForm , tu as mémorisé le nom du formulaire, la syntaxe devient Forms(NomDuForm).

C'était ta question ?

[GuyDuLac]

pourquoi facile quand on peut se compliquer la vie?

merci ClaudeLeloup