【摘要】利用Excel VBA開(kāi)發(fā)銷(xiāo)售管理系統(tǒng)簡(jiǎn)單實(shí)用，可使銷(xiāo)售管理自動(dòng)化，可快速有效地對(duì)資金、進(jìn)貨、銷(xiāo)售、庫(kù)存等業(yè)務(wù)進(jìn)行管理，合理控制“進(jìn)、銷(xiāo)、存”各個(gè)環(huán)節(jié)，提高資金的利用率和結(jié)算速度，實(shí)現(xiàn)管理的高效率、實(shí)時(shí)性、科學(xué)性、智能性，從而實(shí)現(xiàn)資源共享，提高企業(yè)管理水平、經(jīng)濟(jì)效益和競(jìng)爭(zhēng)能力。

　　【關(guān)鍵詞】Excel VBA；銷(xiāo)售；銷(xiāo)售管理系統(tǒng)

　　一、概述

　　銷(xiāo)售管理不僅是企業(yè)的關(guān)鍵而且是企業(yè)的生命線(xiàn)。銷(xiāo)售涉及的角色眾多繁雜，使用信息化管理工具對(duì)企業(yè)的銷(xiāo)售物流進(jìn)行全面管理是必須的，也是必然的。銷(xiāo)售管理系統(tǒng)能給企業(yè)決策者和管理者提供全方位的銷(xiāo)售流程和實(shí)時(shí)的信息查詢(xún)，并且可以統(tǒng)計(jì)出某段時(shí)間內(nèi)的產(chǎn)品銷(xiāo)售量，加強(qiáng)對(duì)企業(yè)銷(xiāo)售環(huán)節(jié)的全盤(pán)掌控，為企業(yè)提供一個(gè)全面的信息化平臺(tái)，提高工作效率，使決策者能夠完全清楚和控制銷(xiāo)售這一和企業(yè)經(jīng)濟(jì)直接相關(guān)聯(lián)的重要過(guò)程。筆者以某企業(yè)的銷(xiāo)售為模型，運(yùn)用Excel開(kāi)發(fā)了一套銷(xiāo)售管理系統(tǒng)。銷(xiāo)售作為整個(gè)企業(yè)管理系統(tǒng)的一部分，是企業(yè)內(nèi)部與外部市場(chǎng)的窗口。它收集必要的市場(chǎng)資料，向市場(chǎng)提供產(chǎn)品和服務(wù)。銷(xiāo)售從產(chǎn)成品入庫(kù)環(huán)節(jié)開(kāi)始，根據(jù)訂貨合同和庫(kù)存量發(fā)貨。顧客收到貨后，可能付款，也可能拒付，企業(yè)根據(jù)反饋的信息(應(yīng)收款、到賬款，拒付理由書(shū)等)進(jìn)行銷(xiāo)售分析，產(chǎn)生各種報(bào)表提供給有關(guān)部門(mén)，有關(guān)部門(mén)根據(jù)它來(lái)判斷企業(yè)經(jīng)營(yíng)成果是否令人滿(mǎn)意，并根據(jù)反饋的信息來(lái)重新調(diào)整企業(yè)在未來(lái)時(shí)期的經(jīng)營(yíng)計(jì)劃。銷(xiāo)售管理系統(tǒng)的應(yīng)用，將從根本上解決整個(gè)商品銷(xiāo)售業(yè)務(wù)流程效率低、處理能力差等手工操作過(guò)程中表現(xiàn)出的不足，方便銷(xiāo)售商對(duì)商品資料、客戶(hù)資料、銷(xiāo)售業(yè)績(jī)等進(jìn)行高效的管理。使用該系統(tǒng)， 管理層可以及時(shí)查詢(xún)、管理商品， 管理員工， 還可以對(duì)當(dāng)前銷(xiāo)售業(yè)績(jī)、銷(xiāo)售財(cái)務(wù)進(jìn)行一些統(tǒng)計(jì)，生成統(tǒng)計(jì)表格，以便全面掌握商品的銷(xiāo)售情況。

　　Excel為微軟Office組件之一，運(yùn)用廣泛，容易實(shí)現(xiàn)，且簡(jiǎn)單易操作，容易掌握。利用Excel VBA開(kāi)發(fā)簡(jiǎn)便實(shí)用的銷(xiāo)售管理系統(tǒng)，可以使企業(yè)在管理中節(jié)約成本，提高效率。

　　二、系統(tǒng)功能分析

　　(一)銷(xiāo)售管理系統(tǒng)功能結(jié)構(gòu)

　　基于開(kāi)發(fā)背景及目標(biāo)定位，將“銷(xiāo)售管理系統(tǒng)”劃分成基礎(chǔ)資料、銷(xiāo)售業(yè)務(wù)、采購(gòu)業(yè)務(wù)、業(yè)務(wù)分析和統(tǒng)計(jì)報(bào)表5大模塊。本系統(tǒng)支持動(dòng)態(tài)的業(yè)務(wù)需求，并可方便地集成已有的企業(yè)管理資源。

　　(二)業(yè)務(wù)流程圖

　　用戶(hù)在運(yùn)行本系統(tǒng)時(shí)，首先進(jìn)入一個(gè)“系統(tǒng)登陸”框，輸入用戶(hù)名和密碼，對(duì)其身份進(jìn)行驗(yàn)證后才能進(jìn)入到相應(yīng)的管理模塊。系統(tǒng)設(shè)置了用戶(hù)權(quán)限，這主要起三方面的作用:其一，防止非法用戶(hù)進(jìn)入本系統(tǒng)。其二，不同的用戶(hù)擁有不同的權(quán)限。其三，以某位合法用戶(hù)的身份進(jìn)入系統(tǒng)，其有關(guān)操作將被記錄下來(lái)。

　　1.對(duì)于一般用戶(hù)， 可以查閱客戶(hù)的相關(guān)資料， 從系統(tǒng)中查找原來(lái)錄入的資料(入庫(kù)) ， 并生成訂單(出庫(kù))。新進(jìn)一批材料時(shí)，應(yīng)將其分類(lèi)(產(chǎn)品類(lèi)目管理)后輸入相關(guān)信息(入庫(kù))；當(dāng)用戶(hù)購(gòu)買(mǎi)產(chǎn)品時(shí)， 又進(jìn)入到產(chǎn)品的銷(xiāo)售業(yè)務(wù)管理，進(jìn)行相關(guān)操作。一般用戶(hù)權(quán)限不可以進(jìn)行資料修改、刪除等操作，只能錄入相關(guān)信息。

　　2.對(duì)于管理員來(lái)說(shuō)，可以查看全部資料，如每天的銷(xiāo)售情況、采購(gòu)情況，以及銷(xiāo)售員信息等，并且可以通過(guò)報(bào)表進(jìn)行數(shù)據(jù)匯總分析，以便熟悉市場(chǎng)，幫助進(jìn)行下一步?jīng)Q策， 同時(shí)對(duì)公司工作人員的相關(guān)資料進(jìn)行管理(用戶(hù)信息管理)。

　　三、功能模塊設(shè)計(jì)

　　(一)基礎(chǔ)資料

　　基礎(chǔ)資料包括庫(kù)存資料、客戶(hù)資料、產(chǎn)品資料等。庫(kù)存資料完成庫(kù)存產(chǎn)品的建立、查詢(xún)、修改、刪除；客戶(hù)資料完成客戶(hù)的分類(lèi)查詢(xún)和添加、修改、刪除；產(chǎn)品資料完成產(chǎn)品的分類(lèi)查詢(xún)、添加、修改、刪除等。

　　(二)銷(xiāo)售業(yè)務(wù)

　　銷(xiāo)售業(yè)務(wù)包括產(chǎn)品銷(xiāo)售錄入、收款管理、銷(xiāo)售查詢(xún)和應(yīng)收賬款查詢(xún)等。銷(xiāo)售錄入完成產(chǎn)品基本信息的錄入，銷(xiāo)售退貨完成產(chǎn)品基本信息的修改和刪除，銷(xiāo)售查詢(xún)完成產(chǎn)品基本信息的查詢(xún)，收款管理完成產(chǎn)品銷(xiāo)售款項(xiàng)信息的查詢(xún)、修改、刪除等。

　　(三)采購(gòu)業(yè)務(wù)

　　采購(gòu)業(yè)務(wù)包括采購(gòu)錄入、采購(gòu)?fù)素?、付款錄入等。在采?gòu)錄入操作中，用填寫(xiě)入庫(kù)單的形式來(lái)完成采購(gòu)的入庫(kù)行為；在退貨操作中用填寫(xiě)退貨單的形式來(lái)完成材料的退貨；付款錄入完成付款管理。

　　(四)業(yè)務(wù)分析

　　包括銷(xiāo)售分析圖表和采購(gòu)分析圖表。銷(xiāo)售分析圖表通過(guò)數(shù)據(jù)透視圖和數(shù)據(jù)透視表來(lái)顯示銷(xiāo)售數(shù)據(jù)，提供分析和決策依據(jù)。

　　(五)統(tǒng)計(jì)報(bào)表

　　統(tǒng)計(jì)報(bào)表包括銷(xiāo)售明細(xì)表、采購(gòu)明細(xì)表、應(yīng)收賬款明細(xì)表、回款明細(xì)表和付款明細(xì)表。此模塊包括產(chǎn)品銷(xiāo)售的所有信息，庫(kù)存產(chǎn)品、材料的物流信息，其查詢(xún)、統(tǒng)計(jì)是全面的。

　　四、系統(tǒng)功能模塊實(shí)現(xiàn)

　　(一)Excel表格的設(shè)計(jì)

