有些复杂vba可以做到吗?

WSXZAQ147

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

pureshadow

1、初始状态指的是什么，就是显示SHEET1吗？可以在工作簿事件OPEN中加一句sheets("sheet1").select
2、可以录一段宏，看一下隐藏和取消隐藏、底色绿色等的代码是怎么写的，再用IF THEN来判断那些个条件。
3、可以用IF THEN来判断内容是否一样，提示框是MSGBOX
4、还是那句SHEETS("sheet1").select

WSXZAQ147

初始状态指的是什么，就是显示SHEET1吗？---是
能做个附件吗?