Bonsoir,

je souhaite réaliser un code permettant d'importer quotidiennement un fichier Excel se trouvant sur internet (ou de manière équivalente copier le contenu de ce fichier dans un onglet de mon fichier courant).

J'ai la première partie du code qui ouvre la page web contenant le fichier

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
Sub OuvrirPageWeb()
    'Nécessite d'activer les références:
       'Microsoft HTML Objects Library
 
    Dim IE As Object
    Dim maPageHtml As HTMLDocument
    Dim Htable As IHTMLElementCollection
    Dim maTable As IHTMLTable
    Dim j As Integer, i As Integer
 
    Set IE = CreateObject("InternetExplorer.Application")
    IE.Visible = True
 
 
    IE.navigate "https://www.theice.com/marketdata/reports/ReportCenter.shtml?reportId=10&contractKey=60"
 
        Do Until IE.readyState = 4
        DoEvents
    Loop
Je souhaite désormais copier la feuille excel présente sur cette page ou "simuler" un click sur le bouton télécharger (enregistrer) et télécharger le fichier.

Merci d'avance à toute personne pouvant m'aider à résoudre ce problème.

Bonne soirée.