Excel 通过VBA更改网站的活动选择

我试图通过Excel模块通过VBA代码将页面中显示的产品限制从“15”更改为“全部”

<fieldset class="results-per-page">
 <span> 
    <label>Results per page</label>
    <a href="#15" id="15" class="active">15</a>
    <a href="#30" id="30" >30</a>
    <a href="#all" id="all">View All</a>
 </span>
</fieldset> 

每页结果

为什么不直接导航到它？例如

ie.navigate sURL&“#all”

？其中sURL是上述页面的网址

看这个例子

Sub sample()
    Dim ie As Object
    Dim sURL As String

    '~~> Change this to the relevant URL
    sURL = "D:\Users\SidzPc\Desktop\test.htm"

    Set ie = CreateObject("internetexplorer.application")
    ie.Visible = True

    ie.navigate sURL & "#all"
End Sub

屏幕截图

---

谢谢，我找到了解决办法

这是密码-

      If IE.Document.Links.Length > 0 Then

For i = 1 To 600
        If IE.Document.Links(i) = "http://www.xyz.com/computer/all-products#all" Then
           IE.Document.Links(i).Click
        End If
Next i

       End If 

---

感谢您的回复，但该网站正在使用javascript，因此URL没有改变，也不接受任何参数。我认为，这是选择更改时执行的javascript代码。var login_status=“”var产品名称=[“XYZ”，“ABC”]；var乘积_id=[“1”，“1”]；var产品价格=[“1899.99”、“1499.99”]；var产品类别=[“个人电脑”、“个人电脑”]；var产品_子类别=[“笔记本电脑”、“笔记本电脑”]；如果（isLogin（））{login_status=“logged in”；else{login_status=“logged out”}var utag_data={page_type:“分类过滤器”，page_name:“PC分类过滤器”，site_language:“en”，loggedin_状态：登录状态，分区：“PC”，响应设计模式：“t”，page_面包屑：“商店>PC>所有PC”，page_频道：“产品”，产品标识：产品标识，产品价格：产品价格，产品名称：产品名称，产品类别：产品类别，产品子类别：产品子类别，网站搜索结果：“29”，每页搜索结果：“15”}；我可以查看网站URL吗？由于某些安全问题，我无法在门户网站上共享，但我将通过您的人员电子邮件转发给您。