　　分析流程圖， 系統(tǒng)需要使用表格來(lái)存儲(chǔ)相關(guān)的信息。表格是Excel的基礎(chǔ)， 只有將表格框架搭建起來(lái)，才能完成子模塊的編輯、實(shí)施。為方便數(shù)據(jù)的維護(hù)及數(shù)據(jù)的有效擴(kuò)充，采用Excel創(chuàng)建工作表， 并使用Excel內(nèi)嵌的VBA編輯宏，對(duì)表格進(jìn)行處理，使操作簡(jiǎn)便、快捷。

　　(二)功能模塊實(shí)現(xiàn)

　　登陸模塊設(shè)計(jì)。

　　打開(kāi) Microsoft Office Excel2003 中文版，執(zhí)行“工具”→“宏”→“Visual Basic編輯器”，進(jìn)入VBA編輯窗口，執(zhí)行“插入”→“用戶(hù)窗體”，創(chuàng)建一個(gè)登陸窗體， 對(duì)窗體設(shè)計(jì)，并把所有按鈕代碼編輯到代碼窗口中，類(lèi)的成員變量大部分與表中的字段名相同。在創(chuàng)建類(lèi)模塊的同時(shí)，進(jìn)行程序的編寫(xiě)，如“注冊(cè)”命令的實(shí)現(xiàn):

　　Private Sub CommandRegidit_Click()

　　If vbCancel = MsgBox("你要進(jìn)行注冊(cè)嗎?", 1 + 32,"注冊(cè)")ThenExitSub

　　If ComboBox1 = "" Or TextBox1 = ""Then MsgBox

　　"請(qǐng)先正確填寫(xiě)你要注冊(cè)的用戶(hù)名及密碼 ! "

　　Exit Sub

　　0 xh = InputBox ("請(qǐng)重復(fù)一次密碼:")

　　If xh TextBox1.Text Then

　　If vbCancel MsgBox("二次密碼不一致,是否重新輸入!", 1 + 32,"錯(cuò)誤") Then GoTo0ElseExitSub

　　End If

　　If Trim(權(quán)限(ComboBox1, 2)) "" Then MsgBox "注冊(cè)失敗,該用戶(hù)已存在!"

　　Exit Sub

　　With Sheet1

　　u = .Range("c65536").End(xlUp).Row + 1

　　.Cells(u, 3) = ComboBox1.Text

　　.Cells(u, 4) = "一般用戶(hù)"

　　.Cells(u, 5) = TextBox1.Text

　　End With

　　MsgBox ComboBox1.Text & Chr(13) & "一般用戶(hù)" &Chr(13)& "注冊(cè)成功,請(qǐng)記住密碼!"

　　End Sub

　　(三)自定義菜單模塊

　　為使操作方便快捷，并使系統(tǒng)外觀(guān)簡(jiǎn)潔美觀(guān)，對(duì)系統(tǒng)加入了自定義菜單。插入模塊，加入自定義菜單代碼，并隱藏系統(tǒng)菜單，如：隱藏Excel系統(tǒng)菜單\工具欄等。

　　Sub YinCangXiTongCaiDan( )

　　ActiveWindow.DisplayWorkbookTabs = False ' 屏蔽工作表標(biāo)簽

　　ActiveWorkbook.Protect , , True ' 移除工作表左上角圖標(biāo)和右上角最小化/最大化/關(guān)閉按鈕

　　With Application

　　.CommandBars.DisableAskAQuestionDropdown = True ' 去除幫助

　　.CommandBars("Standard").Visible = False ' 屏蔽常用工具欄

　　.CommandBars("Formatting").Visible = False ' 屏蔽格式工具欄

　　.CommandBars("Stop Recording").Visible = False' 屏蔽常用工具欄

　　.CommandBars("ply").Enabled = False ' 屏蔽工作表標(biāo)簽右鍵

　　.CommandBars("cell").Enabled = False' 屏蔽工作表右鍵

　　.DisplayFormulaBar = False' 屏蔽編輯欄

　　.Caption = "銷(xiāo)售管理系統(tǒng)" ' Excel標(biāo)題

　　End With

　　End Sub

　　五、結(jié)束語(yǔ)

　　銷(xiāo)售管理系統(tǒng)的開(kāi)發(fā)主要包括工作表、工作簿的建立與維護(hù)，以及應(yīng)用程序的設(shè)計(jì)開(kāi)發(fā)兩方面。對(duì)于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)的工作簿，而對(duì)于后者則要求應(yīng)用程序具有功能完備、易使用等特點(diǎn)。

　　【參考文獻(xiàn)】

　　[1] 韓小良. Excel企業(yè)管理應(yīng)用案例精萃[M].北京:電子工業(yè)出版社，2007:59-64.

　　[2] 神龍工作室. Excel高效辦公—VBA范例應(yīng)用[M].北京:人民郵電出版社，2006:90-96.

　　[3] 李洋. Excel函數(shù)、圖表與數(shù)據(jù)分析應(yīng)用實(shí)例[M].北京:清華大學(xué)出版社，2007:150-155.