如何在VBA中执行Javascript函数

时间:2016-04-27 20:28:08

标签: javascript excel vba excel-vba

我正在使用电子表格中的值填写网络表单。表单填写正常,但有一些JavaScript字段验证发生,因为我的代码填写文本框字段而没有验证,它看到我的字段为空。这是我的VBA代码片段。

Set objCollection = wd.document.getElementsByTagName("input")    
i = 0
While i < objCollection.Length
    'Name
    If objCollection(i).Name = "Y__0__Cctl1_ctl8_ctl2_6_ctl4__X" Then
        objCollection(i).Value = Sheets("Main").Range("b4") ' "Hello World"
    End If

我已经缩小了onkeypress Javascript函数,但我不确定如何使用适当的变量在VBA中正确调用它。这是另一个片段。

<input name="Y__0__Cctl1_ctl8_ctl2_6_ctl4__X" title="" class="DefaultTextBox DefaultTextBoxMandatory" id="Y__0__Cctl1_ctl8_ctl2_6_ctl4__X" onkeypress="return aeweb_BlurAndCallAssoc( this, 'Y__0__Cctl1_ctl8_ctl2_6_ctl4__X', event);" onblur="aechg(this, event);" type="text" value="Hello World" cursor="01Q0Q0Q1" lastvalue="Hello World" ismandatory="true">

非常感谢任何帮助。

谢谢!

0 个答案:

没有答案