Discussion :

[gwen_oc]

bonjour !

j'ai un petit probleme avec VBA, je m'explique

dans mon code, j'utilise une variable 'tableau' de 2 colonnes et 10 lignes
mon code fait des calculs à partir de valeurs issues d'une requête et remplit parfaitement ma variable

je voudrai que mon code crée une table 'Temp' avec un champ 'Heure' contenant les valeurs de ma variable 'tabfinal', et cela automatiquement, mais la commande sql ne s'execute pas, j'ai un message "Erreur de syntaxe INSERT INTO"

Code :

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

1
2
3
4
5
6
7
8
9
For j = 0 To 24
    minutes = 0
For i = 1 To nbligne
    minutes = tableau(i, j) + minutes
Next
    tabfinal(1, j) = Round(minutes / 8)
    rSQL = "INSERT INTO Temp (Heure) VALUES " + CStr(tabfinal(1, j)) + ";"
    DoCmd.RunSQL rSQL
Next

merci de bien vouloir m'aider !

[Gary_Stoupy]

bonjour,

de quel type est ton champ Heure de ta table Temp ?
pour une meilleure lisibilité de ton code, écris "next i" et "next j"...

Concernant le probleme d'insertion...
Met des "&" à la place "+" ca devrait déjà fonctionner un peu mieux

[Invité]

Bonjour

Tu veux insérer une chaine, donc des '

Code :

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

1
2
 
"INSERT INTO Temp (Heure) VALUES '" & CStr(tabfinal(1, j)) & "';"

Essaye ceci, et utilise plutôt & que +

Pas Testé

Starec

[gwen_oc]

je vous remercie, mais je viens de trouver, en fait j'ai simplement oublié les () apres VALUES

merci quand meme de m'avoir preter de votre temps !