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

Résolu
Signaler
Messages postés
37
Date d'inscription
lundi 9 août 2004
Statut
Membre
Dernière intervention
10 mai 2005
-
Messages postés
936
Date d'inscription
lundi 19 janvier 2004
Statut
Membre
Dernière intervention
17 mars 2017
-
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

Messages postés
936
Date d'inscription
lundi 19 janvier 2004
Statut
Membre
Dernière intervention
17 mars 2017
4
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
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 109 internautes nous ont dit merci ce mois-ci