Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
12
返回列表 发新帖
楼主: fxgg72

[已解决]求:进度滚动条 代码?

[复制链接]
发表于 2015-7-5 17:36 | 显示全部楼层
fxgg72 发表于 2015-7-5 17:29
老师:这个代码我新建了一个模块复制进去,工作表里面输入数据没反应啊?
怎么用?
谢谢老师!

我这个是事件代码,你不能简单复制到模块中,用于模块中时,需要稍作修改。
回复

使用道具 举报

发表于 2015-7-5 17:37 | 显示全部楼层
这个呢?

求:进度滚动条 代码?.zip

17.84 KB, 下载次数: 4

评分

参与人数 1 +2 收起 理由
fxgg72 + 2 赞一个!

查看全部评分

回复

使用道具 举报

 楼主| 发表于 2015-7-5 17:38 | 显示全部楼层
thinkersky 发表于 2015-7-5 17:34
前面加一句
on error resume next

加在什么地方?
我是菜鸟,老师见谅!
回复

使用道具 举报

发表于 2015-7-5 20:01 | 显示全部楼层
fxgg72 发表于 2015-7-5 17:38
加在什么地方?
我是菜鸟,老师见谅!

Private Sub Worksheet_Change(ByVal Target As Range)
     on error resume next
     If Target.Column = 4 Or Target.Column = 5 Then
回复

使用道具 举报

发表于 2015-7-6 22:47 | 显示全部楼层
太好了,很实用。
回复

使用道具 举报

 楼主| 发表于 2015-7-14 12:29 | 显示全部楼层
baksy 发表于 2015-7-5 11:50
附件

老师:帮我看看这个帖子
谢谢!
http://www.excelpx.com/thread-367507-1-1.html
回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-5-7 04:03 , Processed in 0.309255 second(s), 14 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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