Re: [算表] 想錄製「規劃求解」的巨集...

看板Office作者 (沒有耶)時間16年前 (2010/02/19 00:16), 編輯推噓3(301)
留言4則, 1人參與, 最新討論串2/4 (看更多)
因為你少了限制式..... SolverOk SetCell:=Cells(2, 4), MaxMinVal:=2, ValueOf:="0", byChange:="$G$8:$L$8" 先說明一下 sign = 1 是 >= sign = 2 是<= 以下類推 sign = 3 , = sign = 4 , int sign = 5 , boolean 加上限制式 i,j,k就看你的位置而定了 SolverAdd CellRef:=Cells(i, j), Relation:=sign, formulaText:=Cells(i, k) SolverOptions MaxTime:=100, Iterations:=100, Precision:=0.000001, AssumeLinear:=False, StepThru:=False, Estimates:=1, Derivatives:=1, SearchOption:=1, _ IntTolerance:=0.005, scaling:=False, Convergence:=0.0001, AssumeNonNeg:=True SolverSolve UserFinish:=True SolverFinish keepFinal:=1 SolverReset ※ 引述《A1pha ([αλφα])》之銘言: : 軟體: : Excel 2003 SP3 : 我想請問一下, : 我錄製了一個規劃求解的巨集。 : 就是想用一個按鈕指定這一個巨集, : 這樣的話,就能直接在表單上面按按鈕來規劃求解。 : 但是我發現,好像沒辦法這樣做, : 按下去之後, : 他會寫說,有個SUB沒有定義... : 這該怎麼辦啊...囧 : 功能表的功能都沒辦法用巨集來製作嗎? : Sub Macro4() : ' : ' : SolverOk SetCell:="$AH$2", MaxMinVal:=1, ValueOf:="0", : ByChange:="$AF$4:$AF$30" : SolverSolve : End Sub -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 220.131.80.69

02/19 00:29, , 1F
感謝大大太神了@@ 我回去試試看!錄製巨集時不會連限制式
02/19 00:29, 1F

02/19 00:29, , 2F
一起錄進去嗎@@" 都要用手動填寫啊..囧 真是太慘烈了QQ
02/19 00:29, 2F

02/19 00:39, , 3F
當Relation:=4 formulaText要填什麼呀? @@
02/19 00:39, 3F

02/19 01:48, , 4F
我知道了~填integer就可以了~
02/19 01:48, 4F
文章代碼(AID): #1BVMVbCG (Office)
文章代碼(AID): #1BVMVbCG (Office)