设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1968|回复: 2
打印 上一主题 下一主题

[VBA编程/宏] 有些复杂vba可以做到吗?

[复制链接]
跳转到指定楼层
1#
发表于 2009-11-20 23:15:31 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
本帖最后由 WSXZAQ147 于 2009-11-22 19:11 编辑

1---打开附件时的表格状态为初始状态(见sheet1表);
2---点击按钮,L列中若有底色为绿色且和最底下一行同列单元格内数的数字一样的行全部显示,其余行隐藏(见sheet2表)
3---最后三行为分析范围,若同列中3个单元格内数字一样(除L列),就弹出一个提示框(见sheet3表);
4---点击红色按钮,恢复至初始状态(SHEET1表);

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
3#
 楼主| 发表于 2009-11-22 21:19:11 | 只看该作者
初始状态指的是什么,就是显示SHEET1吗?---是
能做个附件吗?

点击这里给我发消息

2#
发表于 2009-11-22 20:51:29 | 只看该作者
1、初始状态指的是什么,就是显示SHEET1吗?可以在工作簿事件OPEN中加一句sheets("sheet1").select
2、可以录一段宏,看一下隐藏和取消隐藏、底色绿色等的代码是怎么写的,再用IF THEN来判断那些个条件。
3、可以用IF THEN来判断内容是否一样,提示框是MSGBOX
4、还是那句SHEETS("sheet1").select
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-29 19:18 , Processed in 0.086849 second(s), 28 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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