quickfixer

¦^´_ 3# ssooi



    Set itemlist = IE.document.getElementsByClassName("quantumWizMenuPaperselectOption")

For Each Item In itemlist
                If Item.getAttribute("data-value") Like "PM" Then  '¤U¤È
                    Item.classList.Add ("isSelected")
                    Item.setAttribute "aria-selected", "true"
                    Item.setAttribute "tabindex", "0"
                Else
                    Item.classList.Remove ("isSelected")
                    Item.setAttribute "aria-selected", "false"
                    Item.setAttribute "tabindex", "-1"
                End If
Next