| 查看: 689 | 回复: 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" .SelectSelection.Copy ActiveCell.Offset(i + 2, 0).Range("A1" .SelectActiveSheet.Paste ActiveCell.Offset(0, -1).Range("A1" .SelectApplication.CutCopyMode = False ActiveCell.FormulaR1C1 = "i" ActiveCell.Offset(i - 1, -7).Range("A1" .SelectNext i End Sub |
» 猜你喜欢
投稿返修后收到这样的回复,还有希望吗
已经有7人回复
压汞仪和BET测气凝胶孔隙率
已经有4人回复
博士申请都是内定的吗?
已经有14人回复
博士申请
已经有3人回复
谈谈两天一夜的“延安行”
已经有13人回复
氨基封端PDMS和HDI反应快速固化
已经有11人回复
之前让一硕士生水了7个发明专利,现在这7个获批发明专利的维护费可从哪儿支出哈?
已经有11人回复
论文投稿求助
已经有4人回复
Applied Surface Science 这个期刊。有哪位虫友投过的能把word模板发给我参考一下嘛
已经有3人回复
投稿精细化工
已经有6人回复
» 本主题相关价值贴推荐,对您同样有帮助:
C_YI_G(c,t,i)宏的如何使用?
已经有26人回复

ella0717
金虫 (正式写手)
- 应助: 41 (小学生)
- 金币: 6055.4
- 散金: 1015
- 红花: 8
- 帖子: 735
- 在线: 212.9小时
- 虫号: 1010727
- 注册: 2010-05-03
- 性别: GG
- 专业: 自然地理学

2楼2013-09-05 20:42:27
ella0717
金虫 (正式写手)
- 应助: 41 (小学生)
- 金币: 6055.4
- 散金: 1015
- 红花: 8
- 帖子: 735
- 在线: 212.9小时
- 虫号: 1010727
- 注册: 2010-05-03
- 性别: GG
- 专业: 自然地理学

3楼2013-09-05 23:57:12













.Select
回复此楼