Discussion :

[tee_grandbois]

Malgré l'avoir bien placé, je reviens avec l'erreur 2448 sur le ligne "ctrl = "".
Et pas d'arrêt ou d'info sur le contrôle qui fait défaut

Par contre j'ai remarqué que le code Debug.? est remplacé automatiquement par Debug.Print

oui, ? est l'abrégé de Print en saisie dans VBA
il faut récupérer l'info dans la fenêtre d'exécution (Ctrl+G) de VBA (Alt+F11) il y a du texte copié (à l'endroit entouré en rouge) qui liste les formulaires et les contrôles parcourus, il faut récupérer le dernier puisque c'est lui qui est lu au moment de l'erreur

[mgascult]

merci tee_grandbois, je ne savais pas je me le note.

les dernier champs est F_fond / txt_date_jour un affichage automatique de la date pour l'opérateur.
Ne peut on pas exclure ce champs lors du vidage?

[tee_grandbois]

Ne peut on pas exclure ce champs lors du vidage?

comme indiqué dans le code d'hyperion13, il faut mettre NoReset dans la propriété Remarque (Tag en anglais) du contrôle

[mgascult]

merci tee_grandbois, j'ai compris le principe et viens de corriger

Ca marche, tous les contrôles ont été vidés.

Je penses que ce n'est pas avec la formation de 5 jours que je vais avoir (Access VBA) que je vais arriver à comprendre toutes les subtilités d'Access et de son VBA.

Encore merci à Tous 🙏🏻🙏🏻🌞

[mgascult]

je viens de remarquer une chose, les groupes d'options SF_CAF sont bien vidés mais pas les cases à cocher du SF_H24 bizarre

[tee_grandbois]

uniquement celles de SF_H24 ? c'est bizarre ...
car le code traite bien les cases à cocher:

Code :

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

1
2
                Case acCheckBox
                    ctrl = False

[mgascult]

je ne comprends pas et coté Remarque c'est bien vide

[tee_grandbois]

mais si tu veux une case à cocher sans valeur (c'est à dire nulle) et dans ce cas la case apparaitra noire à l'écran, il faut mettre la propriété Triple état à Oui ensuite tu dois remplacer ctrl = False par ctrl = Null

[tee_grandbois]

à vu de nez, ce ne sont pas des cases à cocher mais des cases d'option(mais c'est comme la case à cocher) ... peux-tu poster les propriétés du contrôle en mode design ?
sinon poste juste le formulaire dans une nouvelle bd au format ZIP

[tee_grandbois]

j'ai trouvé, il faut rajouter le type bouton d'option dans le traitement des cases à cocher :

Code :

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

Case acCheckBox, acOptionButton

[mgascult]

merci tee_grandbois, le voici Database1.zip

[tee_grandbois]

merci pour la base mais j'avais trouvé, il faut juste modifier le code de la ligne 15 (ou 14 si tu as enlevé le Debug) :

Code :

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

Case acCheckBox, acOptionButton

[mgascult]

ben il n'aime pas
erreur sur ctrl = False.

[mgascult]

je viens de relancer le débug et c'est sur le groupe d'option CAF qu'il bloque

[tee_grandbois]

peux-tu m'envoyer le SF ?

[mgascult]

voilà Database1.zip

[tee_grandbois]

la problématique est qu'on peut modifier la valeur d'une case d'option si et seulement si elle n'est pas dans un groupe d'options (c'est le cas pour les H24 ...) si elle est utilisée dans un groupe, il faudrait mettre Noreset dans Remarque de chaque contrôle (c'est le cas Accès locaux H24 ...)

[mgascult]

bonjour à Tous,

merci tee_grandbois, je vais regarder ce que je peux faire.

Belle journée🌞

[tee_grandbois]

bonjour,
une autre solution, plus simple selon moi, serait de remplacer toutes les cases d'options sans groupe (comme dans le sous-formulaire SF_H24 contrôles "profil des H24 détenus:" GBIS ACCES H24 ...) par de vraies cases à cocher et d'enlever le traitement des cases d'option dans le code:

Case acCheckBox, acOptionButton

évidemment le design n'est pas le même mais c'est plus logique d'utiliser le bon contrôle, cela évite de tomber sur le genre de problématique auquel tu viens de faire face.

[mgascult]

merci tee_grandbois, je vais essayer cette solution cet aprèm' malheureusement pas de temps ce matin