[RESOLVED] Visible line count in MSHFlexGrid

[randem]

Is there anyway to get the number of lines that are visible in an MSHFlexgrid?

I need to go thru the data that is on the screen at present time and need to know the total number of visible lines.

[Nitesh]

If you are talkning about the number of visible rows, then you can loop through the rows like this:


I just whipped this up quickly. Hope it helps. Once you get the value of j where the first row that isn't visible occurs, you can work from there.

Dim isvisible As Boolean
With MSHFlexGrid1
    .Rows = 20
    .Cols = 2
    
    For j = 1 To MSHFlexGrid1.Rows - 1
        
        isvisible = .RowIsVisible(j)
        
        If isvisible = False Then
            
            MsgBox j
            Exit For
        
        End If
        
    Next j

End With

[randem]

Thanks,

Here's what i have come up with

Private Function GetVisibleRows(msh As MSHFlexGrid) As Long
Dim i As Long
Dim Count As Long
 
 
    With msh
    
        For i = .TopRow To .Rows - 1
            
            If .RowIsVisible(i) Then
                Count = Count + 1
            Else
                Exit For
            End If
            
        Next i
        
    End With
    
    GetVisibleRows = Count

[Nitesh]

my pleasure. I'm glad I could help. You have helped me many many times in the past