Lien entre un exécutable en vb6 et un doc excel

Résolu
nicosne Messages postés 37 Date d'inscription lundi 9 août 2004 Statut Membre Dernière intervention 10 mai 2005 - 20 janv. 2005 à 16:03
valtrase Messages postés 937 Date d'inscription lundi 19 janvier 2004 Statut Membre Dernière intervention 9 mai 2022 - 21 janv. 2005 à 14:14
Slt,



j'essaye de faire une application en vb6.

je voudrais savoir comment faire pour qu'une textbox remplisse les cases d'un document excel



merci,

nico

1 réponse

valtrase Messages postés 937 Date d'inscription lundi 19 janvier 2004 Statut Membre Dernière intervention 9 mai 2022 4
21 janv. 2005 à 14:14
Salut,
As tu chercher sur le forum nous avons aborder le thème plusieur fois !!!!

Voilà un bout de code a toi de le paufiner

Dim objExcelApp As Object
Dim objWorkSheet As Object
' On ouvre Excel
Set objExcelApp = CreateObject("Excel.Application")
' Un classeur et une feuille
objExcelApp.WorkBooks.open ("c:\Mon classeur.xls")
'utilise la propriété .Add si le classeur existe déja
Set objWorkSheet = objExcelApp.ActiveSheet
' ici on rentre les données
objWorkSheet.Cells(1, 1).Value = "Mes données"
' etc......
objExcelApp.Save ("C:\Mon Classeur.xls")


objExcelApp.ActiveWorkbook.Close
objExcelApp.quit
' on libère la mémoire
objExcelApp = Nothing
objWorkSheet = Nothing

____________________________________________________

Cordialement, Jean-Paul

Le Savoir n'a de valeur que s'il est partagé
3
Rejoignez-nous