B4J Question [SOLVED] Customlistview jumptoitem issue

Sub FilterSearch As ResumableSub
    Dim lasti As Int = CLVItemList.Size
    CLVItemList.Clear
    For Each ID As sItemData In formSzamlaMain.sList
        Dim lID As sItemData = ID
        Dim Pnl As B4XView = xui.CreatePanel("")
        Pnl.SetLayoutAnimated(0, 0, 0, CLVItemList.AsView.Width, 100dip)
        If CLVItemList.Size = lasti Then
            ID.Tag = 10
        Else
            ID.Tag = 0
        End If
        CLVItemList.Add(Pnl, lID)
    Next
    frmszamlacikkek.Title = $" ${CLVItemList.Size} SZÁMLÁZOTT TERMÉKEK"$   
    CLVItemList.sv.Visible = True
    'If CLVItemList.Size > 0 Then
        'CLVItemList.JumpToItem(lasti)    <--------------------- doesn't work here
    '    Sleep(0)
    'End If
    Return True
End Sub

Sub CLVItemList_VisibleRangeChanged (FirstIndex As Int, LastIndex As Int)
    Dim ExtraSize As Int = 25 'List size
    For i = Max(0, FirstIndex - ExtraSize) To Min(LastIndex + ExtraSize, CLVItemList.Size - 1)
        Dim Pnl As B4XView = CLVItemList.GetPanel(i)
        If i > FirstIndex - ExtraSize And i < LastIndex + ExtraSize Then
            If Pnl.NumberOfViews = 0 Then 'Add each item/layout to the list/main layout
                Dim ID As sItemData = CLVItemList.GetValue(i)
                Pnl.LoadLayout("szamlasor")
                txtMenny.Text = ID.menny
                txtBruttoar.Text = ID.BruttoAr
                LblMegnevezes.Text = ID.megnevezes
                lblAFA.Text = ID.afa
                lblMe.Text = ID.ME
                If IsNumber(ID.Tag) And 10 = ID.Tag Then
                    txtMenny.RequestFocus       
                    CLVItemList.JumpToItem(lasti) '<-------------- does work here
                End If
            End If
        Else 'Not visible
            If Pnl.NumberOfViews > 0 Then
                Pnl.RemoveAllViews 'Remove none visible item/layouts from the list/main layout
            End If
        End If
    Next
End Sub