Bonjour,
Je suis un débutant de première classe en VBA. Je souhaiterais récupérer le code source HTML d'une page web dans une boite de texte ou une variable pour pouvoir le traiter par la suite.
Voila le code que j'ai trouvé et que j'ai essayé d'adapter à mon cas, mais sans succès...
Je souhaiterais que la récupération du code source se fasse en cliquant sur le bouton CommandButton1.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Dim contenuHTML As String Private Sub UserForm1_Load() WebBrowser1.Navigate2 "http://www.google.com" End Sub Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) contenuHTML = WB.Document.documentElement.innerHTML End Sub Private Sub CommandButton1_Click() End Sub
Merci d'avance de votre aide,
Partager