24小时热门版块排行榜    

查看: 774  |  回复: 2

ella0717

金虫 (正式写手)

[求助] excel宏编辑solver语句出错

本人程序语言几乎不懂,只能看懂不会写,现用excel中的规划求解工具箱求几个数,需多次运算分别保存计算结果,使用录制宏的功能获得初始语句后略加修改,但其中solver的一句提示语法错误。这句是录制来的,未做任何改变,reference里也已经选中了solver,全文见下,哪位帮忙看看问题在哪,怎么修改,多谢多谢!

Sub calandcopy()
'
' calandcopy Macro
'
' 快捷键: Ctrl+e
'
    Dim i As Integer
    For i = 1 To 5000
    ActiveCell.Select
    Calculate
    SolverOk SetCell,:="$A$42", MaxMinVal:=2, ValueOf:="0", yChange:="$I$38:$K$38"
    SolverSolve
    ActiveCell.Offset(-4, 8).Range("A1:C1".Select
    Selection.Copy
    ActiveCell.Offset(i + 2, 0).Range("A1".Select
    ActiveSheet.Paste
    ActiveCell.Offset(0, -1).Range("A1".Select
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = "i"
    ActiveCell.Offset(i - 1, -7).Range("A1".Select
    Next i
End Sub
回复此楼
Letitbreakinallitsfury!
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

ella0717

金虫 (正式写手)

就是几句简单的语言,保存每次由不同的随机数产生的结果复制到下面,只是中间用了一步规划求解。
Letitbreakinallitsfury!
2楼2013-09-05 20:42:27
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

ella0717

金虫 (正式写手)

已解决。录制的宏中setcell后多了个;最后是bychange。
另外,在solversolve 后添加 userfinish:=true,每次规划迭代结束就不会弹出窗口了,自动完成计算和列出结果。
Letitbreakinallitsfury!
3楼2013-09-05 23:57:12
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 ella0717 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +31 医学老男孩 2026-08-13 69/3450 2026-08-16 00:16 by mo_mo_mo_mo
[基金申请] 有时候,自然基金真的不能太认真 (我的申报经验) +9 majunge000 2026-08-11 11/550 2026-08-15 23:20 by botar
[基金申请] 时间戳又变了8-15 +12 archvillain 2026-08-15 23/1150 2026-08-15 20:47 by foyo404
[基金申请] filecode +8 cratir 2026-08-14 12/600 2026-08-15 18:08 by zyfgau
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +7 Ldrop2023 2026-08-13 7/350 2026-08-15 15:57 by mzhh2000
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +7 启萌科技 2026-08-12 22/1100 2026-08-14 23:45 by Noways
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +8 布布和一二 2026-08-10 11/550 2026-08-14 14:58 by Equinoxhua
[硕博家园] 读博的好处 +4 lnee 2026-08-11 4/200 2026-08-14 10:20 by ahsoarli
[基金申请] FileCode能看出啥? +10 要乐观耀哥 2026-08-10 32/1600 2026-08-14 09:37 by 要乐观耀哥
[基金申请] 我的国基提前知道中了,可是同事的操作让我实在接受不了,怎么会有这样的人 +10 家与远方 2026-08-10 15/750 2026-08-14 02:08 by 绵羊哥哥
[文学芳草园] 阿姨 +4 汪汪锅 2026-08-09 4/200 2026-08-13 19:43 by arzu_hma
[基金申请] 静等基金结果 +8 gjjjzhong 2026-08-10 21/1050 2026-08-13 17:56 by 且听虎啸
[基金申请] 不应该看fileCode +7 且听虎啸 2026-08-12 9/450 2026-08-13 14:27 by flydreamws
[基金申请] 分享一下我之前已中青C的计划书的filecode +4 布布和一二 2026-08-11 5/250 2026-08-13 12:56 by cratir
[基金申请] 结合人工智能,周易传统文化,filecode打分制来了,3分以上希望很大。 +3 Tide man 2026-08-12 4/200 2026-08-13 08:35 by ZJTJZ
[基金申请] 综述论文作为代表作会不会影响评审专家的印象分? +11 yufeiwaner 2026-08-09 13/650 2026-08-12 08:17 by yufeiwaner
[基金申请] 帮忙看看fileCode +7 wwncly 2026-08-10 13/650 2026-08-11 19:36 by 冰心玉壶晴
[基金申请] 为什么网上很多人说本周 12号出结果 +6 瞬息宇宙 2026-08-10 7/350 2026-08-11 19:25 by Tide man
[基金申请] 确定了,国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
信息提示
请填处理意见