Discussion :

[vbanovice]

bonsoir,

j'aimerais aussi recuperer des donnees dans quelques cellule d'une feuille feuil1
de tous les fichioers ferme ( env 400 a 500 )et les inclure dans un fichier (ouvert) pour faire une synthese

merci de votre aide

Cordialement

[cafeine]

Hello,

j'ai une application qui fait ce type de boulot.
il s'agit de lire les fichier par DAO.

exemple succinct :

Code :

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

1
2
3
4
5
6
7
8
9
10
    ' ouverture du fichier par DAO
    Set dbEng = CreateObject("DAO.DBEngine.36")
    Set db = dbEng.Workspaces(0).OpenDatabase("C:\Temp\Toto.xls", _
                              False, _
                              False, _
                              "Excel 8.0;HDR=NO;")
 
    ' requête pour récupérer le nom du client
    sSQL = "SELECT * FROM [Feuil1$A1:G500]"
    Set rec = db.OpenRecordset(sSQL, 4)