Lire un fichier excel sous vb

pikatchou, le jeudi 13 novembre 2003 à 16:26:59

bonjour les gens

je voudrais savoir qu'elle est la ligne de commande pour lire des lignes spécifiques d'un fichier excel sous vb

merci!!!

Répondre à pikatchou Signaler ce message aux modérateurs Aller au dernier message

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

mirza, le jeudi 13 novembre 2003 à 18:13:08

Hello

2 solutions (je les connais mal ..)

-soit utiliser de RecordSet et un appel à ODBC
-soit utiliser un objetc Excel et Sheet

Répondre à mirza

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

Dimandja, le jeudi 13 novembre 2003 à 20:09:56

Un objet Excel et Sheet:

Dim oXL As Excel.Application
Dim oBook As Excel.Workbook
Dim oSheet As Excel.Worksheet
Dim numFields As Integer
Dim numRows As Integer
Dim curField As Integer
Dim curRow As Integer

oXL = New Excel.Application
oBook = oXL.Workbooks.Open(c:\fichier.xls)
oXL.Visible = False

' compte les champs
While Not (oBook.ActiveSheet.Cells(1, numFields + 1).value Is MyNull)
numFields = numFields + 1
End While

' compte les lignes
While Not (oBook.ActiveSheet.Cells(numRows + 1, 1).value Is MyNull)
numRows = numRows + 1
End While

' lecture
For curRow = 1 To numRows
For curField = 1 To numFields
LineIn = LineIn & oBook.ActiveSheet.Cells(curRow, curField).Value
Next curField
LineIn = “”
Next curRow

oBook.Close()
oXL = Nothing

Répondre à Dimandja

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

pikatchou, le vendredi 14 novembre 2003 à 09:30:33

merci de votre aide
bonne journée!!

Répondre à pikatchou

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

ZobyOne, le jeudi 15 janvier 2004 à 14:40:54

Moi aussi je cherche a lire des infos dans un fichier Excel,
mais je debute en VB
Quelqu'un pourrait-il m'expliquer un peu mieux?

merci d'avance

Répondre à ZobyOne

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

WhiteFang, le jeudi 15 janvier 2004 à 14:56:25

;-)

Pour cela, il te faut déjà bien connaître Excel, et surtout, ses objets, et aussi avoir de bonnes connaisssances en anglais...

Ensuite, il te suffit de traduire de que tu fais sous Excel en Anglais.... Un classeur, c'est l'objet Workbooks, une feuille, Sheets, une cellule, Cells.... Etc...

De là, utilise la logique...

Utiliser une autre appli ? Faut créer une session, pour pouvoir utiliser ses objets... Dim AppliExcel As New Excel.Application... Là, une nouvelle session Excel est crée (pour ne pas utiliser une éventuelle session existante... Ce qui mettrais le dawa...)

Ensuite, tout s'enchaine : AppliExcel.Workbooks.Open...

Et l'idéal, est d'utiliser des varaibles objets, style :

AppliExcel.Workbooks.Open(xxx)
Set MonExcel=AppliExcel.ActiveWorkbook.sheets(1)

Il ne te reste qu'a faire tes boucles et autres traitements !!

MonExcel.Cells(L,C)......

N'oublie pas,en fin :

AppliExcel.ActiveWorkbook.Close (true ou false si tu veux enregistrer...)
AppliExcel.Quit

;-)

Wild and Free

Répondre à WhiteFang

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

Seb31, le jeudi 15 janvier 2004 à 15:04:43

tu as aussi un tutoriel bien fait ici:
http://drq.developpez.com/vb/tutoriels/Excel/

Seb
Ne pas avoir de but est aussi un but.

Répondre à Seb31

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

WhiteFang, le jeudi 15 janvier 2004 à 15:03:07

;-)

Pour répondre aussi à Dimadja : La variable d'application :

ActiveCell.SpecialCells(XlCellTypeLastCell).Row où Column

t'évitera pas mal de très lourdes boucles While machin, qui ne sont pas très usités quand on fait du VB, sauf sous la torture !! ;-)))))) Le dev, le dev, fô aller à l'essentiel !! ;-) En toute amitié !! ;-)

;-)

Wild and Free

Répondre à WhiteFang

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

WhiteFang, le jeudi 15 janvier 2004 à 15:13:13

;-)

Pour répondre au post initial :

Dim AppliExcel As New Excel.Application
(cela va créer une nouvelle session Excel)

Dim NomFichier

