Bonjour,
Voici mon code :

x étant le nombre d'enregistrements de ma table
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
For i = 1 To x
 
 
        For j = i To x
 
            dbs.Execute ("INSERT INTO MC (MC) VALUES ('" & (tabl(j)) & (tabl(j + 1)) & "') ")
            ' Calcul du pourcentage
            dbs.Execute ("INSERT INTO MC (NB) VALUES ('" & (i / x * 100) & "')")
 
                If j <> 0 Then
                    dbs.Execute ("INSERT INTO MC (MC) VALUES ('" & (tabl(j)) & (tabl(j - 1)) & "') ")
                    ' Calcul du pourcentage
                    dbs.Execute ("INSERT INTO MC (NB) VALUES ('" & (i / x * 100) & "')")
                End If
        Next
Next
Mon problème :

Je souhaite concaténé 2 champs dans 1 dans un INSERT INTO. Possible ? Pas possible ?
Les nouveaux enregistrements se font mais j'ai des champs vides.

Merci de votre aide.