Hi,

I have an excel sheet, where i have about 10 activex command buttons forming a vertical menu. I have about 10 listboxes on top of each other. When i click a text box it populates the listbox with some data.

Now the problem is sometimes when i click on a button the list box loses its size and shrinks. This is what in buttons click event:

    lstProcedures.Visible = False
    lstPolicies.Visible = False
    lstForms.Visible = False
    lstTemplates.Visible = False
    lstHR.Visible = False
    
    With lstHealthSafety
        .Visible = True
        .Top = 12.75
        .Height = 495
        .Width = 184
        .Clear
        
        .AddItem "Safety Health and Welfare", 0
        .AddItem "Anti-Harassment & Bullying Policy", 1
        .AddItem "Accident Report Form", 2
        .AddItem "Incident Report Form", 3
'       .AddItem ""
    
    End With
I tried setting the height width and top properties but doesn't seem to work. Any idea what i'm doing wrong?

Thanks in advance.
Addy