Excel會(huì)計(jì)與財(cái)務(wù)管理-理論的方案暨模型第11章Excel財(cái)務(wù)管理系統(tǒng)的建立教學(xué)課件_第1頁(yè)
Excel會(huì)計(jì)與財(cái)務(wù)管理-理論的方案暨模型第11章Excel財(cái)務(wù)管理系統(tǒng)的建立教學(xué)課件_第2頁(yè)
Excel會(huì)計(jì)與財(cái)務(wù)管理-理論的方案暨模型第11章Excel財(cái)務(wù)管理系統(tǒng)的建立教學(xué)課件_第3頁(yè)
Excel會(huì)計(jì)與財(cái)務(wù)管理-理論的方案暨模型第11章Excel財(cái)務(wù)管理系統(tǒng)的建立教學(xué)課件_第4頁(yè)
Excel會(huì)計(jì)與財(cái)務(wù)管理-理論的方案暨模型第11章Excel財(cái)務(wù)管理系統(tǒng)的建立教學(xué)課件_第5頁(yè)
已閱讀5頁(yè),還剩56頁(yè)未讀 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說(shuō)明:本文檔由用戶(hù)提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

1、第11章 Excel財(cái)務(wù)管理系統(tǒng)的建立本章主要內(nèi)容: 11.1 宏和VBA 11.2 財(cái)務(wù)管理模型用戶(hù)界面的設(shè)計(jì) 11.3 財(cái)務(wù)管理系統(tǒng)菜單的設(shè)計(jì) 11.4 控制應(yīng)用系統(tǒng)自動(dòng)啟動(dòng)的方法 第1頁(yè),共61頁(yè)。本章目標(biāo):第2頁(yè),共61頁(yè)。VBAVBA是基于Visual Basic for Windows發(fā)展而來(lái)的新一代標(biāo)準(zhǔn)宏語(yǔ)言,提供了面向?qū)ο蟮某绦蛟O(shè)計(jì)方法和相當(dāng)完整的程序設(shè)計(jì)語(yǔ)言。對(duì)于在工作中需要經(jīng)常使用Office套裝軟件的用戶(hù),學(xué)習(xí)VBA有助于使工作自動(dòng)化,提高工作效率。另外,由于VBA可直接應(yīng)用Office套裝軟件的各項(xiàng)強(qiáng)大功能,所以對(duì)于程序設(shè)計(jì)人員的程序設(shè)計(jì)和開(kāi)發(fā)也更加方便快捷。11.1

2、宏和VBA第3頁(yè),共61頁(yè)。宏宏程序是指用VBA提供的各種函數(shù)、語(yǔ)句、對(duì)象、方法和屬性等編寫(xiě)的程序。宏程序可以被多次重復(fù)使用,自動(dòng)執(zhí)行復(fù)雜的任務(wù),減少完成任務(wù)所需的步驟。11.1 宏和VBA第4頁(yè),共61頁(yè)。宏的創(chuàng)建和運(yùn)行 使用宏錄制創(chuàng)建新宏 使用Visual Basic 編輯器創(chuàng)建新宏11.1 宏和VBA第5頁(yè),共61頁(yè)。11.1.2 使用宏錄制器錄制宏 宏錄制器是Excel提供的一種軟件工具,它能夠?qū)⒂脩?hù)的操作過(guò)程記錄下來(lái),并自動(dòng)將所記錄的操作轉(zhuǎn)換成VBA程序代碼。對(duì)于經(jīng)常重復(fù)進(jìn)行的操作過(guò)程,可以通過(guò)宏錄制器將它記錄下來(lái),當(dāng)需要再次進(jìn)行這些操作時(shí),只需運(yùn)行錄制的宏,Excel就能自動(dòng)完成這

