Pages

[WD-2007] Définir un lien hypertexte comme chemin pour enregistrer sous sujet

mercredi 29 janvier 2014




bonjour,

je sais comment définir un chemin et donner un nom à un fichier pour enregistrer sous en macro.

J'utilise le code suivant :


Code:


WordApp.ChangeFileOpenDirectory "e:\"
WordApp.ActiveDocument.SaveAs Filename:=Workbooks("fichier l20").Sheets("datas autre défaut").Range("m50").End(xlUp).Text



Ce que j'aimerais faire c'est remplacer la 1ière ligne par un code permettant de sélectionner un lien hypertexte contenu dans une cellule qui m'indique le chemin à suivre pour enregistrer mon fichier.

Ceci permettrai de mettre à jour le fichier de destination sans toucher à la macro en cas de changement.

Je vous remercie d'avance.




Aucun commentaire:

Enregistrer un commentaire