Discussion :

[laville]

Bonjour,

Ma macro copie le classeur en cours et execute des requêtes sql après avoir effectué une connexion sur ces fichiers.

Le problème que j'ai est que quand je fais une mise à jour de deux cellules (qui me permettent de définir le niveau d'utilisation du fichier ainsi qu'un autre paramètre servant à initialiser le classeur à l'ouverture de fichier), cette mise à jour formate mes cellules en champ date, ce qui ne va pas du tout....

Le code :

Code :

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

1
2
3
            ocnnCopy.Execute "UPDATE [" & FrmParametres.name & "$] SET valeur  = '0' WHERE ([Paramètre] = 'Etat')"
 
            ocnnCopy.Execute "UPDATE [" & FrmParametres.name & "$] SET valeur = " & CStr(Level) & " WHERE ([Paramètre] = 'Niveau')"

si je met valeur = '0' j'ai une erreur d'incompatibilité de type, et si je met valeur= 0, bah au final j'ai des dates dans mes cellules....
Le format de mes cellules peut être en standard ou en nombre (sans décimales) rien n'y change :s

Quelqu'un aurait une idée svp ?

Merci d'avance

[dadavyvy]

As-tu essayé en forcant dans la requete SQL le format ?

Code :

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

ocnnCopy.Execute "UPDATE [" & FrmParametres.name & "$] SET valeur = CDbl(" & CStr(Level) & ") WHERE ([Paramètre] = 'Niveau')"

[laville]

Merci dadavyvy pour ta rapidité et ta proposition

Je viens d'essayer mais que néni ca ne veut rien entendre....

J'ai trouvé une solution de contournement mais qui ne me réjouis pas des masses :

- avant la copie du fichier changer les deux variables (c'est une décomposition hiérarchique de fichier, ces valeurs permettant juste de donner le niveau hiérarchique et d'initialiser l'éxécution d'une macro à l'ouverture du fichier)

- copier le fichier comme cela

- à la fin de la boucle, remettre les valeurs par défaut.

Ce qui m'ennui c'est que, en cas de pépins (erreur ou autre), ces variables ne seront pas réinitialisées :s

Dans le pire des cas j'utuliserais cette fonctionnalité, sinon si je pouvais résoudre mon problème convenablement ca irait mieux ^^