voila je vx creer un classeur j'ai réussi a faire ce code mais le classeur creer est en lecture seul.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Dim XLApp As New Excel.Application
Dim XLBook As Workbook
 
set XLBook = XLApp.Workbooks.Add
XLBook.SaveAs "G:\ArcGis\menu.xls"
Workbooks.Open "G:\ArcGis\menu.xls"