Bonjour a tous,

Dans le code suivant, je cherche a sauvegarder un fichier dont le contenu est une page HTML sous format MS Excel 2000 mais dans mon SaveAs je ne sais pas comment preciser le format d'Excel:

Dim xlApp As Excel.Application

Dim xlBook As Excel.Workbook

Dim xlSheet As Excel.WorkSheet

Set xlApp = CreateObject("Excel.Application")

Set xlBook = xlApp.Workbooks.Open("c:\index.xls")
xlBook.SaveAs "c:\indexa.xls"

Pouvez-vous m'aider s'il vous plait ?

Cordialement,

David