Information générale
Catégorie:
COM/DCOM et OLE Automation
Not sure how to get around this particular permission problem. Here is something of a work-around of the top of my head.
1. open current document
2. select whole document
3. copy selection
4. Add new document
5. Paste whole selection into new document
6. SaveAs active document.
Code goes something like this: NOTE: Not tested so there may be errors!!!!
With oWord
.Open(D:\xfilename.doc,.f.,.t.)
.Selection.WholeStory
.Selection.Copy
oDocument.Add()
.Selection.Paste
.ActiveDocument.SaveAs(c:\Newfilename.rtf,100)
etc....
endwith
HTH
Paul.
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement