AutomationAnywhere VBScript

Question

你好，我正在试图上传VBScript，以筛选出仅已更改的数据。当我使用脚本作为宏时，它可以工作，但是当我通过AAE启动它时，它会抛出一个

脚本1024预期语句中的错误。

在这里输入图像描述

Sub filtering()
    Range("H3").AutoFilter Field:=8, Criteria1:="<>"
    Range("Q3").AutoFilter Field:=17, Criteria1:="<>"
    Range("P3").AutoFilter Field:=16, Criteria1:=">=" & Range("A1").Value
    Operator:=xlAND Criteria2:="<=" & Range("A2").Value   
End Sub

Answer 1

解决这个问题的方法有两种：

First:

让我们在<script>标记中包含子例程

<script type="text/vbscript">

Sub filtering()
    Range("H3").AutoFilter Field:=8, Criteria1:="<>"
    Range("Q3").AutoFilter Field:=17, Criteria1:="<>"
    Range("P3").AutoFilter Field:=16, Criteria1:=">=" & Range("A1").Value
    Operator:=xlAND Criteria2:="<=" & Range("A2").Value   
End Sub

</script> 

或者完全忽略子程序，并在AAE中的.vbs文件中包含以下代码片段

Range("H3").AutoFilter Field:=8, Criteria1:="<>"
Range("Q3").AutoFilter Field:=17, Criteria1:="<>"
Range("P3").AutoFilter Field:=16, Criteria1:=">=" & Range("A1").Value
Operator:=xlAND Criteria2:="<=" & Range("A2").Value   

第二版：

您可以添加脚本作为一个附加按钮，以丝带的形式，在AAE中，您可以指示按钮点击按钮，使用Object Cloning从命令库。

例如:从Excel丝带看按钮的外观

​

​

后端的代码模块

​

​