lire un fichier Excel

cortex59 · 23/04/2008, 14h57

Bonjour,

Je voudrais récupérer des champs d’un fichier Excel.
Est ce que ceci est possible a réaliser ?
si oui des idées sur le code a effectuer ?

merci

tomlev · 23/04/2008, 15h01

Salut,

Ce sujet a été très souvent traité sur le forum, fais une recherche pour voir les discussions qui en parlent.

Pour manipuler des documents Excel (ou autres documents Office), il faut utiliser VSTO (Visual Studio Tools for Office).
Pour débuter je te conseille ce tutoriel :
http://morpheus.developpez.com/vsto2/

Skalp · 23/04/2008, 16h11

Tout dépend de ce que tu veux faire.

Il y a d'autres possibilités que les VSTO.
Tu peux par exemple faire de l'automation COM directement (piloter OFFICE ou Cf. ma signature).
Mais si tu ne souhaites que lire des champs dans un fichier Excel comme si c'était une base de données, tu peux utiliser une connexion OleDB pour te connecter au fichier Excel (OLE DB Provider for Jet).

cortex59 · 23/04/2008, 16h22

re,

je voudrais juste recuperer une variable par exemple de la cellule A1 et la mettre dans une variable declarer dans mon code VBA

merci

tomlev · 23/04/2008, 16h29

Et avec les liens qu'on t'a donné vers des tutoriels, tu n'y arrives pas ?

cortex59 · 24/04/2008, 09h22

bonjour,

serieusement je vois pas trop..

j'ai le chemin du point .xls dans la variable "chemin"
mais je vois pas comment je prend le contenu du champs A1,1 du fichier de mon chemin

n'oublier pas que c du VBA.(je le post ici car sur le forum VBA personne ne repond

)

un peu d'aide svp

merci

cortex59 · 24/04/2008, 10h43

re,

ce code me permet d'ouvrir mon fichier

Code :

Dim AppExcel
Dim Fichier
Fichier = c:\test.xls
 
Set AppExcel = CreateObject("Excel.Application")
AppExcel.Visible = True
 
AppExcel.Workbooks.Open (Fichier)
Set AppExcel = Nothing

maintenant je voudrais recuperer la valeur de la cellule A1,1

merci

cortex59 · 24/04/2008, 11h09

Code :

Dim toto
toto = AppExcel.Workbooks.Sheets("Feuil1").Range("A1")

j'ai essyer ceci mais lj'ai un mess d'erreur sur ce code

"variable d'objet non definie"

merci

tomlev · 24/04/2008, 12h39

Sur le forum VB.NET tu ne risquais pas d'avoir beaucoup d'aide

J'ai déplacé

SilkyRoad · 24/04/2008, 12h47

bonjour

Citation:

j'ai essyer ceci mais lj'ai un mess d'erreur sur ce code

"variable d'objet non definie"

comment as tu déclaré la variable "AppExcel" ?

bonne journée
michel

cortex59 · 24/04/2008, 13h06

bonjour,

voila mon code

Code :

Dim AppExcel
Dim Fichier
Fichier = FormtableauIO.ExcelFilename
 
Set AppExcel = CreateObject("Excel.Application")
AppExcel.Visible = True
AppExcel.Workbooks.Open (Fichier)
Set AppExcel = Nothing
 
Dim toto
Set toto = AppExcel.Workbooks.Sheets("Feuil1").Range("A1")
 
 
AppExcel.Workbooks(Fichier).Close
AppExcel.Visible = False

tomlev · 24/04/2008, 14h07

Enlève cette ligne

Code :

Set AppExcel = Nothing

23/04/2008, 14h57	#1 (permalink)
cortex59 Membre Confirmé Date d'inscription: mars 2008 Messages: 202	lire un fichier Excel Bonjour, Je voudrais récupérer des champs d’un fichier Excel. Est ce que ceci est possible a réaliser ? si oui des idées sur le code a effectuer ? merci

23/04/2008, 15h01	#2 (permalink)
tomlev Modérateur Date d'inscription: février 2004 Localisation: Paris Âge: 27 Messages: 4 191	Salut, Ce sujet a été très souvent traité sur le forum, fais une recherche pour voir les discussions qui en parlent. Pour manipuler des documents Excel (ou autres documents Office), il faut utiliser VSTO (Visual Studio Tools for Office). Pour débuter je te conseille ce tutoriel : http://morpheus.developpez.com/vsto2/ __________________ Pas de questions techniques par MP Il ne sert à rien de dire "ça fait une erreur" sans donner le message d'erreur !! Avant de poster, as-tu cherché dans les cours, la FAQ, le forum et sur Google ? Viens affronter ma brute !

