VBA Width Property of ListBox ActiveX Control in Excel to sets or gets the distance between the Width the ListBox control and the Width of the userform or worksheet in points. In other words we use ‘Width’ property of list box to set the list box Width position.
ListBox_Width_Property – Syntax
Please find the below syntax of ListBox_Width_Property in Excel VBA.
ListboxName.Width=Width position in number format
Where ListboxName represents the ListBox object. In the above syntax we are using a ‘Width’ property of ListBox object to set the Width position.
ListBox_Width_Property – Explanation & Example
Here is the example for ListBox_Width_Property. It will take you through how to set Width property of list box using Excel VBA. Here you can find or see how we sets or gets Width property of list box manually or using code.
ListBox_Width_Property: Change Manually
Please find the following details how we are changing manually ‘Width’ of listbox property.
-
- Go To Developer Tab and then click Visual Basic from the Code or Press Alt+F11.
- Go To Insert Menu, Click UserForm. Please find the screenshot for the same.
-
- Drag a Listbox on the Userform from the Toolbox.
-
- Right click on the List box. Click on properties from the available list.
-
- Now you can find the properties window of listbox on the screen. Please find the screenshot for the same.
-
- On the Width side find ‘Width’ property from the available List Box properties.
- On the right side you can mention Width position in number format.
- For example, I have entered 231 (number). You can see same in the screen shot for your understand.
ListBox_Width_Property: Change Using Code
Please find the following details how we are changing Width_of listbox property with using Excel VBA code.
-
-
- Go To Developer Tab and then click Visual Basic from the Code or Press Alt+F11.
- Go To Insert Menu, Click UserForm. Please find the screenshot for the same.
-
-
-
- Drag a Listbox on the Userform from the Toolbox. Please find the screenshot for the same.
-
-
-
- Double Click on the UserForm, and select the Userform event as shown in the below screen shot.
-
-
-
- Now can see the following code in the module.
-
Private Sub UserForm_Initialize() End Sub
-
-
- Now, add the following example code1 to the in between above event procedure.
-
Example Code1:
'Width_Property of ListBox Control Private Sub UserForm_Initialize() With UserForm1.ListBox1 'ListBox Source Data .RowSource = "A2:B10" 'Below statement represents Width of the ListBox .Width = 100 'The below statement will show header in each column .ColumnHeads = True 'The following statement represents number of columns .ColumnCount = 2 End With End Sub
-
-
- Now, Press ‘F5’ to see the following Output.
-
Output: If Width =100
Please find the below output when we set Width_property value is 100. It is shown in the following Screen Shot.