Enregistrer un fichier intra/internet [SOLUTIONNE]

[Jam]

Bonjour à tous,

J'utilise dans un programme le type de commande suivante
Selection.Hyperlinks(1).Follow
pour ouvrir un fichier.
Je voudrai non plus l'ouvrir mais l'enregistrer sur un répertoire donné, sans l'ouvrir.
Existe-t-il une commande spécifique pour cela à la pla ce de Follow ? Je n'en trouve pas.

Merci de votre retour

 

[RoyalP]

avec cette methode ?

Dim workbook_Name As Variant
 workbook_Name = Application.GetSaveAsFilename
  If workbook_Name <> False Then
    ActiveWorkbook.SaveAs Filename:=workbook_Name
End If

 

[Jam]

Merci pour ta réponse RoyalIP.
J'ai trouvé une solution entre-temps qui fonctionne. Elle fait appelle à l'API URLDownloadToFileA

 

[RoyalP]

pas de soucis, au plaisir de vous revoir.