Excel VBA Form Control - Reset Listbox Scroll Bar -


I have written the code below to draw data from six catalog boxes (multisvell) on a single sheet, for a calculation of selection Clear the module and then the list box selection. There is only one such issue which seems insignificant, though the very dismal list box is getting 'scroll bar' to reset its position at the top of the list for each list box.

I have tried. But I'm using a form control and not an ActiveX control, it does not support "object".

  sub-listboxesproperties_clic () 'store the list items listed in an array (as slow list) in the form of dim J as integer dim R, selected as an integer array Add item array reDim listarray (1 to 50, 1 to 6) '6 counter for J counter = 0 R = 1 lb = ActiveSheet listbox ("list box" & amp; r) l = for l = .Selected (i) = True then select '1 counter J = J + 1' in the array list (which, R) = Lb.list (i) end if next I = 0 next r 'check if there is a selection in the msgbox, if R goes out without R = 1 to 6, then in the first item of the listener If there is nothing, then the user does not have an option chosen if listarray (1, r) = "" then "message" you have not selected an option by hav e, please select and try again "Trend Linenem = Exit the next row input box on the name of the input box. If you are receiving, enter the name for the Advisory Call, Return Status etc.) "," Call Trends ") If Linnem =" MSBBX "has not been selected, please try again and get your call flow Enter a name for "Exit the sub-end if you call the URLCount (Listener, LinName), clear selection from ListBack 6 = 6 set for R = 1 lb = ActiveSheet.ListBoxes (" ListBox "& amp; R) I = 1 for LB.listContact - 1 if Lab. Selected (i) = true is LB. Selected = Fell & End Next I lb.TopIndex Next R & sub  

single The method I found is to clean and reinclude this value ...

xx (1 to 10000) string set o = activate. E = 1 o for E = 1 as the size ("list box 1"). Control format.listexax xx (e) = o Control format list (e) next o Control format Remove all for I = 1 eo. Control format.aditem xx (i) next o Control format.list index = 1

Because LISTindex first selects the element, but not active and you can not use the keyboard to go in. ..


Comments

Popular posts from this blog

sqlite3 - UPDATE a table from the SELECT of another one -

c# - Showing a SelectedItem's Property -

javascript - Render HTML after each iteration in loop -