Probleme ouverture fichier excel en VB

Question

Bonjour,

Voici le code que j'ai ajouter à mon programme en vb:

'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:	est.xls") 
'wsExcel correspond à la première feuille du fichier

Set wsExcel  = wbExcel.Worksheets(1)

J'ai ajouter excel dans les references sous vb et il me fais une erreur sur la ligne en gras, l'erreur est la suivante :

run time erreur '-2147417581(80010105)':

method 'open' of object 'workbooks' failed

Une idée?

bigfish_le vrai · Answer

Salut,

essaye en declarant tes variables wbExcel et wsExcel en object pour voir. perso je ne vois que ça.

Dim wbExcel As Object.Workbook 'Classeur Excel 
Dim wsExcel As Object.Worksheet 'Feuille Excel 

A+

cs_MPi · Answer

Je vois la même chose que BigFish (salut), mais je changerais la façon de déclarer... Dim wbExcel As Object 'Classeur Excel Dim wsExcel As Object 'Feuille Excel Si tu veux utiliser les références, ça risque de ne pas être portable d'un PC à l'autre selon les versions d'Offfice, mais tu pourrais y aller ainsi Dim appExcel As New Excel.Application 'Application Excel Dim wbExcel As Excel.Workbook 'Classeur Excel Dim wsExcel As Excel.Worksheet 'Feuille Excel et tu laisses tomber cette ligne ~~Set appExcel = CreateObject("Excel.Application")~~ MPi² Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI

thuglife6938 · Answer

ok  merci je vais essayer tout sa

Probleme ouverture fichier excel en VB

3 réponses

Votre réponse

Discussions similaires