Discussion :

[antoine46]

Bonjour,

je n'arrive pas à comprendre comment on réalise une fonction VBA.
Dans la FAQ, j'ai trouvé une fonction qui m'intéresse, à savoir :

Code :

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

1
2
3
4
5
6
7
Public Sub fgImprimeCopiesEtat(stEtat As String, itCopies As Integer)
 ' stEtat   : nom de l'état
 ' itCopies : nombre de copies
DoCmd.OpenReport stEtat, acViewPreview
DoCmd.PrintOut acPages, , , , itCopies
DoCmd.Close acReport, stEtat
End Sub

J'ai fait un copié-collé de tout ca dans le code VBA d'un de mes formulaires. Lorsque j'essaie d'appeler cette fonction,

Code :

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

fgImprimeCopiesEtat("Etat1", 3)

j'ai l'erreur : "Erreur de compilation. Attendu : ="

Je ne comprends pas trop, peut-être que la déclaration de la fonction n'est pas bonne ou pas au bon endroit ?

Merci pour votre aide
Antoine

[guigui5931]

Fo que tu l'appelle comme ça :

Code :

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

1
2
 
fgImprimeCopiesEtat "Etat1", 3

[Macno]

Salut,

peut etre avec cela :

Code :

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

1
2
 
fgImprimeCopiesEtat "Etat1", 3

[random]

une fonction renvoie une valeur
elle s'utlise avec mavariable=mafonction()

[antoine46]

merci pour la précision... si rapide !

[micniv]

Précision bis,
dans le cas de fgImprimeCopiesEtat, il s'agit d'un Sub et non pas d'une fonction,

donc Macno et Guigui : 1 point ....

Et puis ce Sub publique s'il doit être appelé de plusieurs formulaires, serait a une meilleure place dans un module .