Bonjour,
je suis sur un développement d'une interface sous word qui permet d'archiver (en fait enregistrer le document à un auter endroit) et consulter des documents dans une base pour les centraliser. Le problème qu'un utilisateur a soulevé me tarabuste : Dans les fichiers, il peut y avoir des objets OLE (type adobe ou excel par exemple) insérés. Or, ces fichiers doivent être enregistrés à leur tour pour pouvoir être toujours liés dans les documents archivés. Par quelle procédure peut-on parcourir les objets OLE dans un fichier ?
quelle boucle for each dois-je utiliser svp ?
 
Merci.

ca marche pas avec ca ?
For Each obj In Worksheets("Sheet1" ).OLEObjects

si, merci.
maintenant, je joue mon relou, et je demande la propriété (si elle existe) qui me renvoie le path de l'objet pointé... car je ne trouve pas

et c'est quoi ton code pour enregistrer dans un autre dossier ?
 
avec ca
Set cp2 = CreateObject("Scripting.FileSystemObject" )
cp2.CopyFolder chemin1, chemin2
ca fait le même problème ?

c'est pas .parent ?!!!

ou .sourcename

en fait je passe par un filecopy pour copier les documents s'ils sont de type autre que .doc
et par un simple saveas dans le cas contraire. Mais comme après les documents sont visibles par d'autres utilisateurs, dans le cas ou les documents liés sont sur le DD de celui qui enregistre le document, ben ca devrait planter...

.parent.name me retourne le nom de la page sous excel, et le nom du document sous word.