NomFichier=AppliExcel.GetOpenFileName xxxxx
(où xxx sera un chemin vers un xls existant)

AppliExcel.Workbooks.Open NomFichier

Dim DerLne, DerCol, ClasseurActif, FeuilleActive

Set ClasseurActif=AppliExcel.ActiveWorkbook.Name

Set FeuilleActive=ClasseutActif.ActiveSheet.Name

Derlne=FeuilleActive.ActiveCell.SpecialCells(XlcelltypeLastCell).Row
DerCol=(idem, mais en récupérant).Column

Là, tu a tout ce qu'il te faut pour lire la feuille active....

Une boucle For, par exemple.... ;-)

;-)
Wild and Free

Répondre à WhiteFang

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

dj_jillustre, le jeudi 31 janvier 2008 à 15:41:40

Quel est la version de VB pour ce code

Répondre à dj_jillustre

Posez votre question Répondre

Résultats pour lire un fichier excel sous vb

Lire fichier excel (Résolu) Bonjour, Voilà, je n'arrive plus depuis le "poste de travail" ou du "bureau" à ouvrir mes fichiers excel. J'ai vérifié au niveau des propriétés des fichiers excel qu'ils disposent bien de l'extension xls. Si je veux ouvrir un... www.commentcamarche.net/forum/affich-6606655-lire-fichier-excel

Copier/coller fichier excel VBA (Résolu) Bonjour, voilà j'essaye désespérement de savoir comment rechercher un fichier excel dans un répertoire, j'ai trouvé des bouts de codes mais lorsque je lance la recherche ca ne fonctionne pas. bon encore ca passons je trouverai bien... www.commentcamarche.net/forum/affich-5717416-copier-coller-fichier-excel-vba

[comment crée un fichier excel en VB] (Résolu) Bonjour forum je voudrais créer un fichier excel en visual basic et je rencontre d'énorme difficulté car je suis nouveau en VB. si quelqu'un peut m'expliquer comment faire, je lui serai trés reconnaissant. merci d'avance. www.commentcamarche.net/forum/affich-1506279-comment-cree-un-fichier-excel-en-vb

Réponses suivantes

Résultats pour lire un fichier excel sous vb

[Word] Impossible de rétablir une liaison DDE avec ExcelLors d'un publipostage à partir d'un fichier Excel généré par Access, Word affiche le message suivant :"Impossible de rétablir une liaison DDE avec MICROSOFT EXCEL pour achever la tâche en cours" Pour contourner ce problème, il suffit d'enregistrer... www.commentcamarche.net/faq/sujet-2962-word-impossible-de-retablir-une-liaison-dde-avec-excel

Réponses suivantes

Résultats pour lire un fichier excel sous vb

Recuperer le contenu d'1 fichier excel en VB6 (Résolu)Bonjour forum j'ai un fichier excel (source) dont je doit recuperer les données pour le mettre dans un autre fichier excel. tout doit etre piloter en VB6 si quelqu'un peut m'aider à le faire,je lui serai reconnaissant merci d'avance www.commentcamarche.net/forum/affich-1518697-recuperer-le-contenu-d-1-fichier-excel-en-vb6

Regrouper des fichiers Excel en un fichier tx (Résolu)Bonjour, Je dispose de plusieurs fichiers Excel que je dois regrouper dans un fichier txt. Les fichiers à regrouper commencent par le même nom: par exemple pommeverte, pommerouge, pommejaune... Ces fichiers contiennent une seule colonne (A) et la... www.commentcamarche.net/forum/affich-3402321-regrouper-des-fichiers-excel-en-un-fichier-tx

[EXCEL/VBA] Maintenance de macros (Résolu)Bonjour à tous, J'ai écrit une macro en VBA qui utilise un Module et une boite de dialogue. Cette macro est utilisée actuellement dans plusieurs fichiers Excel, ce qui m'oblige à tous les mettre à jour lorsque je veux modifier la macro.... www.commentcamarche.net/forum/affich-2990002-excel-vba-maintenance-de-macros

Réponses suivantes

Résultats pour lire un fichier excel sous vb

Télécharger Free Excel/Xls to Pdf ConverterConvertissez rapidement et facilement vos documents Excel en document PDF. Rien de plus simple avec Excel/Xls to Pdf Converter. C'est un outil de conversion qui vous permet de convertir un fichier Excel en PDF. La conversion peut se faire... www.commentcamarche.net/telecharger/telecharger-34056376-free-excel-xls-to-pdf-converter

Réponses suivantes