我正在尝试将Excel的VBA中的网页跨度值复制到excel工作表中。我尝试从输入框中复制与span相同的值,但无法复制/空值。此HTML复制
<td nowrap class="iddisplay"><span style="font-size: 14px" tabIndex="0">IAR/19326/8JM3Z</span>
<input type="hidden" name="transactionId" id="transactionId" value="IAR193268JM3Z"></td>
所以我想从span复制值IAR / 19326 / 8JM3Z或从transactionId值复制IAR193268JM3Z我使用的Excel VBA代码
Set str_val12 = IE.document.getElementById("transactionId")
clip.SetText str_val12.innerText
'clip.SetText str_val12.value
clip.PutInClipboard
test.Cells(i + 2, 6).Select
test.Cells(i + 2, 6).PasteSpecial "Unicode Text"
谢谢
我还没有测试过,但是类似:
Dim element as Variant
For Each element in IE.document.getElementsById("transactionId")
If element.value = "IAR193268JM3Z" Then
Set str_val12 = element.innerText
test.cells(i + 2, 6).Value = str_val12
End If
Next element
让我知道这是否引发错误以及在哪一行。我不确定.Value
是否是一种检查输入标签中嵌入的value="IAR193268JM3Z"
的方法,但让我们看看。