23/04/2008, 16h11	#3 (permalink)
Skalp Rédacteur Date d'inscription: novembre 2006 Localisation: Levallois-Perret Messages: 691	Tout dépend de ce que tu veux faire. Il y a d'autres possibilités que les VSTO. Tu peux par exemple faire de l'automation COM directement (piloter OFFICE ou Cf. ma signature). Mais si tu ne souhaites que lire des champs dans un fichier Excel comme si c'était une base de données, tu peux utiliser une connexion OleDB pour te connecter au fichier Excel (OLE DB Provider for Jet). __________________ "C'est parce que la vitesse de la lumière est supérieure à celle du son que certains ont l'air brillant avant d'avoir l'air con." Bien débuter en .NET Comment utiliser Developpez.com pour résoudre votre problème Comment piloter Excel avec DotNET

23/04/2008, 16h22	#4 (permalink)
cortex59 Membre Confirmé Date d'inscription: mars 2008 Messages: 202	re, je voudrais juste recuperer une variable par exemple de la cellule A1 et la mettre dans une variable declarer dans mon code VBA merci Dernière modification par cortex59 ; 24/04/2008 à 09h46

23/04/2008, 16h29	#5 (permalink)
tomlev Modérateur Date d'inscription: février 2004 Localisation: Paris Âge: 27 Messages: 4 191	Et avec les liens qu'on t'a donné vers des tutoriels, tu n'y arrives pas ? __________________ Pas de questions techniques par MP Il ne sert à rien de dire "ça fait une erreur" sans donner le message d'erreur !! Avant de poster, as-tu cherché dans les cours, la FAQ, le forum et sur Google ? Viens affronter ma brute !

24/04/2008, 09h22	#6 (permalink)
cortex59 Membre Confirmé Date d'inscription: mars 2008 Messages: 202	bonjour, serieusement je vois pas trop.. j'ai le chemin du point .xls dans la variable "chemin" mais je vois pas comment je prend le contenu du champs A1,1 du fichier de mon chemin n'oublier pas que c du VBA.(je le post ici car sur le forum VBA personne ne repond) un peu d'aide svp merci Dernière modification par cortex59 ; 24/04/2008 à 09h58

24/04/2008, 10h43	#7 (permalink)
cortex59 Membre Confirmé Date d'inscription: mars 2008 Messages: 202	re, ce code me permet d'ouvrir mon fichier Code : Dim AppExcel Dim Fichier Fichier = c:\test.xls Set AppExcel = CreateObject("Excel.Application") AppExcel.Visible = True AppExcel.Workbooks.Open (Fichier) Set AppExcel = Nothing maintenant je voudrais recuperer la valeur de la cellule A1,1 merci

24/04/2008, 11h09	#8 (permalink)
cortex59 Membre Confirmé Date d'inscription: mars 2008 Messages: 202	Code : Dim toto toto = AppExcel.Workbooks.Sheets("Feuil1").Range("A1") j'ai essyer ceci mais lj'ai un mess d'erreur sur ce code "variable d'objet non definie" merci

24/04/2008, 12h39	#9 (permalink)
tomlev Modérateur Date d'inscription: février 2004 Localisation: Paris Âge: 27 Messages: 4 191	Sur le forum VB.NET tu ne risquais pas d'avoir beaucoup d'aide J'ai déplacé __________________ Pas de questions techniques par MP Il ne sert à rien de dire "ça fait une erreur" sans donner le message d'erreur !! Avant de poster, as-tu cherché dans les cours, la FAQ, le forum et sur Google ? Viens affronter ma brute !

24/04/2008, 14h07	#12 (permalink)
tomlev Modérateur Date d'inscription: février 2004 Localisation: Paris Âge: 27 Messages: 4 191	Enlève cette ligne Code : Set AppExcel = Nothing __________________ Pas de questions techniques par MP Il ne sert à rien de dire "ça fait une erreur" sans donner le message d'erreur !! Avant de poster, as-tu cherché dans les cours, la FAQ, le forum et sur Google ? Viens affronter ma brute !

		Forum des développeurs > Hardware, Systèmes et Logiciels > Microsoft Office > Général VBA
lire un fichier Excel

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email