Enregistrer sous un autre nom un fichier excel provenant du net

Zdouf

XLDnaute Nouveau
Bonsoir à tous!

Voici ma problématique: j'arrive à télécharger un fichier Excel à partir du web grâce à une macro, ci dessous. Cela me permet d'actualiser les données d'un autre fichier Excel.

Option Explicit

Declare Function DoFileDownload Lib "shdocvw.dll" (ByVal lpszFile As String) As Long

Sub DownLoadFile()
Dim sUrl As String

sUrl = StrConv(InputBox("URL du fichier à télécharger ?", "téléchargement", vbNullString), vbUnicode)
DoFileDownload sUrl
End Sub


Voici l'url du fichier télécharger:
http://services.assetmanagement.hsbc.fr/site/export.htm?opc_cod_int=2548

En revanche, je dois instruire manuellement le chemin de sauvegarde, et surtout le nom et type de fichier. N'est-il pas possible d'automatiser ces trois dernières choses sous Excel par le biais de la macro?

Bonne soirée.
 

Discussions similaires

Statistiques des forums

Discussions
314 489
Messages
2 110 136
Membres
110 684
dernier inscrit
kihel