Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
filter with condition
how can filter data with condition.
i have data like this A B C D 1 a 10 2 b 20 3 c 10 4 d 40 5 e 10 when I enter any nos in D1 cell, my sheet filter (advance filter) with condition like d1 result A B C D 1 a 10 3 c 10 5 e 10 like this RKS |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
filter with condition
In C1 enter
=B1=$D$1 copy down and filter on column C -- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "RKS" wrote in message ... how can filter data with condition. i have data like this A B C D 1 a 10 2 b 20 3 c 10 4 d 40 5 e 10 when I enter any nos in D1 cell, my sheet filter (advance filter) with condition like d1 result A B C D 1 a 10 3 c 10 5 e 10 like this RKS |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
filter with condition
thanks Bob for reply
but when i can change c1 value its not automatically filter. i need when i can change c1 value its automatically filter. please help me RKS "Bob Phillips" wrote: In C1 enter =B1=$D$1 copy down and filter on column C -- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "RKS" wrote in message ... how can filter data with condition. i have data like this A B C D 1 a 10 2 b 20 3 c 10 4 d 40 5 e 10 when I enter any nos in D1 cell, my sheet filter (advance filter) with condition like d1 result A B C D 1 a 10 3 c 10 5 e 10 like this RKS |
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
filter with condition
How about this
Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) Const WS_RANGE As String = "D1" '<== change to suit On Error GoTo ws_exit Application.EnableEvents = False If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then If Me.AutoFilterMode Then Me.Cells.AutoFilter If Target.Value < "" Then Me.Columns(2).AutoFilter field:=1, Criteria1:=Target.Value End If End If ws_exit: Application.EnableEvents = True End Sub 'This is worksheet event code, which means that it needs to be 'placed in the appropriate worksheet code module, not a standard 'code module. To do this, right-click on the sheet tab, select 'the View Code option from the menu, and paste the code in. -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "RKS" wrote in message ... thanks Bob for reply but when i can change c1 value its not automatically filter. i need when i can change c1 value its automatically filter. please help me RKS "Bob Phillips" wrote: In C1 enter =B1=$D$1 copy down and filter on column C -- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "RKS" wrote in message ... how can filter data with condition. i have data like this A B C D 1 a 10 2 b 20 3 c 10 4 d 40 5 e 10 when I enter any nos in D1 cell, my sheet filter (advance filter) with condition like d1 result A B C D 1 a 10 3 c 10 5 e 10 like this RKS |
#5
Posted to microsoft.public.excel.misc
|
|||
|
|||
filter with condition
Hi Bob
Its not working pl give me other solution RKS How about this Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) Const WS_RANGE As String = "D1" '<== change to suit On Error GoTo ws_exit Application.EnableEvents = False If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then If Me.AutoFilterMode Then Me.Cells.AutoFilter If Target.Value < "" Then Me.Columns(2).AutoFilter field:=1, Criteria1:=Target.Value End If End If ws_exit: Application.EnableEvents = True End Sub 'This is worksheet event code, which means that it needs to be 'placed in the appropriate worksheet code module, not a standard 'code module. To do this, right-click on the sheet tab, select 'the View Code option from the menu, and paste the code in. -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "RKS" wrote in message ... thanks Bob for reply but when i can change c1 value its not automatically filter. i need when i can change c1 value its automatically filter. please help me RKS "Bob Phillips" wrote: In C1 enter =B1=$D$1 copy down and filter on column C -- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "RKS" wrote in message ... how can filter data with condition. i have data like this A B C D 1 a 10 2 b 20 3 c 10 4 d 40 5 e 10 when I enter any nos in D1 cell, my sheet filter (advance filter) with condition like d1 result A B C D 1 a 10 3 c 10 5 e 10 like this RKS |
#6
Posted to microsoft.public.excel.misc
|
|||
|
|||
filter with condition
Tad more info, and a tad less insistence?
-- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "RKS" wrote in message ... Hi Bob Its not working pl give me other solution RKS How about this Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) Const WS_RANGE As String = "D1" '<== change to suit On Error GoTo ws_exit Application.EnableEvents = False If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then If Me.AutoFilterMode Then Me.Cells.AutoFilter If Target.Value < "" Then Me.Columns(2).AutoFilter field:=1, Criteria1:=Target.Value End If End If ws_exit: Application.EnableEvents = True End Sub 'This is worksheet event code, which means that it needs to be 'placed in the appropriate worksheet code module, not a standard 'code module. To do this, right-click on the sheet tab, select 'the View Code option from the menu, and paste the code in. -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "RKS" wrote in message ... thanks Bob for reply but when i can change c1 value its not automatically filter. i need when i can change c1 value its automatically filter. please help me RKS "Bob Phillips" wrote: In C1 enter =B1=$D$1 copy down and filter on column C -- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "RKS" wrote in message ... how can filter data with condition. i have data like this A B C D 1 a 10 2 b 20 3 c 10 4 d 40 5 e 10 when I enter any nos in D1 cell, my sheet filter (advance filter) with condition like d1 result A B C D 1 a 10 3 c 10 5 e 10 like this RKS |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
lookup with multiple condition, but one condition to satisfy is en | Excel Worksheet Functions | |||
Filter Condition | Excel Discussion (Misc queries) | |||
Combine an OR condition with an AND condition | Excel Discussion (Misc queries) | |||
Condition 1 overules condition 2? | Excel Worksheet Functions | |||
"Criteria Range" in the "Data/Filter/Advanced Filter" to select Du | Excel Worksheet Functions |