Version imprimable
Bonjour
cette instruction donne une erreur :
Comment formuler la commande?Code:
2
3
4Set xlapp = CreateObject("Excel.Application") Set owk = xlapp.Workbooks.Add Set owk = xlapp.Workbooks.Add owk.SaveAs ("fichier binaire.xlsb")
Merci d'avance.
PS.version Excel 97
Bonjour,
Le format xlsb n'est pas supporté avant Excel 2007.
En fait, le format xls est déjà un fichier binaire.
En résumé :
Avant Office 2007 (extensions à 3 lettres ) ==> Fichiers binaires dans un format propriétaire Microsoft.
Depuis Office 2007 (extensions à 4 lettres) ==> Fichiers xml (textes et feuilles de calculs) et fichiers binaires (macros, images, sons, vidéos ) regroupés dans un conteneur au format zip
bonjour
ok, pour la réponse.
Par contre si je crée un fichier en format normal (XLS), tout se passe bien; le programme se termine sans erreur.
Seulement, lorsque je veux le rouvrir (manuellement) voila le message qui apparait :
"Le format du fichier que vous tentez d'ouvrir, xxxxx.xls, est différent de celui spécifié par l'extension de fichier.
Assurez-vous que le fichier n'est pas endommagé et qu'il provient d'une source fiable avant de l'ouvrir. Souhaitez-vous ouvrir le fichier maintenant?"
Lorsque je réponds "Oui", celui-ci s'ouvre bien.
PS. je me suis trompé sur ma version Excel , c'est celle de 2007
veuillez m'excuser
La méthode SaveAs a des options, parametrès positionels, disponibles:
https://msdn.microsoft.com/en-us/lib.../ff841185.aspx
Et FileFormat disponible est listé dans la documentation aussi:Citation:
Envoyé par documentation
https://msdn.microsoft.com/en-us/lib.../ff198017.aspx
XLExcel12 (50) s'applique pour xlsb... donc, on peut faire comme ça.
Code:owk.SaveAs "fichier binaire.xlsb", 50 'XLExcel12=50
Merci pour la réponse.
Mais je ne comprends pas comment on fait la liaison entre XlExcel12 et xlsb; ce n'est pas évident!
De ce fait je ne vois pas les équivalents avec xls et xlsm.