Je viens de faire un petit test tres explicite du coup pour cette histoire de format de fichier sans VBProject
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Sub piou() Dim wbk As Workbook Set wbk = Application.Workbooks.Add wbk.VBProject.VBComponents.Add 1 wbk.SaveAs "C:\temp\vide.xls", xlExcel7 wbk.Close End Sub
il faudrait eventuellement voir le xlfileformat adequat pour avoir le combo xls + macro
Partager