<fieldset>
<label for="Dataset">Datasets (299)</label>
<input type="hidden" name="content-type" value="Reference table"/>
<button value="" type="submit">X</button>
<input type="hidden" name="sortBy" value="pubdate"/>
<input type="hidden" name="sortDirection" value="DESCENDING"/>
<input type="hidden" name="newquery" value="*"/>
<input type="hidden" name="pubdateRangeType" value=""/>
<input type="hidden" name="pageSize" value="50"/>
<input type="hidden" name="applyFilters" value="true"/>
<input type="hidden" name="content-type-orig" value=""Dataset" OR content-type_original:"Reference table""/>
</fieldset>


<fieldset>
<label for="Reference table">Reference tables (8687)</label>
<input type="hidden" name="content-type" value="Dataset"/>
<button value="" type="submit">X</button>
<input type="hidden" name="sortBy" value="pubdate"/>
<input type="hidden" name="sortDirection" value="DESCENDING"/>
<input type="hidden" name="newquery" value="*"/>
<input type="hidden" name="pubdateRangeType" value=""/>
<input type="hidden" name="pageSize" value="50"/>
<input type="hidden" name="applyFilters" value="true"/>
<input type="hidden" name="content-type-orig" value=""Dataset" OR content-type_original:"Reference table""/>
</fieldset>
I would like to get X of reference table in a webpage..Below is my code, but i unable to get what i want...how to amend to get it...

For Each ee In eHTML.getElementsByTagName("fieldset")
    If Trim(LCase(ee.innerText)) = "X" And Trim(LCase(ee.Type)) = "submit" Then
        ee.Click
        WaitWhile1000
        Set eHTML = IEapp.document
        Exit For
     End If
Next ee