Code VBA\Access Probléme

Fermé
Nico - 27 mai 2010 à 11:37
Fourtis Messages postés 248 Date d'inscription mardi 26 février 2008 Statut Membre Dernière intervention 18 mars 2013 - 27 mai 2010 à 23:43
Bonjour,

je suis en stage et j'ai probléme dans mon code et je ne trouve pas la solution.

Code Vba:

Private Sub Nbr_jour_ouv_AfterUpdate()
nummois = Forms![F MAJ des informations]![Choix_mois]
var_hôtel = Forms![F MAJ des informations]![Liaison15].Formulaire![clé_hôtel]
var_année = Forms![F MAJ des informations]![Liaison15].Formulaire![Clé_année]

If IsNull(Forms![F MAJ des informations]![Liaison15].Formulaire![Nbr_jour_ouv]) = -1 Then
Forms![F MAJ des informations]![Liaison15].Formulaire![Taux_occup_rectif] = Null
Exit Sub
End If
A voir également:

1 réponse

Fourtis Messages postés 248 Date d'inscription mardi 26 février 2008 Statut Membre Dernière intervention 18 mars 2013 14
27 mai 2010 à 23:43
Ajoutez un END à la fin ?

Bonswar.
0