3、些重復(fù)的操作。需要注意的是,當(dāng)錄制宏的工作開(kāi)始后,所有的操作步驟都將被記錄在宏中,所以應(yīng)盡量減少不必要的或錯(cuò)誤的操作,如果在錄制宏時(shí)出現(xiàn)失誤,更正失誤的操作也會(huì)記錄在宏中。 第6頁(yè),共61頁(yè)。11.1.2 使用宏錄制器錄制宏_記錄宏程序的方法和步驟選擇【工具】菜單上的【宏】命令,然后從子菜單中選擇【錄制新宏】命令。在“宏名”框中輸入宏程序的名稱(chēng)。在“保存在”框中,指定存放宏的位置。在“說(shuō)明”框中,輸入要錄制宏的有關(guān)說(shuō)明信息。選擇【確定】按鈕,此時(shí)【停止錄制】按鈕出現(xiàn)在屏幕上。用戶(hù)可以進(jìn)行各種操作,如選定單元格、輸入標(biāo)題、設(shè)置表格等。單擊【停止錄制】按鈕或者選擇【工具】菜單上【宏】命令下的【停止

4、錄制】命令,結(jié)束宏錄制。第7頁(yè),共61頁(yè)。11.1.2 使用宏錄制器錄制宏_記錄宏實(shí)例【例11-1】打開(kāi)工作簿cwgl11,用錄制宏的方式記錄以下工作:插入一張工作表,在新插入的工作表上制作一張簡(jiǎn)單的分部銷(xiāo)售情況表,表結(jié)構(gòu)如圖11-4所示。錄制一個(gè)能夠建立這種表結(jié)構(gòu)的宏Sales。圖11-4:銷(xiāo)售情況表第8頁(yè),共61頁(yè)。11.1.2 使用宏錄制器錄制宏_錄制宏的過(guò)程:(1)選擇【工具】菜單上【宏】命令下的【錄制新宏】命令;(2)在“宏名”框中輸入宏程序的名稱(chēng)“Sales”;(3)在“保存在”框中指定存放宏的位置“當(dāng)前工作簿”;(4)在“說(shuō)明”框中,輸入要錄制宏的有關(guān)說(shuō)明信息;(5)選擇【確定】

5、按鈕,此時(shí)【停止錄制】按鈕出現(xiàn)在屏幕上;(6)選擇【插入】菜單上的【工作表】命令;(7)選擇A1單元格,輸入“銷(xiāo)售情況表”;(8)依次在其他單元格輸入文字,并調(diào)整字體字號(hào);(9)選擇范圍A1:AF,合并單元格;(10)選擇標(biāo)題,居中顯示,單擊【字體】工具,選擇14號(hào),加粗字體;(11)單擊【停止錄制】按鈕,結(jié)束宏錄制。 第9頁(yè),共61頁(yè)。11.1.2 使用宏錄制器錄制宏_查看所錄制的宏宏程序錄制完畢后,選擇【工具】菜單上【宏】命令下的【宏】菜單項(xiàng),彈出“宏”對(duì)話框。在“宏名”框中選擇宏程序“Sales”,單擊【編輯】按鈕,則可顯示剛才所錄制的宏程序“Sales”。第10頁(yè),共61頁(yè)。11.1.

6、3 利用VBA編寫(xiě)宏程序宏錄制器存在問(wèn)題:錄制的宏往往語(yǔ)句冗長(zhǎng)(記錄了許多不需要的步驟,不需要的語(yǔ)句),會(huì)降低執(zhí)行速度當(dāng)錄制宏的工作開(kāi)始后,所有的操作步驟都將被記錄在宏中,如果在錄制宏時(shí)出現(xiàn)失誤,更正失誤的操作也會(huì)記錄在宏中。有時(shí)為了更正操作,可能需要重新錄制新宏宏錄制器在靈活度方面有所欠缺有些功能是無(wú)法通過(guò)錄制實(shí)現(xiàn)的因此需要用編寫(xiě)宏程序第11頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_宏程序的分類(lèi)子程序子程序是VBA的最小程序單位。 函數(shù)函數(shù)由Function和End Function 語(yǔ)句所包含起來(lái)的 VBA語(yǔ)句組成。子程序可以執(zhí)行某種操作,但無(wú)返回值。Function函數(shù)和Sub子

