- 博客(2)
- 收藏
- 关注
原创 vba 单击跳转并且自动筛选
Private Sub Worksheet_SelectionChange(ByVal Target As Range) n = Range("b65536").End(xlUp).Row r = Target.Row c = Target.Column If r > 1 And r Sheets("总览").Activate n2 = Sheet
2016-07-18 09:46:20 1809 1
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人