Bonjour,

J'essaye de lire la page web suivante:
https://finalfantasy.fandom.com/wiki...al_Fantasy_VI)
En particulier, obtenir les données dans le pavé "Stats".

J'ai écrit le code suivant:
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
21
22
23
24
25
26
27
28
29
Public Sub RetrieveData()
On Error GoTo Error
    Const Url As String = "https://finalfantasy.fandom.com/wiki/Wererat_(Final_Fantasy_VI)"
 
    Dim Ie As SHDocVw.InternetExplorer
    Set Ie = New SHDocVw.InternetExplorer
 
    Ie.Visible = True
    Ie.Navigate2 Url
    While Ie.readyState <> READYSTATE_COMPLETE
        DoEvents
    Wend
    Dim Document As MSHTML.HTMLDocument
    Set Document = Ie.Document
 
    Dim Nodes As MSHTML.IHTMLDOMChildrenCollection
        '// Recherche du niveau (level)
    Set Nodes = Document.querySelectorAll("#mw-content-text > div.mw-parser-output > div:nth-child(10) > aside > section:nth-child(1) > div > section:nth-child(1) > section:nth-child(2) > section.pi-smart-group-body.pi-border-color > div:nth-child(1)")
 
    Dim Node As MSHTML.HTMLHtmlElement
    Set Node = Nodes.Item(0)
 
    Ie.Quit
Exit Sub
Resume
Error:
    Stop
    Ie.Quit
End Sub
Malheureusement, l'objet Node reste éternellement à Nothing.

Notes:
J'ai obtenu le selecteur CSS à donner à la méthode querySelectorAll via l'outil de développement de MS Edge.