Sharid
Well-known Member
- Joined
- Apr 22, 2007
- Messages
- 1,064
- Office Version
- 2016
- Platform
- Windows
I am currently using this to scroll down a listbox on a userform as the data goes into it. This works fine for colum A how do I set it to scroll down as data does into column B. I already have data in column A, I need it to scroll down as data goes into column B. Currenly as there is data in column A, when I click on start the listbox goes to the bottom of column A
VBA Code:
Userform1.ListBox1.ColumnCount = 2
Userform1.ListBox1.ColumnWidths = "200;200"
Userform1.ListBox1.RowSource = "'" & Sheet4.Name & "'!$A$1:$B$" & Sheet4.Cells(Sheet4.Rows.Count, 1).End(xlUp).Row
Userform1.ListBox1.ListIndex = Userform1.ListBox1.ListCount - 1