T
tarzan
Guest
salut je suis débutant en excel et en vba et joré aimé un peu d' aide sur la facon d' ouvrir une feullie excel à partir d' un barre d' outils. C 'est surtt le code de la macro qui me gène il me dit qu 'un objet est manquant :-/
voila mon code :
Sub vigie()
'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 = appExcel.Excel.Application
With appExcel.Workbooks.Open("C:\travail\pop\ferries\replan\vigies.xls")
End With
'Ouverture d'un fichier Excel
Set wbExcel = appExcel.Workbooks.Open("C:\travail\pop\ferries\replan\VIGIE.XLS")
'wsExcel correspond à la première feuille du fichier
Set wsExcel = wbExcel.Worksheets(1)
End Sub
Merci de votre aide! ;-)
@ bientot
tarzan
voila mon code :
Sub vigie()
'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 = appExcel.Excel.Application
With appExcel.Workbooks.Open("C:\travail\pop\ferries\replan\vigies.xls")
End With
'Ouverture d'un fichier Excel
Set wbExcel = appExcel.Workbooks.Open("C:\travail\pop\ferries\replan\VIGIE.XLS")
'wsExcel correspond à la première feuille du fichier
Set wsExcel = wbExcel.Worksheets(1)
End Sub
Merci de votre aide! ;-)
@ bientot
tarzan