Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cycling through variables.
I have this code:
'Checks if the complee date fied has been completed Dim vDateComplete1 As Long vDateComplete1 = 0 If cboxDay1 < "" Then vDateComplete1 = vDateComplete1 + 1 End If If cboxMonth1 < "" Then vDateComplete1 = vDateComplete1 + 1 End If If cboxYear1 < "" Then vDateComplete1 = vDateComplete1 + 1 End If If vDateComplete1 < (0 Or 3) Then MsgBox "Please complete the date field" cboxDay1.SetFocus End If and three combo boxes for day, month and year. The problem is I have 15 of these date fields to check and although I know how to cycle though a spreadsheet (For Rownumber = 1 to ....), I do not know how to cycle through fields in a form. i.e. I have cboxDay1, cboxDay2 .... and I do not know how to varibalise it ?? I was given the code With Me.Controls("ComboBox" & i) to fill the boxes but unsure what the "Controls" part of the code does and if to use it for the next part of the code. Please help - my spreadsheet is looking so jammy with loads and loads of uneccessary code. cheers Aaron |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cycling through variables.
This might help get you started
'----------------------------------------------------------------- Private Sub SetComboboxes() '----------------------------------------------------------------- Dim ctl As msforms.Control For Each ctl In Me.Controls If TypeName(ctl) = "ComboBox" Then ctl.AddItem 1 ctl.AddItem 2 End If Next ctl End Sub -- HTH RP "Azza" wrote in message m... I have this code: 'Checks if the complee date fied has been completed Dim vDateComplete1 As Long vDateComplete1 = 0 If cboxDay1 < "" Then vDateComplete1 = vDateComplete1 + 1 End If If cboxMonth1 < "" Then vDateComplete1 = vDateComplete1 + 1 End If If cboxYear1 < "" Then vDateComplete1 = vDateComplete1 + 1 End If If vDateComplete1 < (0 Or 3) Then MsgBox "Please complete the date field" cboxDay1.SetFocus End If and three combo boxes for day, month and year. The problem is I have 15 of these date fields to check and although I know how to cycle though a spreadsheet (For Rownumber = 1 to ....), I do not know how to cycle through fields in a form. i.e. I have cboxDay1, cboxDay2 .... and I do not know how to varibalise it ?? I was given the code With Me.Controls("ComboBox" & i) to fill the boxes but unsure what the "Controls" part of the code does and if to use it for the next part of the code. Please help - my spreadsheet is looking so jammy with loads and loads of uneccessary code. cheers Aaron |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Tab keeps cycling through the same row | Excel Discussion (Misc queries) | |||
Cycling through workbooks | Excel Discussion (Misc queries) | |||
Cycling through predefined worksheets | Excel Programming | |||
Cycling though all sheets in the workbook | Excel Programming | |||
Cycling through worksheets | Excel Programming |