时间戳

首页 > 解决方案 > 使用 vba + selenium 取消选中滑块复选框

vba - 使用 vba + selenium 取消选中滑块复选框

问题描述

下面是找到选中滑块复选框的代码：

    For Each Aelement In browser.FindElementsById("compte-alertes").First.FindElementsByTag("div")
        If Aelement.Attribute("class") = "slider_checkbox checked" Then
           '?
        End If
    Next

我想取消选中滑块复选框。（如果我手动取消选中，Aelement.Attribute("class") = "slider_checkbox"）

<div id="compte-alertes" class="bloc box-shadow ">
  <div class="bandeau fond-noir">
  <div class="content">
     <table id="mes-helpers">
       <tr class="gameplay-preference ......
          <td>...</td>
         <td>
            <div class="slider_checkbox checked"><input type="checkbox" id="alertes_alerteAutre" name="alertes[alerteAutre]" value="1" checked="checked"></div>
         </td>

标签： vbaselenium

解决方案

一种解决方案是：

    For Each Aelement In browser.FindElementsById("compte-alertes").First.FindElementsByTag("div")
   ' "slider_checkbox" = Aelement
    If Aelement.Attribute("class") = "slider_checkbox checked" Then
       browser.FindElementByXPath("//*[@id='mes-helpers']/tr[1]/td[2]/div").Click
       Exit For
    End If
Next

推荐阅读