problem getting internet values

hello, I have this macros to get values from the website, but i can't get the values, in this case, i want to get the price (and the states if is posible), thats is "NM-M$0.49", " PLD-SP$0.25", i wish to get the complete table or just the first price.


I would greatly appreciate anyone who can give me a hand

Code:

---

Sub test1()
    Dim htmlDeRespuesta As Object
    Dim o As Object
    Set htmlDeRespuesta = CreateObject("htmlFile")
    With CreateObject("msxml2.xmlhttp")
        .Open "Get", "https://www.abugames.com/magic-the-gathering/singles/product-detail/Cho%252DManno,-Revolutionary-%252D-FOIL/Mercadian-Masques/English/", False
        .send
        htmlDeRespuesta.body.innerhtml = .responsetext
    End With
        For Each o In htmlDeRespuesta.all
        If LCase(o.classname) = "row not-first" Then
            Range("c4").Value = o.innertext
                Exit For
        End If
    Next
End Sub

---

thanks!