Autofilter from selected Range - VBA CODE

[KNKN9]

Hi ,

I have the code

 Sheet2.ActivateSheet2.Range("B5").End(xlToRight).Select
Range("B5").End(xlToRight).AutoFilter Field:=Range("B5").End(xlToRight), Criteria1:="IT6"

however, it does not seem to work. My aim is to select the last coloumn with data and this always starts from row 5. So I would like to autofilter "IT6" from the last column with data.

Thanks for help in advanced.

N.

 

[Fluff]

Try

Range("B5").End(xlToRight).AutoFilter Field:=Range("B5").End(xlToRight)[COLOR=#ff0000].Column[/COLOR], Criteria1:="IT6"

 

[KNKN9]

unfortunrly I still get a debug error saying 'Range class failed'

Try

Range("B5").End(xlToRight).AutoFilter Field:=Range("B5").End(xlToRight)[COLOR=#ff0000].Column[/COLOR], Criteria1:="IT6"