7、程序很類(lèi)似,但函數(shù)有一個(gè)返回值。第12頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_結(jié)構(gòu)化程序設(shè)計(jì)的控制結(jié)構(gòu)(1)順序結(jié)構(gòu)(2)選擇結(jié)構(gòu)(3)循環(huán)結(jié)構(gòu)第13頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序(1)順序結(jié)構(gòu)在一般情況下,一個(gè)VBA的Sub子程序和Function函數(shù)的執(zhí)行都是從程序代碼的第一個(gè)語(yǔ)句行開(kāi)始,逐條運(yùn)行程序代碼中的語(yǔ)句,直至遇到End Sub或End Function來(lái)結(jié)束整個(gè)程序的執(zhí)行。這就是順序結(jié)構(gòu)。第14頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(1)順序結(jié)構(gòu)【例11-2】編寫(xiě)一宏程序。過(guò)程名:PRO1功能:在cwgl工作簿中的“Sales”工作表中,賦

8、予B1單元報(bào)表的標(biāo)題“銷(xiāo)售情況分析表”;賦予B2單元日期“2010年12月”;在A3、B3、C3、D3、E3單元格中依次輸入“部門(mén)”、“實(shí)際銷(xiāo)售額”、“保本銷(xiāo)售額”、“盈虧狀況”、和“銷(xiāo)項(xiàng)稅”;在A4、B4、C4單元格中依次輸入“計(jì)算機(jī)部”、“100”和“80”。第15頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(1)順序結(jié)構(gòu)【例11-2】編寫(xiě)一宏程序。過(guò)程名:PRO1功能:在cwgl工作簿中的“Sales”工作表中,賦予B1單元報(bào)表的標(biāo)題“銷(xiāo)售情況分析表”;賦予B2單元日期“2010年12月”;在A3、B3、C3、D3、E3單元格中依次輸入“部門(mén)”、“實(shí)際銷(xiāo)售額”、“保本銷(xiāo)售額”、“盈

9、虧狀況”、和“銷(xiāo)項(xiàng)稅”;在A4、B4、C4單元格中依次輸入“計(jì)算機(jī)部”、“100”和“80”。第16頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(1)順序結(jié)構(gòu)編制的宏程序如下:Sub pro1() Range(B1).Select ActiveCell.FormulaR1C1 = 銷(xiāo)售情況分析表 Range(B2).Select ActiveCell.FormulaR1C1 = 2010年12月 Range(A3).Select ActiveCell.FormulaR1C1 = 部門(mén) Range(B3).Select ActiveCell.FormulaR1C1 = 實(shí)際銷(xiāo)售額 Rang

10、e(C3).Select第17頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(1)順序結(jié)構(gòu) ActiveCell.FormulaR1C1 = 保本銷(xiāo)售額 Range(D3).Select ActiveCell.FormulaR1C1 = 盈虧狀況 Range(E3).Select ActiveCell.FormulaR1C1 = 銷(xiāo)項(xiàng)稅 Range(A4).Select ActiveCell.FormulaR1C1 = 計(jì)算機(jī)部 Range(B4).Value = 100 Range(C4).Value = 80End Sub 第18頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)

11、選擇結(jié)構(gòu)有些時(shí)候,需要程序代碼按一定的條件執(zhí)行,當(dāng)條件成立時(shí),執(zhí)行一部分程序代碼,條件不成立時(shí)執(zhí)行另外一部分程序代碼。這種功能需要用VBA的選擇結(jié)構(gòu)來(lái)實(shí)現(xiàn)。VBA中的條件判斷語(yǔ)句有If語(yǔ)句和Select Case語(yǔ)句兩種第19頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)選擇結(jié)構(gòu)單分支語(yǔ)句IfThen。單行結(jié)構(gòu)條件語(yǔ)句單行結(jié)構(gòu)條件語(yǔ)句是最基本的條件語(yǔ)句,其語(yǔ)法結(jié)構(gòu)為:If 邏輯表達(dá)式 Then 語(yǔ)句塊結(jié)構(gòu)條件語(yǔ)句單行結(jié)構(gòu)條件語(yǔ)句中,滿(mǎn)足條件時(shí)只執(zhí)行一條語(yǔ)句,若有多行語(yǔ)句需要執(zhí)行,則需使用塊結(jié)構(gòu)條件語(yǔ)句。其語(yǔ)法結(jié)構(gòu)如下:If 邏輯表達(dá)式 Then 語(yǔ)句序列1 語(yǔ)句序列2第20頁(yè),共61

