trying to copy a range -problem in selecting the range

[navyaa]

I am trying to select a cells br3 to bs2000 which are on sheets MACROS and then after selecting them, i filter the columns based on a criteria and then finally i need to copy them over.

This is the code i have but there is some problem as it gives an error while selecting the cells...

Sheets("macros").Select
Range(br3, bs2000).Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="<>0", Operator:=xlAnd
Selection.Copy
ActiveWindow.SmallScroll Down:=-12
Range("BT3").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
Range("BR3").Select
Selection.AutoFilter

Please let me know whats wrong with this??
thank you
Navya

 

[SamS]

On 2002-10-08 17:24, navyaa wrote:
I am trying to select a cells br3 to bs2000 which are on sheets MACROS and then after selecting them, i filter the columns based on a criteria and then finally i need to copy them over.

This is the code i have but there is some problem as it gives an error while selecting the cells...

Sheets("macros").Select
Range(br3, bs2000).Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="<>0", Operator:=xlAnd
Selection.Copy
ActiveWindow.SmallScroll Down:=-12
Range("BT3").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
Range("BR3").Select
Selection.AutoFilter

Please let me know whats wrong with this??
thank you
Navya

try a : instead of a , in your range selection

 

[navyaa]

Thank you for your response...

Do you mean i should try using :
Range(br3:bs2000).Select

instead of Range(br3, bs2000).Select ???

I tried it but still gives me an error.

Thank you.

 

[johny]

enter in the range like this
Range("BR3:BS2000").Select
this should do the trick Thanks Johny

 

[SamS]

oops - forgot the " " as per Johny's post