Discussion :

[jojo86]

Bonjour,

Voila plusieurs semaines que je suis confronté à ce problème.

J'utilise deux feuilles excel comme base de données.
L'une fonctionne au poil, super rien à dire.

Mais lorsque j'ai ajouté la seconde j'ai été confronté à plusieurs soucis.

Les requête ne fonctionne pas si dans mes cellules j'ai des chiffres.

J'ai placé mes cellules en "Texte" car elle peuvent contenir du texte+des chiffres ou juste des chiffre.

Voici ma requete :

Code :

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

1
2
3
4
 
NomModif = "1"
Requete = "SELECT Description FROM [TableModif$] WHERE Numero_Version='" & NomModif & "'"
Rst.Open Requete, Cn, adOpenStatic

J'ai l'erreur sur cette dernière ligne qui dit :

Type de données incompatible dans l'expression du critère.

Je deviens "Fou" car sur l'autre feuilles j'ai le même type de données et les requetes fonctionnent très bien...

Merci de votre aide.

[pgz]

Bonjour.

Juste une idée, remplacer

Code :

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

WHERE Numero_Version

par

Code :

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

WHERE Cstr(Numero_Version)

PGZ

[jojo86]

En gros la ligne serait :

Code :

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

1
2
Requete = "SELECT Description FROM [TableModif$] WHERE CStr(Numero_Version)='" & NomModif & "'"
Rst.Open Requete, Cn, adOpenStatic

???
Mais le CStr n'est pas reconnu par SQL si???

J'pense qu'il y à un truque que j'ai pas pigé...

Merci beaucoup en attendant.

[jojo86]

Bonjour,

Nouvelle erreur.

Ta methode fonctionne si la valeur recherchée est de type "Nombre", si j'ai du texte ça échoue.

J'ai une erreur :

Utilisation Incorrecte de Null

Je ne comprend vraiment plus rien...

[jojo86]

Voici un bout de mon fichier qui illustre très bien mon soucis...

C'est à ne rien comprendre...

Merci beaucoup de votre aide.

[Jean-Philippe André]

salut,
il est possible que ton champ Numero_Version soit vide pour un ou plusieurs enregistrements.
Essaie de passer l'erreur en utilisant Nz()

Code :

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

Requete = "SELECT Description FROM [TableModif$] WHERE CStr(Nz(Numero_Version,''))='" & NomModif & "'"