12、頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)選擇結(jié)構(gòu)二分支語(yǔ)句IfThenElse。其語(yǔ)法結(jié)構(gòu)如下: If 邏輯表達(dá)式 Then 語(yǔ)句序列1 Else 語(yǔ)句序列2 End If第21頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)選擇結(jié)構(gòu)【例11-5】編寫(xiě)一宏程序。過(guò)程名:PRO3功能:如果實(shí)際銷(xiāo)售額大于等于保本點(diǎn)銷(xiāo)售額,在屏幕上輸出“勝利完成任務(wù)!”,并在盈虧狀態(tài)單元格賦“盈利”;否則在屏幕上輸出“仍需努力!”,并在盈虧狀態(tài)單元賦“危險(xiǎn)”。第22頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)選擇結(jié)構(gòu)編寫(xiě)的宏程序如下:Sub PRO3() If Range(B3).Valu

13、e = Range(C3).Value Then MsgBox 勝利完成任務(wù)! Range(D4).Select ActiveCell.FormulaR1C1 = 盈利Else MsgBox 仍需努力! Range(D4).Select ActiveCell.FormulaR1C1 = 危險(xiǎn)End If End Sub第23頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)選擇結(jié)構(gòu)多分支語(yǔ)句:ifThenElseIf。語(yǔ)法結(jié)構(gòu)為:If 條件1 Then 語(yǔ)句組1ElseIf 條件2 Then 語(yǔ)句組2 ElseIf 條件n Then 語(yǔ)句組nElse 語(yǔ)句組n+1End If第24頁(yè),共

14、61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)選擇結(jié)構(gòu)【例11-6】某汽車(chē)出租公司可為顧客提供貨物運(yùn)送服務(wù),根據(jù)貨物的價(jià)值及運(yùn)輸路程設(shè)置運(yùn)費(fèi),并且可根據(jù)路程遠(yuǎn)近給予適當(dāng)?shù)恼劭?。設(shè)運(yùn)費(fèi)F(單位為元),貨物單價(jià)P(單位為元),貨物重量W(單位為噸),路程S(公里)及優(yōu)惠系數(shù)(D)之間的關(guān)系式為:F=P*W*S*(1-D)。優(yōu)惠系數(shù)d與路程遠(yuǎn)近的關(guān)系如下,編寫(xiě)計(jì)算折扣的函數(shù)。第25頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)選擇結(jié)構(gòu)編寫(xiě)的函數(shù)如下:Function d(s) If s = 1000 Then d = 0.1 ElseIf s = 750 Then d = 0.07 E

15、lseIf s = 500 Then d = 0.05 ElseIf s = 250 Then d = 0.02 Else d = 0 End IfEnd Function 第26頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)選擇結(jié)構(gòu)多分支語(yǔ)句:Select Case。Select Case語(yǔ)句的語(yǔ)法結(jié)構(gòu)如下:Select Case 測(cè)試表達(dá)式Case 表達(dá)式1 語(yǔ)句組1Case 表達(dá)式2 語(yǔ)句組2 Case Else 語(yǔ)句組n End Select第27頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)選擇結(jié)構(gòu)【例11-7】編寫(xiě)一宏程序。過(guò)程名:PRO4功能:如果實(shí)際銷(xiāo)售額大

16、于保本銷(xiāo)售額,在屏幕上輸出“盈利!”,并在盈虧狀態(tài)單元格賦“盈利”;如果實(shí)際銷(xiāo)售額等于保本銷(xiāo)售額,在屏幕上輸出“保本!”,并在盈虧狀態(tài)單元格賦“保本”;如果實(shí)際銷(xiāo)售額小于保本銷(xiāo)售額,在屏幕上輸出“虧損!”,并在盈虧狀態(tài)單元格賦“虧損”。第28頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(2)選擇結(jié)構(gòu)編寫(xiě)的程序如下:Sub PRO4() Dim sx As Double, bx As Double sx = Range(B4).Value bx = Range(C4).Value Select Case sx Case Is bx MsgBox 盈利! Range(D4).Select A

