Je souhaite ouvrir un formulaire selon un champ d'un sous formulaire qui donnera les enregistrements valables.

Je me suis dit :" Passe par une variable commune à tout le formulaire mais j'ai donc fait ce code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
Public Sub Btn_Ouv_Form_Mem_Bat_Click ()
Public Function StrRue () As String
StrRue = Forms![Ss Form Rue]![RueBien]
MsgBox (StrRue)
End Function
End Sub
Mais il me met Erreur de compilation : End Sub attendu ! Que faire?