B
Boss
Hi,
what does this gives an error.
Sub compare()
Sheets("new").Select
lr = Cells(65536, 1).End(xlUp).Row
lc = Range("IV1").End(xlToLeft).Column
'Range(Cells(1, 1), Cells(lr, lc)).Select
Sheets("old").Select
Range("A11044").AdvancedFilter Action:=xlFilterInPlace,
CriteriaRange:= _
Sheets("new").Range(lr, lc), Unique:=False
please help
Thanks!
Boss
what does this gives an error.
Sub compare()
Sheets("new").Select
lr = Cells(65536, 1).End(xlUp).Row
lc = Range("IV1").End(xlToLeft).Column
'Range(Cells(1, 1), Cells(lr, lc)).Select
Sheets("old").Select
Range("A11044").AdvancedFilter Action:=xlFilterInPlace,
CriteriaRange:= _
Sheets("new").Range(lr, lc), Unique:=False
please help
Thanks!
Boss