Bonjour,

Malgré plusieurs types de progs, je n'arrive pas à ouvrir un fichier excel depuis VB.net

Ajout de la référence Microsoft Excel 16.0 Object Library

Voici mon code


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
 
        Dim appExcel As Microsoft.Office.Interop.Excel.Application = CreateObject("Excel.Application") 'Application Excel
        Dim wbExcel As Microsoft.Office.Interop.Excel.Workbook = appExcel.Workbooks.Open("L:\GestCab\Essai.xlsx") 'Classeur Excel    ' <= ERREUR
 
        Dim wsExcel As Microsoft.Office.Interop.Excel.Worksheet = wbExcel.Worksheets(1) 'Feuille Excel
        appExcel.Visible = True 'Affiche la fenetre d'excel
 
    End Sub
Erreur ligne 4

OU
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
 
        Dim appExcel As Microsoft.Office.Interop.Excel.Application = CreateObject("Excel.Application") 'Application Excel
        appExcel.Visible = True 'Affiche la fenetre d'excel ' <= ERREUR
 
    End Sub
là aussi erreur ligne 4.

Erreur sur l'ouverture
"An unhandled exception of type 'System.InvalidCastException' occurred in WindowsApplication4.exe"
Additional information: Impossible d'effectuer un cast d'un objet COM de type 'Microsoft.Office.Interop.Excel.ApplicationClass' en type d'interface 'Microsoft.Office.Interop.Excel._Application'. Cette opération a échoué, car l'appel QueryInterface sur le composant COM pour l'interface avec l'IID '{000208D5-0000-0000-C000-000000000046}' a échoué en raison de l'erreur suivante : Erreur lors du chargement de la bibliothèque/DLL du type. (Exception de HRESULT : 0x80029C4A (TYPE_E_CANTLOADLIBRARY)).
Merci de votre aide.