Bonjour,
J'ai un petit soucis, j'essaye de mettre une valeur récupérer de ma feuille Excel:
Voici mon code :
la variable code_depositaire est déclaré en integer quand j'exécute ceci il me dit "type incompatible".
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 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(strFichier) 'wsExcel correspond à la première feuille du fichier Set wsExcel = wbExcel.Worksheets(1) code_depositaire = wsExcel.Cells(2, 11)
J'ai fait une test avec Isnumeric et les variables sont bien des numériques
Je ne comprend pas...![]()
Partager