Discussion :

[Razorback]

Bonjour LedZepII,

Merci pour ton aide encore une fois et ta base.

- Le bouton Effacer fonctionne maintenant. En fait, hier, j'avais seulement changé la requête d'un seul contrôle (Nombre de véhicules impliqués) et çà ne fonctionnait pas. J'ai donc modifier toutes les requêtes, j'ai testé et là çà fonctionne. J'ai remarqué aussi que dans ton code sur le bouton effacer, il y avait une différence avec le mien sur cette ligne :

Code :

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

1
2
If Len(ctl.DefaultValue) > 0 Then
                ctl.Value = Eval(ctl.DefaultValue)

Chez moi, c'était :

Code :

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

1
2
If Len(ctl.DefaultValue) > 0 Then
                ctl = Eval(ctl.DefaultValue)

La modification a peut-être fait que çà fonctionne maintenant.

- Ensuite, ok pour l'explication sur la valeur Null

- Merci beaucoup pour ton code sur le bouton Effacer et la msgbox. C'est exactement ce que je voulais. A quoi sert de définir des variables dans "Option Compare Database" ?

- Une idée pour mes cases à cocher sur les sélections de catégories de véhicules uniquement ? Tu vois ce que je voulais dire par là ?
Et pour la nouvelle txtbox du formulaire "Résultat" (sur la différence entre le nombre de véhicules total et la somme de tous les VL, PL, 2RL et 2RM) ?

Je posterai une nouvelle version de ma base et de mes formulaires bientôt car çà change assez régulièrement en fait. Je me rends compte que certains résultats ou requêtes auxquels j'avais pas pensé seraient intéressants. Mais bon, je te laisse tranquille pour le moment...Sinon, tu disais qu'on était tombé dans une conversation privée (je suis assez d'accord d'ailleurs) mais tu crois que l'on devrait se contacter ailleurs que sur le forum pour nos échanges ? Est-ce possible déjà ?

Je te remercie encore. Bonne journée ou bon week-end. A+

[LedZeppII]

Bonsoir

• Code :

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

                  ctl.Value = Eval(ctl.DefaultValue)

  et
  

  Code :

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

                  ctl = Eval(ctl.DefaultValue)

  sont équivalents.
  Pour un objet de type contrôle, et ayant un membre Value, la propriété par défaut est Value.
  
  C'est la modification des requêtes qui a corrigé le problème.

• A quoi sert de définir des variables dans "Option Compare Database" ?

  Cette partie d'un module de code s'appelle section Déclarations.
  "Option Compare Database" est dans la section Déclarations.
  La section Déclarations d'un module de code sert à déclarer des options, des constantes, des variables, des fonctions externes (dll).
  
  Les constantes et variables déclarées à cet endroit sont dites globales.
  N'importe quelle fonction ou procédure du module de code pourra les utiliser.
  
  Les déclarations faites à l'intérieur d'une fonction (Function) ou une procédure (Sub) ne sont valables qu'à l'intérieur de la fonction ou la procédure.
  On parle de portée et de durée de vie pour les variables et les constantes.
  Voir Fondements sur les variables et les constantes

• Une idée pour mes cases à cocher sur les sélections de catégories de véhicules uniquement ? Tu vois ce que je voulais dire par là ? Et pour la nouvelle txtbox du formulaire "Résultat" (sur la différence entre le nombre de véhicules total et la somme de tous les VL, PL, 2RL et 2RM)

  Non
  Je ne suis pas suffisamment au fait de la façon dont les données sont réparties dans les champs (nombreux).
  J'ai essayé de comprendre et je me suis demandé si plusieurs tables ne serait pas nécessaires.
  C'est le fait de voir plusieurs champs, avec le même nom et finissant par A B C ou 1 2 3 4, qui me fait dire ça.

A+