Discussion :

[famdsm]

bonjour
je cherche à creer une boutton de commande sur un interface vb6 afin de la lier ou faire appelé une feuille excel. Merci à tout le monde

[SfJ5Rpw8]

Comment utiliser Excel en VB6 ?

[famdsm]

Bonjour
je pense que vous n'avez pas compris ma question, que je peux le poser d'une autre maniére:
je travaille en VB6, j'ai creer une form qui presente un label et deux bouttons de commmandes. une boutton qui permet de quitter le programme et l'autre boutton c'est elle , par un clic fait appel à une feuille excel ou à un fichier excel.
Merci pour votre comprhension

[wise_mind]

essayer ce code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Command3_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 CHANGER LE CHEMAIN
    Set wbExcel = appExcel.Workbooks.Open(App.Path + "\data\onrham2.xls")
    'wsExcel correspond à la première feuille du fichier
    Set wsExcel = wbExcel.Worksheets(1)
    appExcel.Visible = True
End Sub

[zazaraignée]

Si tu veux que la feuille Excel s'affiche dans l'interface de ton application VB, tu dois utiliser un composant OLE présent sur la palettes d'outils standards de VB. Pour son utilisation, tu fais F1. Pour avoir un apreçu de toutes ses possibilités, tu fais F2.