信息技術如今已經(jīng)成為一項非常實用的現(xiàn)代化教育技術,在知識經(jīng)濟時代,國家對人才的要求也越來越高,不僅僅需要高學歷高能力的管理型人才,同時科技人才專業(yè)技術型人才也是國家發(fā)展的主要生產(chǎn)力。
當信息化技術結合數(shù)學函數(shù)會怎樣?我們不妨以知名信息化軟件勤哲EXCEL服務器為例,結合VBA函數(shù),看它如何實現(xiàn)連續(xù)應用指定的表間公式:
一.VBA可調(diào)用函數(shù)
ExecQuery(qryList)
功能:連續(xù)應用若干條(一條或多條)指定的表間公式
參數(shù):qryList:表間公式名稱列表,各公式名之間用逗號分割。
應用場合:在模板上寫VBA程序,調(diào)用此函數(shù),可實現(xiàn)用戶控制(手動)表間公式的運行。
二.實例應用
某企業(yè)的物料查詢
2.1功能描述
該企業(yè)在庫存管理中,對庫存商品的指定查詢條件,方便業(yè)務人員按條件查找物料。在勤哲EXCEL服務器軟件中建立一個“純查詢模板”通過運用表間公式就可以把涉及到庫存信息做一個查詢結果表現(xiàn)出來,實現(xiàn)查詢物料信息的這樣一個功能。
2.2 建立“物料查詢表”
勤哲EXCEL服務器軟件的描述:該模板是“純查詢模板”。
2.3
2.3 按模板定義的數(shù)據(jù)項寫出表間公式
如:主表:品牌、供應商、品名、規(guī)格、
明細:庫存數(shù)量
2.4 表間公式
運用勤哲EXCEL服務器表間公式提出所查詢信息應用手動執(zhí)行.
目的:按查找條件執(zhí)行。
(1)按品牌提取
提取<物料表_明細>中滿足下列條件的數(shù)據(jù):
<數(shù)據(jù)篩選:物料表_明細.品牌>
按以下方式填入<物料查詢表_明細>:
物料表_明細.品牌 --->(填入值) 品牌 (升序)
物料表_明細.供應商 --->(填入值) 供應商 (升序)
物料表_明細.品名 --->(填入值) 品名(升序)
物料表_明細.規(guī)格 --->(填入值) 規(guī)格 (升序)
物料表_明細.庫存數(shù)量 --->(填入值) 庫存數(shù)量 (升序)
(2) 按供應商
提取<物料表_明細>中滿足下列條件的數(shù)據(jù):
<數(shù)據(jù)篩選:物料表_明細.供應商>
按以下方式填入<物料查詢表_明細>:
物料表_明細.品牌 --->(填入值) 品牌 (升序)
物料表_明細.供應商 --->(填入值) 供應商 (升序)
物料表_明細.品名 --->(填入值) 品名 (升序)
物料表_明細.規(guī)格 --->(填入值) 規(guī)格 (升序)
物料表_明細.庫存數(shù)量 --->(填入值) 庫存數(shù)量 (升序)
(3) 品名查詢
提取<物料表_明細>中滿足下列條件的數(shù)據(jù):
<數(shù)據(jù)篩選:物料表_明細.品名>
按以下方式填入<物料查詢表_明細>:
物料表_明細.品牌 --->(填入值) 品牌 (升序)
物料表_明細.供應商 --->(填入值) 供應商(升序)
物料表_明細.品名 --->(填入值) 品名 (升序)
物料表_明細.規(guī)格 --->(填入值) 規(guī)格 (升序)
物料表_明細.庫存數(shù)量 --->(填入值) 庫存數(shù)量 (升序)
(4) 規(guī) 格
提取<物料表_明細>中滿足下列條件的數(shù)據(jù):
<數(shù)據(jù)篩選:物料表_明細.規(guī)格>
按以下方式填入<物料查詢表_明細>:
物料表_明細.品牌 --->(填入值) 品牌(升序)
物料表_明細.供應商 --->(填入值) 供應商 (升序)
物料表_明細.品名 --->(填入值) 品名 (升序)
物料表_明細.規(guī)格 --->(填入值) 規(guī)格(升序)
物料表_明細.庫存數(shù)量 --->(填入值) 庫存數(shù)量 (升序)
(5) 庫 存
提取<物料表_明細>中滿足下列條件的數(shù)據(jù):
<數(shù)據(jù)篩選:物料表_明細.庫存數(shù)量 <>0>
按以下方式填入<物料查詢表_明細>:
物料表_明細.品牌 --->(填入值) 品牌
物料表_明細.供應商 --->(填入值) 供應商
物料表_明細.品名 --->(填入值) 品名
物料表_明細.規(guī)格 --->(填入值) 規(guī)格
物料表_明細.庫存數(shù)量 --->(填入值) 庫存數(shù)量
2.5 在模板中運用EXCEL VBA功能加入“命令按鈕”
打開勤哲EXCEL“工具”中的-Viusal basic
添加“命令按鈕”如圖:
2.6 寫入VBA代碼 具體格式可以參考EXCEL服務器幫助
通過雙擊增加的“品牌查詢”命令按鈕寫入代碼
(1)
Private Sub CommandButton1_Click()
Dim oAdd As Object
Dim ans As Boolean
′獲取Excel服務器編程接口
oAdd = Application.COMAddIns.Item("ESClient.Connect").Object
ans = oAdd.execQuery("品牌查詢") 這里輸入表間公式名稱
oAdd = Nothing
End Sub
(2) 同樣的方法寫入第二段代碼
Private SubCommandButton2_Click() 命令按鈕為“供應商查詢”
Dim oAdd As Object
Dim ans As Boolean
′獲取Excel服務器編程接口
oAdd = Application.COMAddIns.Item("ESClient.Connect").Object
ans = oAdd.execQuery("供應商查詢") 同樣寫入表間公式
oAdd = Nothing
End Sub
………………………….
依次寫入“品名、規(guī)格、庫存數(shù)量”的代碼
應用效果:
品牌查詢
供應商查詢
品名查詢
規(guī)格查詢
查全部庫存
小結:
不難看出,勤哲EXCEL服務器軟件與VBA函數(shù)的結合,可以使得表間的計算更為精準,數(shù)據(jù)統(tǒng)計更方便、迅速。未來,勤哲EXCEL服務器將一如既往的基于對各類函數(shù)的技術積累、深刻理解和長期實踐,致力于現(xiàn)代信息化技術的深耕細作,更好助力企業(yè)實現(xiàn)數(shù)字化轉(zhuǎn)型。
免責聲明:市場有風險,選擇需謹慎!此文僅供參考,不作買賣依據(jù)。