Discussion :

[XCCUBE]

Bonjour, Je reformule mieux ma demande d'hier.

Dans une table X
---------------------------------------------------
Champ1: Champ2: Champ3: TotalUnité: TotalDizaine:
---------------------------------------------------
1_________ 9______ 11
---------------------------------------------------
6_________ 21_____ 30
---------------------------------------------------

en sachant que de 1 à 9 = unités
10 à 19 = dizaine

Je recherche comment effectuer la mise à jour des champs TotalUnités et total Dizaine (une requête ajout plente au bout d'un temps car la table et assée consequente)

premiere ligne:
Il y à 2 unités qui sont le 1 et 9 donc le total espéré dans le champ totalunités est 2.Il y a une dizaine qui et le 11 donc le total espéré dans le champ TotalDizaine est 1.

Pour la deuxieme ligne:
Il y à une unité qui et le 6 donc le total espéré dans le champ totalunités est 1.
Il n'y aucune dizaine doc le total espéré dans le champ totalDizaine est 0.

Merci de votre aide Salutations

[Heureux-oli]

C'est plus clair.
Selon moi, différentes façon d'y arriver .
La première, faire une conversion de ton nom en texte et en prendre un morceau après l'avoir "mesuré"

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
 
Sub MaConversion(intNumber as integer)
 
Dim intunite as integer
Dim intdizaine as integer
Dim intcentaine as integer
dim inttaille as integer
dim txtnumber as string
dim txtunite as string
dim txtdizaine as string
dim txtcentaine as string
 
txtnumber = Cstr( intNumber)
inttaille = len(txtnumer)
 
select case inttaille
   case 1
    goto unite
   case 2
    goto dizaine
   Case 3
    goto centaine
end select
 
centaine:
txtcentaine = left(txtnumber;3)
 
dizaine:
txtdizaine = left(txtnumber;2)
 
unite :
txtunite = left(txtnumber;1)
 
'le tout est de savoir si il faut des nombres ou du texte pour remplir 
 
 
 
End Sub

Voilà en gros une possibilité.
Les autres, je ne me souviens plus des fonctions, ça va peut-être me revenir.

[Tofalu]

Quelque chose comme

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
UPDATE MATABLE 
    SET 
        Unite     =     IIf(Champ1 Between 1 And 9,1,0)        +    
                    IIf(Champ2 Between 1 And 9,1,0)        +    
                    IIf(Champ3 Between 1 And 9,1,0)        , 
 
        Dizaine =     IIf(Champ1 Between 10 And 19,1,0)    +    
                    IIf(Champ2 Between 10 And 19,1,0)    +    
                    IIf(Champ3 Between 10 And 19,1,0)    , 
 
        Vingtaine = IIf(Champ1 Between 20 And 29,1,0)    +    
                    IIf(Champ2 Between 20 And 29,1,0)    +    
                    IIf(Champ3 Between 20 And 29,1,0)    ;