1、在VBA中增加規(guī)劃求解版本：2007年10月15日概述假設(shè)你需要運(yùn)行規(guī)劃求解的VBA程序。如果你正運(yùn)行Excel 2003及以后版本，你需 要在VBA表中增加一個(gè)參數(shù)。第三版財(cái)務(wù)金融建模中所有Excel文件都增加了該參 數(shù)，但根據(jù)你的電腦設(shè)置，你可能需要做一個(gè)小的改變。該文檔提供了一個(gè)例子。使用規(guī)劃求解記錄一個(gè)簡(jiǎn)單的VBA程序考慮下面的電子表，其中，我們用X除以Y得到Z：ABC1X32Y43Z0.75-=B1/B2假設(shè)我們想用規(guī)劃求解去確定X并得到Z = 6:假設(shè)你通過(guò)工具1宏I錄制新宏來(lái)記錄這個(gè)宏公式審核CUJ規(guī)劃求髀凹,，普曲國(guó)wo堯bi忌葦為Bi宏皿,Alt+F8加載宏 蹣以.安辭，Vi

2、sual Bask 錦零器凹Alt+FllZMCD 數(shù)據(jù)回蜜口四幫助凹-Microsoft 腳本編事器) Alt+Shift-bFll打開(kāi)VBA窗口(按Alt + F11 )，你可以看到它將在VBA中產(chǎn)生下面的宏:Sat Macrol () I1 Macrol Macro1 Macro recorded 7/4/2007 by Siraon BenningsSolverOk SetCell: =33, MaxMinV己J.:=3, Val jeOf :ByChange :SolverSolve End Sub在VBA中增加規(guī)劃求解為了讓這個(gè)宏工作，我們不得不在VBA中增加一個(gè)規(guī)劃求解的參數(shù)。按

3、Alt + F11 打開(kāi)VBA模塊：訪 Microsoft VisualBasic -Boold-文件（E 蝙輯舊 w（y）插入 格式調(diào)試回運(yùn)行工程-VBAProjectSub規(guī)劃求解0曲慈慝慝曰 S-E-E-:.曰atpvbaen. xls (ATFVBACS. XIA) Interiiet_AEsi stant (HTML. XLA) SOLVER (solver, xla) VBAProj ectMiciGEGtt重| SheetlSi Sheet2(Bookl)Excel對(duì)象CSheetl)CSheet2)SolverOk SetCell, SolverSolveEnd Sub里引用因

4、-附加控件心1宏皿.，VBAProject 屆性 t).“ 數(shù)#zam 夕瞻程序 n（w）整助（to規(guī)切求解Macro邵建利 錄俐可使用的引用兔）:MHHH口一ViBasi c For Appli cati orisM i cr u Euft Ex cel 11.0 Obj ect Li br：ii OLE Aut um at i onMicrosoft Office 11.0 Object Libr：=ualpTtiaerL. xlsIrLterrLet_AEEi st antMi cruEuft Forms 2. U Obj ect Libr：t-7優(yōu)先級(jí)SOLVERDhsi giL Sc

5、i erLce Inc. Winiluws Utili Ac a e e e i b i 1 i tyCp_ 人血 in 1.0 T yp e Lib ACCOMWrapper 1.0 Type Library ACGadge t,ili,r app er 1. U Typ q Li br ary Acruhat Ac cess 3. 0 Typ已 Lihrary ll -ITRHUI1 Th av 1 I I TTJTh O T 1 ViVr - 卜確定下面是產(chǎn)生的屏幕，其中你選擇規(guī)劃求解:引用-VBAProjectSOLVER定位:語(yǔ)言:C: i.Frugi_：=iiTi FilesMicrosof