您的位置:首頁(yè) >綜合 > 滾動(dòng) >

          VBA中運(yùn)用勤哲Excel服務(wù)器表間公式實(shí)現(xiàn)管理系統(tǒng)

          信息技術(shù)如今已經(jīng)成為一項(xiàng)非常實(shí)用的現(xiàn)代化教育技術(shù),在知識(shí)經(jīng)濟(jì)時(shí)代,國(guó)家對(duì)人才的要求也越來(lái)越高,不僅僅需要高學(xué)歷高能力的管理型人才,同時(shí)科技人才專業(yè)技術(shù)型人才也是國(guó)家發(fā)展的主要生產(chǎn)力。

          當(dāng)信息化技術(shù)結(jié)合數(shù)學(xué)函數(shù)會(huì)怎樣?我們不妨以知名信息化軟件勤哲EXCEL服務(wù)器為例,結(jié)合VBA函數(shù),看它如何實(shí)現(xiàn)連續(xù)應(yīng)用指定的表間公式:

          一.VBA可調(diào)用函數(shù)

          ExecQuery(qryList)

          功能:連續(xù)應(yīng)用若干條(一條或多條)指定的表間公式

          參數(shù):qryList:表間公式名稱列表,各公式名之間用逗號(hào)分割。

          應(yīng)用場(chǎng)合:在模板上寫VBA程序,調(diào)用此函數(shù),可實(shí)現(xiàn)用戶控制(手動(dòng))表間公式的運(yùn)行。

          二.實(shí)例應(yīng)用

          某企業(yè)的物料查詢

          2.1功能描述

          該企業(yè)在庫(kù)存管理中,對(duì)庫(kù)存商品的指定查詢條件,方便業(yè)務(wù)人員按條件查找物料。在勤哲EXCEL服務(wù)器軟件中建立一個(gè)“純查詢模板”通過(guò)運(yùn)用表間公式就可以把涉及到庫(kù)存信息做一個(gè)查詢結(jié)果表現(xiàn)出來(lái),實(shí)現(xiàn)查詢物料信息的這樣一個(gè)功能。

          2.2 建立“物料查詢表”

          勤哲EXCEL服務(wù)器軟件的描述:該模板是“純查詢模板”。

          2.3

          2.3 按模板定義的數(shù)據(jù)項(xiàng)寫出表間公式

          如:主表:品牌、供應(yīng)商、品名、規(guī)格、

          明細(xì):庫(kù)存數(shù)量

          2.4 表間公式

          運(yùn)用勤哲EXCEL服務(wù)器表間公式提出所查詢信息應(yīng)用手動(dòng)執(zhí)行.

          目的:按查找條件執(zhí)行。

          (1)按品牌提取

          提取<物料表_明細(xì)>中滿足下列條件的數(shù)據(jù):

          <數(shù)據(jù)篩選:物料表_明細(xì).品牌>

          按以下方式填入<物料查詢表_明細(xì)>:

          物料表_明細(xì).品牌 --->(填入值) 品牌 (升序)

          物料表_明細(xì).供應(yīng)商 --->(填入值) 供應(yīng)商 (升序)

          物料表_明細(xì).品名 --->(填入值) 品名(升序)

          物料表_明細(xì).規(guī)格 --->(填入值) 規(guī)格 (升序)

          物料表_明細(xì).庫(kù)存數(shù)量 --->(填入值) 庫(kù)存數(shù)量 (升序)

          (2) 按供應(yīng)商

          提取<物料表_明細(xì)>中滿足下列條件的數(shù)據(jù):

          <數(shù)據(jù)篩選:物料表_明細(xì).供應(yīng)商>

          按以下方式填入<物料查詢表_明細(xì)>:

          物料表_明細(xì).品牌 --->(填入值) 品牌 (升序)

          物料表_明細(xì).供應(yīng)商 --->(填入值) 供應(yīng)商 (升序)

          物料表_明細(xì).品名 --->(填入值) 品名 (升序)

          物料表_明細(xì).規(guī)格 --->(填入值) 規(guī)格 (升序)

          物料表_明細(xì).庫(kù)存數(shù)量 --->(填入值) 庫(kù)存數(shù)量 (升序)

          (3) 品名查詢

          提取<物料表_明細(xì)>中滿足下列條件的數(shù)據(jù):

          <數(shù)據(jù)篩選:物料表_明細(xì).品名>

          按以下方式填入<物料查詢表_明細(xì)>:

          物料表_明細(xì).品牌 --->(填入值) 品牌 (升序)

          物料表_明細(xì).供應(yīng)商 --->(填入值) 供應(yīng)商(升序)

          物料表_明細(xì).品名 --->(填入值) 品名 (升序)

          物料表_明細(xì).規(guī)格 --->(填入值) 規(guī)格 (升序)

          物料表_明細(xì).庫(kù)存數(shù)量 --->(填入值) 庫(kù)存數(shù)量 (升序)

          (4) 規(guī) 格

          提取<物料表_明細(xì)>中滿足下列條件的數(shù)據(jù):

          <數(shù)據(jù)篩選:物料表_明細(xì).規(guī)格>

          按以下方式填入<物料查詢表_明細(xì)>:

          物料表_明細(xì).品牌 --->(填入值) 品牌(升序)

          物料表_明細(xì).供應(yīng)商 --->(填入值) 供應(yīng)商 (升序)

          物料表_明細(xì).品名 --->(填入值) 品名 (升序)

          物料表_明細(xì).規(guī)格 --->(填入值) 規(guī)格(升序)

          物料表_明細(xì).庫(kù)存數(shù)量 --->(填入值) 庫(kù)存數(shù)量 (升序)

          (5) 庫(kù) 存

          提取<物料表_明細(xì)>中滿足下列條件的數(shù)據(jù):

          <數(shù)據(jù)篩選:物料表_明細(xì).庫(kù)存數(shù)量 <>0>

          按以下方式填入<物料查詢表_明細(xì)>:

          物料表_明細(xì).品牌 --->(填入值) 品牌

          物料表_明細(xì).供應(yīng)商 --->(填入值) 供應(yīng)商

          物料表_明細(xì).品名 --->(填入值) 品名

          物料表_明細(xì).規(guī)格 --->(填入值) 規(guī)格

          物料表_明細(xì).庫(kù)存數(shù)量 --->(填入值) 庫(kù)存數(shù)量

          2.5 在模板中運(yùn)用EXCEL VBA功能加入“命令按鈕”

          打開(kāi)勤哲EXCEL“工具”中的-Viusal basic

          添加“命令按鈕”如圖:

          2.6 寫入VBA代碼 具體格式可以參考EXCEL服務(wù)器幫助

          通過(guò)雙擊增加的“品牌查詢”命令按鈕寫入代碼

          (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ī)格、庫(kù)存數(shù)量”的代碼

          應(yīng)用效果:

          品牌查詢

          供應(yīng)商查詢

          品名查詢

          規(guī)格查詢

          查全部庫(kù)存

          小結(jié):

          不難看出,勤哲EXCEL服務(wù)器軟件與VBA函數(shù)的結(jié)合,可以使得表間的計(jì)算更為精準(zhǔn),數(shù)據(jù)統(tǒng)計(jì)更方便、迅速。未來(lái),勤哲EXCEL服務(wù)器將一如既往的基于對(duì)各類函數(shù)的技術(shù)積累、深刻理解和長(zhǎng)期實(shí)踐,致力于現(xiàn)代信息化技術(shù)的深耕細(xì)作,更好助力企業(yè)實(shí)現(xiàn)數(shù)字化轉(zhuǎn)型。

          免責(zé)聲明:市場(chǎng)有風(fēng)險(xiǎn),選擇需謹(jǐn)慎!此文僅供參考,不作買賣依據(jù)。

          關(guān)鍵詞:
          最新動(dòng)態(tài)
          相關(guān)文章
          VBA中運(yùn)用勤哲Excel服務(wù)器表間公式實(shí)現(xiàn)...
          國(guó)潮華流下 十八數(shù)藏再現(xiàn)中華文明獨(dú)特神韻
          兒童安全座椅高端智能化趨勢(shì)顯著,qborn...
          成都市錦江區(qū):讓黨旗在民族地區(qū)鄉(xiāng)村振...
          記錄鏡頭下的青春,這是一份熱愛(ài)和創(chuàng)意...
          國(guó)內(nèi)減肥市場(chǎng)規(guī)模超百億 仁會(huì)生物等...
          主站蜘蛛池模板: 国产你懂的视频| 天天综合网久久| 亚洲国产高清美女在线观看| 美妇又紧又嫩又多水好爽| 国产精品正在播放| 一级毛片完整版免费播放一区| 最近中文字幕高清中文字幕电影二| 俺来也俺去啦久久综合网| 久久66久这里精品99| 欧美精品一区二区久久| 啊轻点灬大巴太粗太长了视频| 五月婷婷在线免费观看| 天天干天天射天天操| 久久久久久夜精品精品免费啦 | 国产精品亚洲欧美大片在线看| 一本大道香蕉久在线不卡视频| 日本边添边摸边做边爱的网站 | 色欲香天天天综合网站| 国产精品亚洲天堂| 99热这里只有精品免费播放| 成年人在线免费播放| 久久精品无码专区免费东京热| 欧美精品亚洲精品日韩| 免费在线观看一级毛片| 草莓视频在线免费观看下载| 国产精品igao视频网| 99rv精品视频在线播放| 少妇人妻精品一区二区| 久久久无码精品亚洲日韩蜜臀浪潮| 欧美三级日韩三级| 亚洲精品成人区在线观看| 精品国偷自产在线视频| 国产亚洲婷婷香蕉久久精品| 日本a∨在线观看| 国产裸拍裸体视频在线观看| poren日本| 性欧美vr高清极品| 久久99国产综合色| 日韩午夜激情视频| 亚洲av福利天堂一区二区三| 欧美特黄视频在线观看|