View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Don Guillett[_3_] Don Guillett[_3_] is offline
external usenet poster
 
Posts: 17
Default another filtering question

Just record a macro while doing so you can see what is happening and then
modify existing macro.

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Bradly" wrote in message
...
I was assisted with the following code, which filters two pieces of data--a
case manager ID (###A from column B) and a program code (MA from column
C):

Sheets("Office").Activate
Application.ScreenUpdating = False
With Sheets("Office")
.Activate
.Range("A1").Select
.Range("B1:C1000").AutoFilter Field:=1, Criteria1:="115A"
.Range("B1:C1000").AutoFilter Field:=2, Criteria1:="MA"
.Range("A1:M" & Cells(Rows.Count, "A").End(xlUp).Row).SpecialCells( _
xlCellTypeVisible).Copy Destination:=Worksheets("115A").Range("A3")
.AutoFilterMode = False
End With


Sheets("115A").Activate
Application.Goto Reference:="R1C1"
Application.ScreenUpdating = True

Is there any way to filter additional data in different columns? I wanted
to ask if it was possible to modify the above code to also filter 3rd and
4th
pieces of data (program types "F" and "P", both in column D).

Thanks.