Discussion :

[alainbama]

Bonjour,
Je vais cherche une feuille sur un fichier qui n'est pas à moi, J'ai un problème sur le nom de la feuille.
Voici la requête qui fonctionne : SELECT * FROM [1300 C METALLIQUE 1000X800X425$] et exactement la même qui ne fonctionne pas.
Elle mes sort une Erreur d'exécution '-2147467259 (80004005)':
"1300 C METALIQUE 1000X800X425$" n'est pas un nom valide.

J'ai tester tous les caractères de cette chaine avec l'instruction asc(mid(NomFeuille,i,1 )) sur les deux, elle m'affiche les mêmes résultats, celle qui fonctionne est celle copier directement sur la feuille du fichier et l'autre ne fonctionne pas.

Quelqu'un à-t-il la réponse?

Voici une partie de mon code pour être plus précis.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
'Réalise la connection ADO
Cnx.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & _
     "Data Source=" & FICHIER & ";Extended Properties=Excel 12.0"
'Récupère toutes les tables (feuilles).
Set TablesSchema = Cnx.OpenSchema(adSchemaTables)'Enregistre le nom de la feuille
NomFeuille = Replace(Replace(Replace(TablesSchema!TABLE_NAME, "$", ""), "'", ""), "#", " ")
'Définit la requête sur la feuille.
texte_SQL = "SELECT * FROM [" & NomFeuille & "$]"     
'créer le recordset pour executer la requête
Set rst = New ADODB.Recordset
Set rst = Cnx.Execute(texte_SQL)

[Marc-L]

Bonjour, bonjour !

La deuxième chaîne est différente de la première ‼ Y a même pas le même nombre de caractères, franchement …

Voilà, voilà !

_________________________________________________________________________________________________________

Je suis Paris, Nice, Bruxelles, Charlie, …

[alainbama]

Bonjour,
Je vous remercie de vous en occuper aussi rapidement.

Le problème ne vient pas de là car, il s'agit du même texte, c'est moi qui est écrit le message renvoyé et j'ai fais une faute en l'écrivant.

Mon problème vient de plus loin, c'est en essayant de copier cette feuille dans mon classeur que j'ai eut une erreur car, il ne trouvait pas la feuille, alors que l'ensembles des feuilles venant d'autre classeurs fonctionnaient très bien jusqu'à présent.

J'ai simplement constaté que cette feuille m'écrivait des "#", alors qu'il n'y avait pas de "#" dans le fichier source et j'ai voulue les supprimer sur cette dernière version en écrivant un replace() supplémentaire.

Donc pour l'instant la problème est résolu en enlevant le replace() ça remarche mais Il faut que je mette mon replace() sur le remplissage de la listebox que je rempli pas un GetRows.

Mais pour l'instant ce n'est pas encore fait, je vous tiendrais au courant.

[alainbama]

Bonjour,

Je ne vois pas très clair, c'est en effet un "." qui est remplacé par un "#" par "adSchemaTables" et non par un espace " ". Il faut dire que je travail sur un Portable dont l'écran est un peu sale.

Si ça peut servir à quelqu'un de savoir que adSchemaTables de ADODB.Recordset renvoi un "#" à la place d'un point "."

[Invité]

Bonsoir,
Le point représente le séparateur entre la table et le champ [table].[champ] hors quand un [champ.quelque chose] ado replace le point par un caractères générique qui replace n'importe quel caractères [champ#quelque chose] !