ACCEDER AUX FEUILLES EXCEL VIA ADO

romagny13 Messages postés 687 Date d'inscription lundi 10 janvier 2005 Statut Membre Dernière intervention 27 août 2014 - 31 janv. 2007 à 01:49
perceval_59 Messages postés 18 Date d'inscription mardi 30 décembre 2003 Statut Membre Dernière intervention 17 septembre 2020 - 18 juin 2008 à 10:17
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/41320-acceder-aux-feuilles-excel-via-ado

perceval_59 Messages postés 18 Date d'inscription mardi 30 décembre 2003 Statut Membre Dernière intervention 17 septembre 2020
18 juin 2008 à 10:17
Ouep marrant de voir un post vivre au long du temps... effectivement c'est ce que j'avais rajouté a la fin de mon script de connexion ;) (le 27/03/2007 14:51:07 )

Je fouille dans mon code et essaie de me rappeler:

pour la longueur de la table a extraire..

J'ai fait un truc du style:

TableExcel.rows.count - 1
webmor Messages postés 3 Date d'inscription dimanche 22 décembre 2002 Statut Membre Dernière intervention 17 juin 2008
17 juin 2008 à 20:40
Merci ton exemple ma bien aider, puisque tes données son hétérogène vous devais le préciser au moment de l’ouverture du fichier essai plutôt ça :
· Dim MyConnectionNMP As OleDbConnection = New OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0; data source=
· & FichierNMP & "; " & "Extended Properties=Excel 8.0;HDR=NO;IMEX=1")

IMEX=1: spécifie le type de données à extraire
Adn56 Messages postés 1172 Date d'inscription jeudi 24 mai 2007 Statut Membre Dernière intervention 28 septembre 2013 1
23 avril 2008 à 19:29
up !
Adn56 Messages postés 1172 Date d'inscription jeudi 24 mai 2007 Statut Membre Dernière intervention 28 septembre 2013 1
24 sept. 2007 à 13:53
salut, le code marche bien chez moi, avec un office97 sous XP.
Seul bug la valeur numérique ne s'affiche pas
Reste à trouver comment faire pour ouvrir un XLS de longueur inconnu !
style:
Do while TableExcel.Rows(i).Item(0)<> null ? j'essaye mais cela marche pas -__-"
En tout cas merci à toi ^^
cs_rodcobalt22 Messages postés 193 Date d'inscription dimanche 10 février 2002 Statut Membre Dernière intervention 16 février 2016
5 juil. 2007 à 10:14
Bonjour à tous moi j'ai erreur m'indiquant qu'il ne trouve pas les pilotes ISAM ?? quelqu'un pourrait m'expliquer le soucis car là je séche
perceval_59 Messages postés 18 Date d'inscription mardi 30 décembre 2003 Statut Membre Dernière intervention 17 septembre 2020
27 mars 2007 à 14:51
Lol bon j'aurrais pas mis longtemps a trouver finalement:
ppour la date en fait moi ca avait l'aire de marcher mais ....

réponse donnée ici par crocro
http://msdn2.microsoft.com/fr-fr/library/ms141683.aspx

il faut juste rajouter dans la chaine de connexion:
;IMEX=1;
perceval_59 Messages postés 18 Date d'inscription mardi 30 décembre 2003 Statut Membre Dernière intervention 17 septembre 2020
27 mars 2007 à 14:12
J'avais un peu mis de coté cette partie.
le reste aussi d'ailleurs (quand je prend des vacances je fait pas a moitiè lol)

C'est reparti je met les mains dans le camboui.

J'avou ne pas avoir fait gaffe avec une date
(mais bon ca ne m'etonne pas car a premiere vue cela vien simplement du fait que ADO n'appreci pas le melange des genres, d'apres un article que j'ai lu quelque part)

personne n'a trouvé d'info???
r_gabor Messages postés 42 Date d'inscription vendredi 16 novembre 2001 Statut Membre Dernière intervention 16 mars 2012
19 mars 2007 à 21:27
salut,

to example est tres bien, mais si dans la feiulli excel le champ est sous une format date, alors ne recupere pas nonplus.

il recuper seulement les champ avec une format text

mais si non, est bien
Profil bloqué
18 févr. 2007 à 09:20
Ne va pas trop vite pour abandonner, je vais jeter un oeil sur un doc. Je te tiens au courant.
JM
perceval_59 Messages postés 18 Date d'inscription mardi 30 décembre 2003 Statut Membre Dernière intervention 17 septembre 2020
1 févr. 2007 à 07:10
Oui le $ est important, comme la synthaxe de la chaine de connexion.
comme tout ce que je fait il y a a l'origine un exemple trouvé sur le web.

malheureusement je pense que je vais finalement devoir passer par excel.application car toujours
pas trouvé de solution a cette nom recuperation des valeurs numérique.
commence a m'habituer apres mon abandon de la classe serial port apres 2 mois d'acharnement lol.

dommage.
romagny13 Messages postés 687 Date d'inscription lundi 10 janvier 2005 Statut Membre Dernière intervention 27 août 2014 3
31 janv. 2007 à 01:53
oOps lapsus
de Excel> Visual Studio ou Visual Studio> Excel (je passes trop de temps sur Access je finis par le mettre partout :p)
romagny13 Messages postés 687 Date d'inscription lundi 10 janvier 2005 Statut Membre Dernière intervention 27 août 2014 3
31 janv. 2007 à 01:49
Salut
merci pour cet exemple

j'aurais voulu savoir à quoi correspond Renseignements$ de ta requete ? et est ce que le signe "$" est important et doit obligatoirement par exemple etre ajouter en fin de chaine ?

select * from [Renseignements$]

sinon c'est un bon début et il doit y avoir moyen certainement de l'utiliser de manière plus poussée
as tu trouvé des ressources sur le sujet sur le web ? ou msdn ?

car c'est vrai que c'est interessant de pouvoir faire la "communication" dans les 2 sens cad de visual studio > Access ou Access > Visual Studio
mercii
++