Code VBA\Access Probléme

Nico -  
Fourtis Messages postés 248 Date d'inscription   Statut Membre Dernière intervention   -
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   Statut Membre Dernière intervention   14
 
Ajoutez un END à la fin ?

Bonswar.
0