烦请那位大侠帮翻译代码意思

Andy_Zhu · 发表于 2012-8-30 15:09

Sub 高级筛选()
'
' 高级筛选 Macro

Application.GoTo Reference:="R4:R65536"
Selection.Clear
Range("A4").Select
Sheets("数据库").Columns("B:s").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("A1:R2"), CopyToRange:=Range("A4"), Unique:=False
Range("B5").Select

End Sub

Andy_Zhu · 发表于 2012-8-31 11:04

没人理我，自己先占个位置吧

Andy_Zhu · 发表于 2012-9-1 09:46

从八月份放到九月份了还是没有人关注一下啊{:soso_e153:}

Andy_Zhu · 发表于 2012-9-2 10:28

郁闷！！！！

jj503377976 · 发表于 2012-9-4 13:23

放错板块了，你应该放到VBA。

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

[求助] 烦请那位大侠帮翻译代码意思