Combo Box "Selection" Get / Let
I'm using a combo box with style set to only allow choices from the fixed
list. the list is fed in as an array on form loading. Problem: I can't seem to get the syntax to highlight/select/boundvalue to get an initial election to show up instaed of a blank. Also need to be able to reset selection onscreen programatically based on other choices user makes on the form. simple version: Combobox1.list = array(1,2,3,4,5) Combobox1.___________ = 3 ' show "3"selected for initial form User clicks elsewhere on form Combobox1.___________ = 4 'selection should change to show 4 I know I'm missing something simple... Combobox1.value = Combobox1.value + 1 ' syntax works??/ since array is dynamic i have not resorted to testing listindex as it would require a search/match loop that should not be needed?? |
Combo Box "Selection" Get / Let
you are "missing" .listindex :) note that the List(array) in a control is 0 Based. to select the 3rd item: combobox.listindex=2 hth -- keepITcool | www.XLsupport.com | keepITcool chello nl | amsterdam Vacation's Over wrote : I'm using a combo box with style set to only allow choices from the fixed list. the list is fed in as an array on form loading. Problem: I can't seem to get the syntax to highlight/select/boundvalue to get an initial election to show up instaed of a blank. Also need to be able to reset selection onscreen programatically based on other choices user makes on the form. simple version: Combobox1.list = array(1,2,3,4,5) Combobox1.___________ = 3 ' show "3"selected for initial form User clicks elsewhere on form Combobox1.___________ = 4 'selection should change to show 4 I know I'm missing something simple... Combobox1.value = Combobox1.value + 1 ' syntax works??/ since array is dynamic i have not resorted to testing listindex as it would require a search/match loop that should not be needed?? |
Combo Box "Selection" Get / Let
thanks, needed this loop function to get the listindex# each time but it
works thanks. Public Function fcnFindIndex(myValue As Variant, myArray As Variant) Dim myitem As Variant Dim counter As Long counter = 0 For Each myitem In myArray If myitem = myValue Then fcnFindIndex = counter End If counter = counter + 1 Next myitem End Function "keepITcool" wrote: you are "missing" .listindex :) note that the List(array) in a control is 0 Based. to select the 3rd item: combobox.listindex=2 hth -- keepITcool | www.XLsupport.com | keepITcool chello nl | amsterdam Vacation's Over wrote : I'm using a combo box with style set to only allow choices from the fixed list. the list is fed in as an array on form loading. Problem: I can't seem to get the syntax to highlight/select/boundvalue to get an initial election to show up instaed of a blank. Also need to be able to reset selection onscreen programatically based on other choices user makes on the form. simple version: Combobox1.list = array(1,2,3,4,5) Combobox1.___________ = 3 ' show "3"selected for initial form User clicks elsewhere on form Combobox1.___________ = 4 'selection should change to show 4 I know I'm missing something simple... Combobox1.value = Combobox1.value + 1 ' syntax works??/ since array is dynamic i have not resorted to testing listindex as it would require a search/match loop that should not be needed?? |
Combo Box "Selection" Get / Let
just seems cumbersome to use
me.combobox1.list(me.combobox1.listindex) just to get the "selected" value "Vacation's Over" wrote: thanks, needed this loop function to get the listindex# each time but it works thanks. Public Function fcnFindIndex(myValue As Variant, myArray As Variant) Dim myitem As Variant Dim counter As Long counter = 0 For Each myitem In myArray If myitem = myValue Then fcnFindIndex = counter End If counter = counter + 1 Next myitem End Function "keepITcool" wrote: you are "missing" .listindex :) note that the List(array) in a control is 0 Based. to select the 3rd item: combobox.listindex=2 hth -- keepITcool | www.XLsupport.com | keepITcool chello nl | amsterdam Vacation's Over wrote : I'm using a combo box with style set to only allow choices from the fixed list. the list is fed in as an array on form loading. Problem: I can't seem to get the syntax to highlight/select/boundvalue to get an initial election to show up instaed of a blank. Also need to be able to reset selection onscreen programatically based on other choices user makes on the form. simple version: Combobox1.list = array(1,2,3,4,5) Combobox1.___________ = 3 ' show "3"selected for initial form User clicks elsewhere on form Combobox1.___________ = 4 'selection should change to show 4 I know I'm missing something simple... Combobox1.value = Combobox1.value + 1 ' syntax works??/ since array is dynamic i have not resorted to testing listindex as it would require a search/match loop that should not be needed?? |
Combo Box "Selection" Get / Let
with me.combobox1
msgbox .list(.listindex) end with Would make the typing a bit easier. Vacation's Over wrote: just seems cumbersome to use me.combobox1.list(me.combobox1.listindex) just to get the "selected" value "Vacation's Over" wrote: thanks, needed this loop function to get the listindex# each time but it works thanks. Public Function fcnFindIndex(myValue As Variant, myArray As Variant) Dim myitem As Variant Dim counter As Long counter = 0 For Each myitem In myArray If myitem = myValue Then fcnFindIndex = counter End If counter = counter + 1 Next myitem End Function "keepITcool" wrote: you are "missing" .listindex :) note that the List(array) in a control is 0 Based. to select the 3rd item: combobox.listindex=2 hth -- keepITcool | www.XLsupport.com | keepITcool chello nl | amsterdam Vacation's Over wrote : I'm using a combo box with style set to only allow choices from the fixed list. the list is fed in as an array on form loading. Problem: I can't seem to get the syntax to highlight/select/boundvalue to get an initial election to show up instaed of a blank. Also need to be able to reset selection onscreen programatically based on other choices user makes on the form. simple version: Combobox1.list = array(1,2,3,4,5) Combobox1.___________ = 3 ' show "3"selected for initial form User clicks elsewhere on form Combobox1.___________ = 4 'selection should change to show 4 I know I'm missing something simple... Combobox1.value = Combobox1.value + 1 ' syntax works??/ since array is dynamic i have not resorted to testing listindex as it would require a search/match loop that should not be needed?? -- Dave Peterson |
All times are GMT +1. The time now is 01:20 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com