I am trying to write the VBA code to select a cell in the 2nd to last visible row in a filtered list. I can get the cell value in 1st and last row but can't figure out how to move up the list.

ActiveSheet.AutoFilter.Range.Offset(0).SpecialCells(xlCellTypeVisible).Cells(vEnd, 2).Select

vEnd = last row
The 2nd to last row can be anything from 1 to (vEnd-1)

Thanks in advance
Paul