Vb6 - excel

S4ngo Messages postés 51 Date d'inscription mercredi 15 décembre 2004 Statut Membre Dernière intervention 11 mai 2006 - 13 févr. 2006 à 12:42
satrincha Messages postés 8 Date d'inscription jeudi 9 janvier 2003 Statut Membre Dernière intervention 19 septembre 2011 - 13 févr. 2006 à 17:33
Bonjours,
je recois des données du port com, et je doit les sotcker dans un fichier excel. Mais je ne sais pas comment faire, j'ai déja créer le fichier, je sais l'ouvrir a partir de mon application vb, mais je ne sais pas comment envoyer les données dans le document excel
Merci d'avance.

code:

Const Serveur = "Excel|c:\relever_polluants.xls"

Private Sub Excel_Click()
'Déclaration des variables
Dim appExcel As Excel.Application 'Application Excel
Dim wbExcel As Excel.Workbook 'Classeur Excel
Dim wsExcel As Excel.Worksheet 'Feuille Excel
'Ouverture de l'application
Set appExcel = CreateObject("Excel.Application")
'Ouverture d'un fichier Excel
Set wbExcel = appExcel.Workbooks.Open("C:\relever_polluants.xls")
'wsExcel correspond à la première feuille du fichier
Set wsExcel = wbExcel.Worksheets(1)
'appExcel.visible=True permet de rendre la fenetre visible, car sans sa, elle est ouverte mais pas visible
appExcel.Visible = True
End Sub

1 réponse

satrincha Messages postés 8 Date d'inscription jeudi 9 janvier 2003 Statut Membre Dernière intervention 19 septembre 2011
13 févr. 2006 à 17:33
Salut,

l'instruction est :

ObjetExcel.Application.Cells(ligne,colonne) = valeur

Attention excel limite à 65536 lignes par feuille
0
Rejoignez-nous