Posuvník – Visual Basic – Fórum – Programujte.com

Potřebuji zjistit hodnotu posuvníku listboxu ve VB Excel. Poradí někdo?

Dík

ListBox1.ListIndex

Třeba:

Private Sub ListBox1_Click()

    Dim VybranaPolozka As String
    VybranaPolozka = ListBox1.List(ListBox1.ListIndex)
    ' ...
    
End Sub

Teď mě napadá, žes mohl myslet něco jinýho :).

Pokud máš třeba dva listboxy a chceš je syncnout, tak opravdu potřebuješ znát hodnoty jejich SrollBaru.

Ale ListBox takovou vlasnost nemá, aspoň ne ve VBA. ListBox1.VScroll.Value

Zjistit se to dá, ale chce to asi dvacet API funkcí. :(

Tady je něco: http://www.dbforums.com/microsoft-access/973824-sync-scrolling-two-listboxes.html