Thread: [Solved] Find first rownumber in a filtered list
View Single Post
 
Old 07-11-2018, 05:59 AM
cosmicyes cosmicyes is offline Windows 7 64bit Office 2013
Novice
  
Join Date: Jan 2018
Posts: 8
cosmicyes is on a distinguished road
Default Find first rownumber in a filtered list
Hi,


I have got a filtered list in my worksheet "Daten" and the first visible row for example has the number 16.
IŽd like to get this value (16) by a little VBA Script.


This is what I have done so far:


Code:
Dim VisibleRange As Range

Dim FirstVisibleRow As Single
   
Set VisibleRange = Worksheets("Daten").AutoFilter.Range.SpecialCells(xlCellTypeVisible)
 
FirstVisibleRow = VisibleRange.Cells(1).Row

Result:
FirstVisibleRow is 1, not 16.


What is my mistake?


Thanks a lot in advance!
Reply With Quote