Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 13906|回复: 21

[已解决](问题已解决,谢谢老糊涂老师)运行时提示隐含模块中的编译错误问题

[复制链接]
发表于 2011-2-6 08:06 | 显示全部楼层 |阅读模式
本帖最后由 sdwffw 于 2011-2-25 09:39 编辑

各位老师,我原先的一个运行正常的exce程序,近期应用时,总是提示隐含模块中的编译错误:userform1(或userform2、3,或模块1、2等),不知是何原因,请老师指导。
最佳答案
2011-2-23 19:40
(, 下载次数: 2648)
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
 楼主| 发表于 2011-2-6 08:23 | 显示全部楼层
文件压缩后近2M,请问如何上传?谢谢。
回复

使用道具 举报

发表于 2011-2-6 09:43 | 显示全部楼层
回复

使用道具 举报

 楼主| 发表于 2011-2-6 20:53 | 显示全部楼层

谢谢

本帖最后由 sdwffw 于 2011-2-6 20:59 编辑

1.part3.rar (460 KB, 下载次数: 12)

1.part1.rar

460 KB, 下载次数: 12

1.part2.rar

460 KB, 下载次数: 11

回复

使用道具 举报

 楼主| 发表于 2011-2-6 21:01 | 显示全部楼层
谢谢老糊涂,上传的是1、2、3、4、5.
回复

使用道具 举报

 楼主| 发表于 2011-2-6 21:04 | 显示全部楼层
vbaproject密码730418
回复

使用道具 举报

发表于 2011-2-6 23:02 | 显示全部楼层
窗体1代码有丢失,应为
Private Sub UserForm1_Initialize()
    j = Application.WorksheetFunction.CountA(Sheets("SHEET1").Range("A3:A14"))
For I = 1 To j
    ComboBox1.AddItem Sheets("SHEET1").Cells(I + 2, 1)
Next I
End Sub
回复

使用道具 举报

 楼主| 发表于 2011-2-7 08:10 | 显示全部楼层
老糊涂老师,修改后还是不行。另外,主页“退出系统”等按钮提示“隐含模块中的编译错误:模块4”等,请老师一并指导是何原因,非常感谢.
回复

使用道具 举报

 楼主| 发表于 2011-2-7 08:13 | 显示全部楼层
以前运行正常,现在不知为何不能用了,是不是代码会自动丢失?还是和excel本身有关系?
回复

使用道具 举报

 楼主| 发表于 2011-2-7 13:07 | 显示全部楼层
老糊涂老师,我对VBA不太熟悉,这个程序是学习别人并略做修改应用的工作程序,原先一直正常,现在出了问题,能不能帮我修改一下代码,非常感谢。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-6-3 23:22 , Processed in 0.297374 second(s), 12 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表