Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
ComboBox Query
I have a number of comboboxes on a userform.
They share a common prefix in their name and are then numbered i.e. cbx1, cbx2, cbx3 etc. I want to run a For .... Next procedure with these comboboxes, and am wondering how to refer to them within this procedure - i.e "cbx" & (whatever number - starting at 1 through to 10) Is this possible? Thanking you in advance! Edi |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
ComboBox Query
Option Explicit
Private Sub CommandButton1_Click() Dim ctrl As Control Dim iCtr As Long For iCtr = 1 To 10 Set ctrl = Me.Controls("cbx" & iCtr) 'do what you want??? 'clear the combobox ctrl.ListIndex = -1 Next iCtr End Sub You could also loop through the controls and work on just the comboboxes. Option Explicit Private Sub CommandButton1_Click() Dim ctrl As Control For each ctrl in me.controls if typeof ctrl is msforms.combobox then ctrl.listindex = -1 end if next ctrl End Sub Blobbies wrote: I have a number of comboboxes on a userform. They share a common prefix in their name and are then numbered i.e. cbx1, cbx2, cbx3 etc. I want to run a For .... Next procedure with these comboboxes, and am wondering how to refer to them within this procedure - i.e "cbx" & (whatever number - starting at 1 through to 10) Is this possible? Thanking you in advance! Edi -- Dave Peterson |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
ComboBox Query
Thank you Dave!! I was close in my trial and error attempts, but I'm not
sure whether I would have got there in the end or not!!! Edi "Dave Peterson" wrote: Option Explicit Private Sub CommandButton1_Click() Dim ctrl As Control Dim iCtr As Long For iCtr = 1 To 10 Set ctrl = Me.Controls("cbx" & iCtr) 'do what you want??? 'clear the combobox ctrl.ListIndex = -1 Next iCtr End Sub You could also loop through the controls and work on just the comboboxes. Option Explicit Private Sub CommandButton1_Click() Dim ctrl As Control For each ctrl in me.controls if typeof ctrl is msforms.combobox then ctrl.listindex = -1 end if next ctrl End Sub Blobbies wrote: I have a number of comboboxes on a userform. They share a common prefix in their name and are then numbered i.e. cbx1, cbx2, cbx3 etc. I want to run a For .... Next procedure with these comboboxes, and am wondering how to refer to them within this procedure - i.e "cbx" & (whatever number - starting at 1 through to 10) Is this possible? Thanking you in advance! Edi -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Combobox Query | Excel Programming | |||
Combobox query? | Excel Programming | |||
ComboBox Filled by Query | Excel Programming | |||
Combobox query | Excel Discussion (Misc queries) | |||
Combobox Query | Excel Programming |