勤哲Excel服務(wù)器聯(lián)合VBA快速實現(xiàn)表格公式應(yīng)用轉(zhuǎn)換
如今,面對企業(yè)信息管理常見的定制成本高,使用不靈活,新增修改難等問題,企業(yè)家們迫切的希望能有一款類似與Excel表格的操作體驗,靈活適用性高,低成本、好查找的企業(yè)管理軟件,而一款名為“勤哲Excel服務(wù)器”的軟件走進(jìn)了人們視野,在統(tǒng)計數(shù)據(jù)、管理報表、分析走勢等方面起到巨大作用。
以勤哲EXCEL服務(wù)器結(jié)合VBA為例,二者可實現(xiàn)連續(xù)應(yīng)用指定的表間公式。以VBA可調(diào)用函數(shù)為例。ExecQuery(qryList)的功能:連續(xù)應(yīng)用若干條(一條或多條)指定的表間公式;參數(shù):qryList:表間公式名稱列表,各公式名之間用逗號分割。應(yīng)用場合:在模板上寫VBA程序,調(diào)用此函數(shù),可實現(xiàn)用戶控制(手動)表間公式的運(yùn)行。
實例應(yīng)用:某企業(yè)的物料查詢
功能描述:該企業(yè)在庫存管理中,對庫存商品的指定查詢條件,方便業(yè)務(wù)人員按條件查找物料。在勤哲EXCEL服務(wù)器軟件中建立一個“純查詢模板”通過運(yùn)用表間公式就可以把涉及到庫存信息做一個查詢結(jié)果表現(xiàn)出來,實現(xiàn)查詢物料信息的這樣一個功能。
建立“物料查詢表”。描述:該模板是“純查詢模板”

2.3 按模板定義的數(shù)據(jù)項寫出表間公式
如:主表:品牌、供應(yīng)商、品名、規(guī)格、
明細(xì):庫存數(shù)量
2.4?表間公式
運(yùn)用勤哲EXCEL服務(wù)器表間公式提出所查詢信息應(yīng)用手動執(zhí)行.
目的:按查找條件執(zhí)行。
(1)按品牌提取
提取<物料表_明細(xì)>中滿足下列條件的數(shù)據(jù):
<數(shù)據(jù)篩選:物料表_明細(xì).品牌>
按以下方式填入<物料查詢表_明細(xì)>:
物料表_明細(xì).品牌?--->(填入值)?品牌 (升序)
物料表_明細(xì).供應(yīng)商?--->(填入值)?供應(yīng)商 (升序)
物料表_明細(xì).品名?--->(填入值)?品名(升序)
物料表_明細(xì).規(guī)格?--->(填入值)?規(guī)格 (升序)
物料表_明細(xì).庫存數(shù)量?--->(填入值)?庫存數(shù)量 (升序)
(2) 按供應(yīng)商
提取<物料表_明細(xì)>中滿足下列條件的數(shù)據(jù):
<數(shù)據(jù)篩選:物料表_明細(xì).供應(yīng)商>
按以下方式填入<物料查詢表_明細(xì)>:
物料表_明細(xì).品牌?--->(填入值)?品牌 (升序)
物料表_明細(xì).供應(yīng)商?--->(填入值)?供應(yīng)商 (升序)
物料表_明細(xì).品名?--->(填入值)?品名 (升序)
物料表_明細(xì).規(guī)格?--->(填入值)?規(guī)格 (升序)
物料表_明細(xì).庫存數(shù)量?--->(填入值)?庫存數(shù)量 (升序)
(3) 品名查詢
提取<物料表_明細(xì)>中滿足下列條件的數(shù)據(jù):
<數(shù)據(jù)篩選:物料表_明細(xì).品名>
按以下方式填入<物料查詢表_明細(xì)>:
物料表_明細(xì).品牌?--->(填入值)?品牌 (升序)
物料表_明細(xì).供應(yīng)商?--->(填入值)?供應(yīng)商(升序)
物料表_明細(xì).品名?--->(填入值)?品名 (升序)
物料表_明細(xì).規(guī)格?--->(填入值)?規(guī)格 (升序)
物料表_明細(xì).庫存數(shù)量?--->(填入值)?庫存數(shù)量 (升序)
(4) 規(guī) 格
提取<物料表_明細(xì)>中滿足下列條件的數(shù)據(jù):
<數(shù)據(jù)篩選:物料表_明細(xì).規(guī)格>
按以下方式填入<物料查詢表_明細(xì)>:
物料表_明細(xì).品牌?--->(填入值)?品牌(升序)
物料表_明細(xì).供應(yīng)商?--->(填入值)?供應(yīng)商 (升序)
物料表_明細(xì).品名?--->(填入值)?品名 (升序)
物料表_明細(xì).規(guī)格?--->(填入值)?規(guī)格(升序)
物料表_明細(xì).庫存數(shù)量?--->(填入值)?庫存數(shù)量 (升序)
(5) 庫 存
提取<物料表_明細(xì)>中滿足下列條件的數(shù)據(jù):
<數(shù)據(jù)篩選:物料表_明細(xì).庫存數(shù)量 <>0>
按以下方式填入<物料查詢表_明細(xì)>:
物料表_明細(xì).品牌?--->(填入值)?品牌
物料表_明細(xì).供應(yīng)商?--->(填入值)?供應(yīng)商
物料表_明細(xì).品名?--->(填入值)?品名
物料表_明細(xì).規(guī)格?--->(填入值)?規(guī)格
物料表_明細(xì).庫存數(shù)量?--->(填入值)?庫存數(shù)量
2.5???在模板中運(yùn)用EXCEL VBA功能加入“命令按鈕”
打開EXCEL“工具”-Viusal basic
添加“命令按鈕”如圖

2.6 寫入VBA代碼 具體格式可以參考EXCEL服務(wù)器幫助
通過雙擊增加的“品牌查詢”命令按鈕寫入代碼
(1)
Private Sub CommandButton1_Click()
Dim oAdd As Object
Dim ans As Boolean
′獲取Excel服務(wù)器編程接口
oAdd = Application.COMAddIns.Item("ESClient.Connect").Object
ans = oAdd.execQuery("品牌查詢") 這里輸入表間公式名稱
oAdd = Nothing
End Sub
(2) 同樣的方法寫入第二段代碼
Private SubCommandButton2_Click()???命令按鈕為“供應(yīng)商查詢”
Dim oAdd As Object
Dim ans As Boolean
′獲取Excel服務(wù)器編程接口
oAdd = Application.COMAddIns.Item("ESClient.Connect").Object
ans = oAdd.execQuery("供應(yīng)商查詢")?同樣寫入表間公式
oAdd = Nothing
End Sub
………………………….
依次寫入“品名、規(guī)格、庫存數(shù)量”的代碼
應(yīng)用效果:
品牌查詢

供應(yīng)商查詢

品名查詢

規(guī)格查詢

查全部庫存

小結(jié):
勤哲Excel是一款前端的信息化電子表格控件,可以滿足各類組件的開發(fā)、數(shù)據(jù)填報、在線文檔、圖表公式聯(lián)動等業(yè)務(wù)場景,為用戶帶來親切的 Excel 體驗。另外,在數(shù)據(jù)可視化、Excel 導(dǎo)入導(dǎo)出、公式引用、數(shù)據(jù)綁定、框架集成等場景下無需大量代碼開發(fā)和測試,勤哲Excel極大降低了企業(yè)研發(fā)成本和項目交付風(fēng)險。