Bonjour,
Toujours entrain de patiner sur ma base (effet Vancouver 2010 sans doute...)
J'ai un souci dont je n'arrive pas à comprendre l'origine. Voici le code d'erreur lorsque j'ouvre le formulaire :
Dans l'aide j'obtiens le détail suivantEnvoyé par Message d'erreur
J'ai déjà eu ce souci auparavant, sans raison, sur tous les formulaires de la base contenant du code. J'avais du recréer les formulaires un par un...Envoyé par Aide ACCESS
Cette fois-ci, c'est différent, puisque ça ne marche pas que lorsque je mets le code suivant "Sur activation" qui est parfaitement passé à la compilation :
A noter que j'ai essayé plusieurs autres codes dans ce genre comme :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Private Sub Form_Current() Select Case Me.ckkosei Case Is = 0 Me.lblkosei.Visible = True Case Else Me.lblkosei.Visible = False End Select End Sub
Les cases à cocher sont verrouillées et désactivées, elles servent juste à afficher leur statut (cochée ou non) et prennent les valeurs entrées dans une table. Si c'est coché j'aimerais que le libellé (étiquette indépendante ndlr.) n'apparaisse pas.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Private Sub Form_Current() If ckkosei.Value = vbChecked Then Me.lblkosei.Visible = False ElseIf ckkosei.Value = vbUnchecked Then Me.lblkosei.Visible = True End If End Sub
J'ai essayé de m'inspirer du tutoriel case à cocher, de celui du formulaire de recherche (où l'on affiche tel ou tel libellé selon le type de données), et d'autres sources du forum et de MSDN...
Rien ne passe. Pourquoi?
Partager