mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 5 janv. 2007 à 15:03
Salut,
et si tu regardes sur Codyx.org, tu trouveras comment piloter Excel, en déclarant l'appli en tant qu'objet, afin de modifier le fichier (ou récupérer des données) depuis VB6
En gros, il faut cocher la référence Microsoft Excel objects library
puis
Dim xlApp As Excel.Application
Dim xlBook As WorkBook
Set xlApp = "Excel.Application"
Set xlBook = xlApp.WorkBooks.Open("c:\chemin\nom fichier.xls")
xlApp.Visible = True
MsgBox xlBook.Sheets(1).Range("A1").Text
' donnera la valeur de la
cellule A1 de la première feuille de ton classeur
xlBook.Close False 'False ou True, c'est pour l'enregistrement
Set xlBook = Nothing
xlApp.Quit
Set xlApp = Nothing