Actualiser en VBA une page internet

[Daniel]

Bonjour à tout le forum

J'aimerai savoir s'il existe un code VBA qui actualise (touche F5 de internet Explorer) une page internet qui est lancée elle même par une macro ???

Merce d'avance

 

[Moa]

Salut Daniel !

Oui c'est possible.

Voici une solution :

Menu 'Données / Données Externes / Nouvelle requête sur le Web.

Tu suis les instructions.

Puis tu as ensuite deux solutions :

Soit tu te sers du menu Données / Actualiser les données, soit tu fais une macro qui demanderas un 'refresh' de ta page.

Puis ensuite, tu peux mettre ta macro dans Workbook_Open afin que ta mise à jour se fasse automatiquement à l'ouverture de ton classeur.

@ +++


Moa

 

[albert]

Bonjour Daniel, Moa, le forum,
fais un essai avec ce code :
Sub Macro1()
Columns('A:K').Select
Selection.Clear
With ActiveSheet.QueryTables.Add(Connection:= _
'URL;Lien supprimé _
, Destination:=Range('A1'))

.Refresh BackgroundQuery:=False
End With
End Sub

 

[MichelXld]

bonjour Daniel , Moa et Albert

pour ma part j'ai compris qu 'il s'agissait de rafraichir directement la page Web


Sub rafraichirPageWeb()
'activer la reference Microsoft Internet Controls
Dim IE As InternetExplorer

Set IE = CreateObject('InternetExplorer.Application')
IE.Visible = True
IE.navigate 'http://www.mappy.fr'
Do Until IE.ReadyState = READYSTATE_COMPLETE
DoEvents
Loop

IE.ExecWB OLECMDID_REFRESH, OLECMDEXECOPT_DONTPROMPTUSER
End Sub


bonne soiree
MichelXld

Message édité par: michelxld, à: 11/08/2005 17:53