vba - Check if listbox data exceeds its height

[Tornado1981]

Hi,
I need to check if a listbox data exceeds its height and if so resize listbox.
Is that possible?
Thank you.

 

[Worf]

Hi
Is it a User Form or sheet list box?
See if this page is useful:

Listbox AutoSize: Userform Setup

 

[mikerickson]

You could use code like this

Dim storeTopIndex As Long

With ListBox1
    storeTopIndex = .TopIndex
    .TopIndex = 1
    If .TopIndex = 0 Then
        MsgBox "box is taller than list"
    Else
        MsgBox "list is taller than box"
    End If
    .TopIndex = storeTopIndex
End With