View Single Post
 
Old 11-28-2021, 02:45 PM
Logit Logit is offline Windows 10 Office 2007
Expert
 
Join Date: Jan 2017
Posts: 533
Logit is a jewel in the roughLogit is a jewel in the roughLogit is a jewel in the rough
Default

Does this work :


Code:
Ass_Num = Intersect(acrow, tblColumns("Asset" & Chr(10) & "Number").Range)
    Sheets("backup").Select
    
With ActiveSheet
    .ListObjects("Customers").Range.AutoFilter Field:=6, Criteria1:=Ass_Num ' filters rows, but the table looses the focus

     Columns(1).Cells.SpecialCells(xlCellTypeVisible).Cells(1).Select

End With
Reply With Quote