ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

for each ¥Îªk

Set itemlist = IE.document.getElementsByClassName("quantumWizMenuPaperselectOption")
For Each Item In itemlist
     N=N+1
    IF N>1 THEN
    If Item.getAttribute("data-value") Like "PM" Then
        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
   END IF
Next

TOP

        ÀR«ä¦Û¦b : «Ý¤H°h¤@¨B¡A·R¤H¼e¤@¤o¡A´N·|¬¡±o«Ü§Ö¼Ö¡C
ªð¦^¦Cªí ¤W¤@¥DÃD