Bonjour je suis sous W8 avec Office 2007 et VB6.
J'ouvre un document qui me sert de modèle et j'essaye de l'enregistrer sous un autre nom le temps de faire les traitements nécessaires.
mais le saveas ne veut rien savoir
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Dim Test_app as Object Dim Conv_doc as Object Set Test_app = CreateObject("Word.Application") Set Conv_doc = Test_app.Documents.Open("MonDoc.doc") Conv_doc.SaveAs "Provis.doc"
le même code fonctionne parfaitement sous XP avec office 2000.
Partager