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.

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"
mais le saveas ne veut rien savoir

le même code fonctionne parfaitement sous XP avec office 2000.