切换工作表，在指定工作表执行代码。

lxaw003 · 发表于 2015-1-30 21:38

三个工作表分别命名为工作表1，工作表2，工作表3
工作表1代码
Private Sub Worksheet_Activate()
Call 取消筛选
End Sub
---------------------
工作表2代码
Private Sub Worksheet_Activate()
Call 自动筛选
End Sub
----------------------
工作表3代码
Private Sub Worksheet_Activate()
Call 取消筛选
End Sub
---------------------------
sub 取消代码 ()
？？？？？？？？？取消工作表2中的自动筛选
end sub
------------------
sub 取消代码 ()
在工作表2中第一行进行筛选
end sub
---------------------
？？？？号的地方时需要大神写代码的地方！

lxaw003 · 发表于 2015-1-30 21:40

问题应该是指定工作表的执行代码

朱荣兴 · 发表于 2015-1-30 23:10

提示: 作者被禁止或删除内容自动屏蔽

lxaw003 · 发表于 2015-1-31 07:07

本帖最后由 lxaw003 于 2015-1-31 08:40 编辑

朱荣兴发表于 2015-1-30 23:10

thank you

		自动登录	找回密码
密码			免费注册

朱荣兴朱荣兴当前离线性别保密 UID 1318548 阅读权限 0 注册时间 2011-2-2 在线时间小时最后登录 1970-1-1 积分 19282 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2015-1-30 23:10 \| 显示全部楼层 [广告] ★会Excel,就能做支持PC、手机、Web、App、Windows、安卓、IOS、Linux信息一体化的各种管理系统 ★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报