Filtering tables by cell value.

[thegooser123]

Hi all,

I have a workbook with 4 different sheets on it. On 3 of the sheets are tables which I have to filter. The formats of the 3 tables are all pretty much the same.

I need to filter these tables using the little arrows on the headers to firstly filter by a specific date, and then by a text field (a name). I have to repeat this over the 3 tables.

then on the remaining sheet I have to manually write in the name and the date in two different cells.

Is there anyway that I can just write the date and name in and excel would automatically filter the other three tables depending on what I wrote?

Any ideas?

 

[Trevor G]

Take a look at this code, it will filter a sheet based on the values from another then copy the values you can take that bit out. Add extra lines based on the sheet names.

Sub Macro2()
'
' This will filter the values
' Run this on Sheet1 making sure you have something in G10
' Extend the filter as necessary
Sheets("Sheet2").Select

Selection.AutoFilter
ActiveSheet.Range("$E$3:$F$21").AutoFilter Field:=1, Criteria1:=Sheets("Sheet1").Range("G10")
Range("E3").Select
ActiveCell.CurrentRegion.Copy
Sheets("Sheet1").Select
Range("E3").Select
Do Until ActiveCell.Value = ""
ActiveCell.Offset(1, 0).Select
Loop
ActiveCell.PasteSpecial xlPasteAll

End Sub

 

[thegooser123]

Take a look at this code, it will filter a sheet based on the values from another then copy the values you can take that bit out. Add extra lines based on the sheet names.

I don't think that this is going to work for me. I forgot to mention that none of the 3 different tables have a set amount of rows. They could be anything from 0 to 300 rows, so the Range("$E$3:$F$21") wouldn't apply here.

 

[Trevor G]

Just extend the range to something outside what would be there so like

Range("$E$3:$F$2500")

 

[thegooser123]

Ahhh....


well I'm almost there, the numbers are adding up but not displaying on the filtered table. by that I mean if I change the value of the name, it is returning the result that I'm looking for, but its not changing the table (I need this for printing).

Is there anyway I can send you the workbook for you to have a look at?

 

[Trevor G]

Send me a copy of your workbook to look at, please ensure I have the information to look at, ie you tell me which sheet names etc.

Email address is: (Please make sure you zip the workbook before sending)

trevorglover@wuit.co.uk