17、ctiveCell.FormulaR1C1 = 盈利 End SelectEnd Sub 第29頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(3)循環(huán)結(jié)構(gòu)在順序結(jié)構(gòu)的程序中,每個(gè)語(yǔ)句只執(zhí)行一次。在分支結(jié)構(gòu)的程序中,根據(jù)邏輯表達(dá)式的值選擇某一分支執(zhí)行,所選分支的語(yǔ)句也只執(zhí)行一次。然而,在處理實(shí)際問(wèn)題時(shí),經(jīng)常要用同一種方法對(duì)不同的數(shù)據(jù)進(jìn)行重復(fù)處理,這些相同的操作可以通過(guò)重復(fù)執(zhí)行同一程序段來(lái)實(shí)現(xiàn)。這種重復(fù)執(zhí)行具有特定功能程序段的程序就是循環(huán)程序。第30頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(3)循環(huán)結(jié)構(gòu)ForNext循環(huán)結(jié)構(gòu)。語(yǔ)法結(jié)構(gòu)為:For counter = start To

18、 end step 步長(zhǎng) 循環(huán)語(yǔ)句1 循環(huán)語(yǔ)句2 循環(huán)語(yǔ)句3 循環(huán)語(yǔ)句nNext counter該結(jié)構(gòu)的功能是:將初值賦給計(jì)數(shù)器counter。當(dāng)初值start沒(méi)有達(dá)到終值end時(shí),VBA自動(dòng)循環(huán)執(zhí)行循環(huán)體中的循環(huán)語(yǔ)句,每執(zhí)行一次循環(huán),計(jì)數(shù)器加1或增加指定的步長(zhǎng)step步長(zhǎng);當(dāng)計(jì)數(shù)器達(dá)到終值時(shí),跳出循環(huán)。第31頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(3)循環(huán)結(jié)構(gòu)【例11-8】某公司職工檔案數(shù)據(jù)保存在Excel工作表中,如圖11-7所示。該公司共有1234名職工,每月要從工資表中扣除一定的住房公積金,假設(shè)住房公積金按以下的百分比扣除。 第32頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)

19、宏程序_(3)循環(huán)結(jié)構(gòu)首先,自定義函數(shù)計(jì)算公積金的百分比。Function countrate(salary As Double) Dim rate As Double If salary 2000 Then rate = 0.1 ElseIf salary 1500 Then rate = 0.07 ElseIf salary 1200 Then rate = 0.05 ElseIf salary 1000 Then rate = 0.02 ElseIf salary 800 Then rate = 0.01 Else rate = 0 End If countrate = rateEnd

