Bonjour ,

je chreche à ouvrir excel ( une page bien défini ) avec un bouton .

mais je rencontre des errreurs avec mon code :

Erreur 3 Type 'Excel.Worksheet' non défini. C:\Users\Maison\Documents\Visual Studio 2010\Projects\Projet gériagestion\Projet gériagestion\menu général.vb 5 20 Projet gériagestion
Erreur 2 Type 'Excel.Workbook' non défini. C:\Users\Maison\Documents\Visual Studio 2010\Projects\Projet gériagestion\Projet gériagestion\menu général.vb 4 20 Projet gériagestion
Erreur 1 Type 'Excel.Application' non défini. C:\Users\Maison\Documents\Visual Studio 2010\Projects\Projet gériagestion\Projet gériagestion\menu général.vb 3 21 Projet gériagestion


et voici mon 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
15
16
Public Class menu_général
 
    Dim appExcel As Excel.Application
    Dim wbExcel As Excel.Workbook
    Dim wsExcel As Excel.Worksheet
 
Private Sub Button6_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles planning_personnel.Click
        'Ouverture de l'application
        appExcel = CreateObject("Excel.Application")
        'Ouverture d'un fichier Excel
        wbExcel = appExcel.Workbooks.Open("C:\Users\Maison\Downloads\Geria gstion\planning horaire.xlsx")
        'wsExcel correspond à la première feuille du fichier
        wsExcel = wbExcel.Worksheets(1)
 
        appExcel.Visible = True
    End Sub
merci d'avance

matthieu