lecture d'un fichier excel

Question

bonjour,
j'aurai aimer dans un code vb avoir acces au contenu d'un fichier excel
par exemple lire la cellule A1 d'un fichier "monfichier.xls" sans avoir à l'ouvrir ni a avoir à installer excel (pour cela, je sais qu'il faut importer dans le projet la librairie excel 10.0)

merci de vos reponses

mortalino · Answer

Salut,

il me semble (pas sûr à 100%) qu'il n'est pas possible de lire un fichier excel sans l'ouvrir.
Seuls les propriétés du documents sont accessibles (auteur, commentaires, mots-clés, etc...).

@++ 

<hr width="100%" size="2" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
/DIV>

bobbysv · Answer

je m esuis peut-etre mal exprimé mais quand je disai sans l'ouvrir en fait, c ouvrir le fichier... mais sans l'afficher!

mortalino · Answer

Ok, alors voici un bout de code, sachant que je pense que tu ne pourras pas le lire sans Microsoft Excel :

' *** référence : Microsoft Library Object 11.0 ou équivalent
Dim xlApp   As Excel.Application
Dim xlBook  As WorkBook
Dim xlSheet As WorkSheet
Dim MaVar   As String

Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = False

Set xlBook = xlApp.WorkBooks.Open("C:\Chemin\Nom fichier.xls")
Set xlSheet = xlBook.Sheets("Nom feuille")

'Exemple utilisation : 
MaVar = xlSheet.Range("A1").Value
MsgBox MaVar

xlBook.Close True 'ou False, pour la sauvegarde
xlApp.Quit

Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing

--Mortalino-- 
Colorisation automatique

@++ 

<hr width="100%" size="2" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
/DIV>

bobbysv · Answer

c'est ce qu'il me fallait merci!! j'espere qu la dll excel sufira et qu'excel n'a pas a etre installer! sinon tant pis, mon commanditaire devra acheter une licence excel! lol

merci!

Lecture d'un fichier excel

4 réponses

Votre réponse

Discussions similaires