20、Function第33頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(3)循環(huán)結(jié)構(gòu)編寫(xiě)計(jì)算所有職工工積金的宏P(guān)RO5:Sub PRO5()For i = 3 To 1236 r = countrate(Cells(i, 2) Cells(i, 3) = r Cells(i, 3).Style = Percent Cells(i, 4) = r * Cells(i, 2) Cells(i, 5) = Cells(i, 2) - Cells(i, 4) NextEnd Sub第34頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(3)循環(huán)結(jié)構(gòu)DoLoop循環(huán)結(jié)構(gòu)。語(yǔ)法結(jié)構(gòu)是:Do While

21、 條件 語(yǔ)句序列Loop功能:當(dāng)條件成立時(shí),VBA重復(fù)執(zhí)行語(yǔ)句序列直到條件不成立,跳出循環(huán)。第35頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(3)循環(huán)結(jié)構(gòu)【例11-9】繼續(xù)例11-8,假設(shè)并不知道有多少位職工,在其他條件都相同的條件下,現(xiàn)用DoLoop循環(huán)結(jié)構(gòu)來(lái)計(jì)算每位職工的住房公積金比例、應(yīng)交公積金和實(shí)際發(fā)放工資。第36頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(3)循環(huán)結(jié)構(gòu)Sub PRO6()i = 3Do r = countrate(Cells(i, 2) Cells(i, 3) = r Cells(i, 3).Style = Percent Cells(i, 4) =

22、r * Cells(i, 2) Cells(i, 5) = Cells(i, 2) - Cells(i, 4) i = i + 1Loop Until (IsEmpty(Cells(i, 2)End Sub第37頁(yè),共61頁(yè)。11.1.3 利用VBA編寫(xiě)宏程序_(3)循環(huán)結(jié)構(gòu)For EachNext語(yǔ)句。For EachNext循環(huán)與ForNext循環(huán)類(lèi)似,但它針對(duì)數(shù)組或?qū)ο蠹现械拿恳辉刂貜?fù)一組語(yǔ)句,而不是重復(fù)語(yǔ)句一定的次數(shù)。語(yǔ)法結(jié)構(gòu):For Each 對(duì)象元素變量 in 對(duì)象集合 語(yǔ)句序列1 Exit For 語(yǔ)句序列2Next 對(duì)象元素變量第38頁(yè),共61頁(yè)。11.1.3 利用VBA編

23、寫(xiě)宏程序_(3)循環(huán)結(jié)構(gòu)【例11-10】編寫(xiě)一程序過(guò)程名:PRO7功能:關(guān)閉所有打開(kāi)的工作簿。編寫(xiě)的宏程序如下:Sub PRO7() For Each Book in Workbooks() Book.Close Next BookEnd Sub第39頁(yè),共61頁(yè)。11.1.4 宏程序的運(yùn)行1.在EXCEL界面運(yùn)行宏2.在開(kāi)發(fā)環(huán)境下運(yùn)行宏 第40頁(yè),共61頁(yè)。11.1.4 宏程序的運(yùn)行1.在EXCEL界面運(yùn)行宏在Excel界面運(yùn)行宏,適用于使用環(huán)境,可通過(guò)菜單命令打開(kāi)“宏”界面,再選擇宏名,點(diǎn)擊【執(zhí)行】或者在工作表打開(kāi)狀態(tài)下直接調(diào)用快捷鍵ALT+F8,彈出宏界面,再選擇宏名,點(diǎn)擊【執(zhí)行】。通過(guò)

24、選擇自定義菜單或點(diǎn)擊自定義按鈕的方式執(zhí)行宏(詳見(jiàn)本章11.2和11.3內(nèi)容)將宏配置為在打開(kāi)工作簿時(shí)自動(dòng)運(yùn)行(詳見(jiàn)本章11.4節(jié)內(nèi)容)。第41頁(yè),共61頁(yè)。11.1.4 宏程序的運(yùn)行2.在開(kāi)發(fā)環(huán)境下運(yùn)行宏首先打開(kāi)Microsoft Visual Basic界面,然后在【運(yùn)行】菜單上單擊【運(yùn)行子過(guò)程/用戶(hù)窗體】 或者按F5鍵調(diào)出“宏”對(duì)話框。第42頁(yè),共61頁(yè)。第11章 Excel財(cái)務(wù)管理系統(tǒng)的建立 11.1 宏和VBA 11.2 財(cái)務(wù)管理模型用戶(hù)界面的設(shè)計(jì) 11.3 財(cái)務(wù)管理系統(tǒng)菜單的設(shè)計(jì) 11.4 控制應(yīng)用系統(tǒng)自動(dòng)啟動(dòng)的方法 第43頁(yè),共61頁(yè)。11.2 財(cái)務(wù)管理模型用戶(hù)界面的設(shè)計(jì)本節(jié)主要內(nèi)

25、容:11.2.1 界面設(shè)計(jì)的主要工具11.2.2 建立各模塊用戶(hù)界面11.2.3 建立財(cái)務(wù)管理系統(tǒng)界面第44頁(yè),共61頁(yè)。11.2.1 界面設(shè)計(jì)的主要工具1.繪圖工具2.窗體第45頁(yè),共61頁(yè)。11.2.2 建立各模塊用戶(hù)界面第46頁(yè),共61頁(yè)。11.2.3 建立財(cái)務(wù)管理系統(tǒng)界面1.繪制圖形2.建立圖形與各功能模塊之間的鏈接第47頁(yè),共61頁(yè)。第11章 Excel財(cái)務(wù)管理系統(tǒng)的建立 11.1 宏和VBA 11.2 財(cái)務(wù)管理模型用戶(hù)界面的設(shè)計(jì) 11.3 財(cái)務(wù)管理系統(tǒng)菜單的設(shè)計(jì) 11.4 控制應(yīng)用系統(tǒng)自動(dòng)啟動(dòng)的方法 第48頁(yè),共61頁(yè)。11.3 財(cái)務(wù)管理系統(tǒng)菜單的設(shè)計(jì)本節(jié)主要內(nèi)容:11.3.1 菜

26、單管理器11.3.2 在菜單欄中增加【財(cái)務(wù)管理】菜單11.3.3 財(cái)務(wù)管理系統(tǒng)框架第49頁(yè),共61頁(yè)。11.3 財(cái)務(wù)管理系統(tǒng)菜單的設(shè)計(jì)_建立新菜單的步驟(1)打開(kāi)工作簿,進(jìn)入用戶(hù)界面。(2)選擇【工具】菜單上的【自定義】命令,出現(xiàn)自定義對(duì)話框。(3)在“命令”標(biāo)簽中選擇“新菜單”類(lèi)別。(4)選擇“新菜單”命令,并拖至菜單欄中相應(yīng)的位置。(5)點(diǎn)擊鼠標(biāo)右鍵得到定義新菜單的快捷菜單。(6)定義新菜單的名稱(chēng)。(7)重復(fù)上述過(guò)程定義菜單項(xiàng)、子菜單以及子菜單命令的名稱(chēng)。(8)為菜單項(xiàng)、子菜單命令指定對(duì)應(yīng)的宏程序。第50頁(yè),共61頁(yè)。11.3 財(cái)務(wù)管理系統(tǒng)菜單的設(shè)計(jì)_財(cái)務(wù)管理系統(tǒng)框架財(cái)務(wù)分析賬務(wù)處理籌資決

27、策數(shù)據(jù)處理基礎(chǔ)項(xiàng)目投資決策證券投資分析盈虧平衡與經(jīng)濟(jì)訂貨量最優(yōu)化問(wèn)題財(cái)務(wù)預(yù)測(cè)比率分析杜邦分析長(zhǎng)期借款籌資決策租賃借款決策.固定資產(chǎn)更新決策.債券投資分析模型股票投資分析模型盈虧平衡模型經(jīng)濟(jì)訂貨量模型資金管理生產(chǎn)管理投資組合銷(xiāo)售預(yù)測(cè)模型利潤(rùn)預(yù)測(cè)模型Excel財(cái)務(wù)管理系統(tǒng)圖11-17 Excel財(cái)務(wù)管理系統(tǒng)功能結(jié)構(gòu)圖第51頁(yè),共61頁(yè)。第11章 Excel財(cái)務(wù)管理系統(tǒng)的建立 11.1 宏和VBA 11.2 財(cái)務(wù)管理模型用戶(hù)界面的設(shè)計(jì) 11.3 財(cái)務(wù)管理系統(tǒng)菜單的設(shè)計(jì) 11.4 控制應(yīng)用系統(tǒng)自動(dòng)啟動(dòng)的方法 第52頁(yè),共61頁(yè)。11.4 控制應(yīng)用系統(tǒng)自動(dòng)啟動(dòng)的方法本節(jié)主要內(nèi)容:11.4.1 對(duì)話框操作

28、11.4.2 自動(dòng)運(yùn)行宏程序11.4.3 將財(cái)務(wù)管理系統(tǒng)所在的工作簿設(shè)置為在 Excel 啟動(dòng)時(shí)自動(dòng)打開(kāi)第53頁(yè),共61頁(yè)。11.4.1 對(duì)話框操作MsgBox函數(shù):MsgBox對(duì)話框函數(shù)可用以向用戶(hù)顯示一些提示信息。函數(shù)用法:MsgBox(prompt, buttons , title , helpfile, context)第54頁(yè),共61頁(yè)。11.4.1 對(duì)話框操作其中各參數(shù)及其說(shuō)明:參數(shù)說(shuō)明prompt必選。字符串表達(dá)式,在對(duì)話框中顯示為消息。prompt的最大長(zhǎng)度約為1024個(gè)字符,具體長(zhǎng)度取決于所用字符的寬度。如果prompt包含多行,可在各行之間使用回車(chē)符、換行符或回車(chē)符與換行符的組合來(lái)分隔各行。buttons可選。其值為數(shù)值表達(dá)式,它是值的總和,這些值指定要顯示的按鈕的數(shù)目和類(lèi)型、要使用的圖標(biāo)樣式、默認(rèn)按鈕

溫馨提示

  • 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶(hù)所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶(hù)上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶(hù)上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶(hù)因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

最新文檔

評(píng)論

0/150

提交評(píng)論