Using variable for range address

If Range("h9").Value = "N" Then
Selection.AutoFilter Field:=1, Criteria1:="+"
End If

I want to be able to replace "h9" with a variable that i can change
frequently. (ie h9, j12,or whatever cell address i want to use).

I have tried ....
Dim Ant string
Ant = "h9"
If Range("Ant").Value = "N" Then
Selection.AutoFilter Field:=1, Criteria1:="+"
End If

This however does not work. I am not sure of the proper syntax to achieve
this goal.


Thanks in advance--
dr chuck

take the quotes away from ANT - with quotes, you are referring to a
named range ANT, without you are referring to the variable - so

if range(ant).value etc

Dim Ant as String
Ant="H9"
if range(Ant).value="N" then

HTH
--
AP

"dr chuck" <[email protected]> a écrit dans le message de
news: [email protected]...
>
>
> If Range("h9").Value = "N" Then
> Selection.AutoFilter Field:=1, Criteria1:="+"
> End If
>
> I want to be able to replace "h9" with a variable that i can change
> frequently. (ie h9, j12,or whatever cell address i want to use).
>
> I have tried ....
> Dim Ant string
> Ant = "h9"
> If Range("Ant").Value = "N" Then
> Selection.AutoFilter Field:=1, Criteria1:="+"
> End If
>
> This however does not work. I am not sure of the proper syntax to achieve
> this goal.
>
>
> Thanks in advance--
> dr chuck

Remove the ""

>Dim Ant string
>Ant = "h9"
> If Range(Ant).Value = "N" Then
> Selection.AutoFilter Field:=1, Criteria1:="+"
> End If

[email protected]

--
Message posted via http://www.officekb.com

thanks guys .. for the immediate help

--
dr chuck


"Crowbar via OfficeKB.com" wrote:

> Remove the ""
>
> >Dim Ant string
> >Ant = "h9"
> > If Range(Ant).Value = "N" Then
> > Selection.AutoFilter Field:=1, Criteria1:="+"
> > End If
>
> [email protected]
>
> --
> Message posted via http://www.officekb.com
>