Guest User

Untitled

a guest
Apr 16th, 2018
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.28 KB | None | 0 0
  1. Sheets("Bill").Select
  2. Range("A2:AA2").Select
  3. Rows("2:2").Select
  4. Selection.AutoFilter
  5. Range("T2").Select
  6. ActiveSheet.Range("$A$2:$AA$111").AutoFilter Field:=20, Criteria1:=Array("=*Base ch*", _
  7. "=*Service*", "=*Supply Ch*", "=*Customer*", "=*Analyst*"), Operator:=xlFilterValues
Add Comment
Please, Sign In to add comment