excel中编译时出现找不到工程或库怎么解决

程序是从别人那弄来的
Sub DEA()
Dim NDMUs As Integer, NInputs As Integer, NOutputs As Integer
Dim i As Integer

For i = 1 To 60

'set the value of cell E18 equal to i (=1, 2,..., 15)
Range("E63") = i

'Run the Slack Solver model
SolverSolve UserFinish:=True
Range("J" & i + 1) = Range("F64")

'Select the cells containing the slacks
Range("E65:E70").Select
'record optimal slacks in cells K2:O16
Selection.Copy
Range("L" & i + 1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Transpose:=True
Next
End Sub

原因:VBA设置的问题。

1、首先打开需要编辑的Excel表格,进入到编辑页面中。

2、然后鼠标右键单击工作表,选择打开“查看代码”选项。

3、然后在弹出来的窗口中点击打开主菜单栏工具中的“引用”选项。

4、然后在弹出来的窗口中点击取消所有或尽可能多的对勾,回车确定。

5、然后在弹出来的窗口中,提示有些对勾提示不能取消,不用理会,点击确定。

6、然后就可以正常运行宏了。

温馨提示:答案为网友推荐,仅供参考
第1个回答  2019-07-01

1、首先,我们打开我们的电脑,然后我们打开我们电脑上面的excel,之后我们点击左上角的文件;

2、弹出的界面,我们电你管理版本的下拉箭头;

3、弹出的界面,我们点击恢复未保存的工作簿;

4、然后我们就可以找到我们辛苦做的excel表了,我们点击选中,之后点击打开就可以了。

第2个回答  2013-07-25

以 2003 为例,在excel 中加载宏(插件),方法是工具-〉 加载宏 

中文名为  “规划求解” 英文名 为 Solver ,可能会提示安装,如果是完全版 office 直接下一步,安装完成。后选择 “规划求解”。


然后是 vba 中建立模块,引用  SOLVER 库




再运行代码时,就一切正常了。请采纳。

追问

已经加载规划求解,但还是丢失solver.xla.奇怪的是,我的office 07版本安装位于C:\Program Files(x86)\Microsoft Office\Office12目录下,07版本的自动安装生成Office12文件目录,丢失:solver.xla位于上图,已经按其路径建立文件,将solver.xla置于其中Library以及solver文件中 ,还是不行

追答

regsvr32 SOLVER32.DLL试试

追问

文件里有,但是regsvr32 SOLVER32.DLL现实加载失败

追答

你是不是 64系统?

我在 xp sp3
office 2003 情况下运行一切正常。
这个方法也无效,可能就只有换电脑,或者换系统,换 office 了。

系统问题我不知道怎么解决,但是,如果你加载正常的,这段代码应该就不会报错了。

本回答被提问者采纳
第3个回答  2015-10-12
1. 在VBE窗口中选择出错的 VBA 工程,快捷键:ALT+F11;
2. 在 VBA 的主菜单“工具”→“引用”打开引用对话框;
3. 查找带勾项中含“丢失…”、“找不到…”、“MISSING…”的条目,并取消勾选;
4. 一般情况下,用第3步即可解决,如问题依旧,请在“可用的引用”中查找并勾选与丢失的条目类似的引用。
5. 如果还不能解决,可能是电脑中缺少控件或对象库,需要下载控件并注册,后返回上面步骤解决。
相似回答