如何使用VBS呼叫VBA函式

■前言

修改同事大神寫的非常好的自動evidence做成工具，

新增一些功能

・case中的的一些內容，自動截圖，並儲存到evidence中 ：呼叫vba函式 getcaseinfoaspicture

■vba的**

'把置於底層

sub picturetoback()
selection.shaperange.zorder msosendtoback
end sub
'先當於從case檔案中截圖，儲存到 ecidence 中
sub getcaseinfoaspicture(byval casenum as integer)
dim copybeginindex
copybeginindex = 3 + casenum * 22
windows("case.xlsx").activate
'當於從case檔案中截圖的區域
dim count '不能寫成 dim count as integer，否則報錯
'...
count = 1 '不能寫成 set count = 1, 否則報錯
'執行函式 （含引數傳遞）
'...
'執行函式
'...
count = count +1
'...
oworkbooks.close
set oworkbooks = nothing
 
SAP 使用VBA呼叫SAP RFC
使用vba呼叫sap rfc和jco 常用的方法基本一致。大致分為兩步 登入和執行 1 設定登入資訊 set r3 createobject sap.functions r3.connection.system dev r3.connection.client 160 r3.connection.s...
Excel VBA 在VBA中呼叫函式
excel的表函式也可以直接在vba中直接呼叫執行，具體呼叫格式如下 呼叫方法2 變數物件 vba.表函式 表函式引數 例項 range d8 vba.ucase range a1 a10 value 1 並非所有表函式都可以在vba中予以呼叫，比如trunc，numberstring。表函式if ...
vba中dir用法 vba中dir函式使用心得
dir pathname attributes 構建測試環境如下 一 測試在dir函式中使用萬用字元來查詢多個檔案，在vbe中輸入 如下 sub listfiles dim strpath as string,strtmp as string strpath c test strtmp dir st...