ret1

So for this website: https://www.tesco.com/groceries/en-GB/products/268279288 The following code pulls the Price/price per unit etc. Private Function getprices(ByVal URL As String) As Variant Dim source As Object Dim http As New XMLHTTP60, html As New HTMLDocument Dim ret(1 To 5) As String Dim...

If one of the ret(1), ret(2), ret(3) is not found it skips it, but it pastes the next one in that row, rather than skipping; any ideas how to alter the code to achieve this please? Thanks. Option Explicit Sub Get_Prices() Dim Lastrow As Long Dim LastRow2 As Long Dim x...

Hello, Bit of a novice on pulling data from the web. The 3 lines in bold below work. But when I try to pull another element, ret(4), the code isn't working. How do I work out whether it is a class or attribute? Many thanks. Private Function getprices(ByVal URL As String) As Variant...