Increase max Options in an Option Group

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Access 2003 Windows XP Pro

The Option Group Wizard is limiting me to 20 options, and I cannot find a
tool/method/option where it can be changed. I am wanting to build an alpha
selection group of 27 Items (26 letters + 1 for all) which I have seen used
by others.

The Northwinds sample includes such an option group on the footer of a form.

Any hints or tricks or work-arounds out there.

TIA
 
You don't need to use the wizard to add more than 20. You can add options
after the wizard is finished.

The Corp Tech Demos has a Customer Menu form with all customers in alpha
order in a column on the left side of the form. There is a tall command
button to the right of the customers that allows the selection of a letter.
As your mouse moves vertically on the command button, its caption changes
from A at the top to Z at the bottom. The user just clicks when the
appropriate letter is displayed.

The code in the mouse move event of the command button is:
Private Sub cmdIndex_MouseMove( _
Button As Integer, Shift As Integer, _
X As Single, Y As Single)
Dim strChr As String
strChr = Chr(CInt(Y / Me.cmdIndex.Height * 25 + 65))
If Me.cmdIndex.Caption <> strChr Then
Me.cmdIndex.Caption = strChr
End If
End Sub

The On Click event of the command button sets the focus to the customer
subform and finds the appropriate letter. The code could be modified to
filter the subform records rather than finding.

Private Sub cmdIndex_Click()
Me.sfrmCustomers.SetFocus
Me![sfrmCustomers].Form![CompanyName].SetFocus
DoCmd.FindRecord Me.cmdIndex.Caption, acStart
End Sub
 
Access 2003 Windows XP Pro

The Option Group Wizard is limiting me to 20 options, and I cannot find a
tool/method/option where it can be changed. I am wanting to build an alpha
selection group of 27 Items (26 letters + 1 for all) which I have seen used
by others.

The Northwinds sample includes such an option group on the footer of a form.

Any hints or tricks or work-arounds out there.

TIA
Click to expand...

Is it the Wizard that is limiting your adding more options, or is it
Access itself. You don't need the wizard.
Add the 20 using the wizard, then add more by dragging additional
radio buttons into the group. I just created an option group with 23
buttons. No problem.
 
Thanks Duane,

A precise, complete and functional answer. Problem now solved!
Fully consistent with the answers you so generously and regularly provide to
users of this discussion group. You are a true asset here Duane. Thanks from
me and on behalf of others.

Cheers .....Keith

Duane Hookom said:
You don't need to use the wizard to add more than 20. You can add options
after the wizard is finished.

The Corp Tech Demos has a Customer Menu form with all customers in alpha
order in a column on the left side of the form. There is a tall command
button to the right of the customers that allows the selection of a letter.
As your mouse moves vertically on the command button, its caption changes
from A at the top to Z at the bottom. The user just clicks when the
appropriate letter is displayed.

The code in the mouse move event of the command button is:
Private Sub cmdIndex_MouseMove( _
Button As Integer, Shift As Integer, _
X As Single, Y As Single)
Dim strChr As String
strChr = Chr(CInt(Y / Me.cmdIndex.Height * 25 + 65))
If Me.cmdIndex.Caption <> strChr Then
Me.cmdIndex.Caption = strChr
End If
End Sub

The On Click event of the command button sets the focus to the customer
subform and finds the appropriate letter. The code could be modified to
filter the subform records rather than finding.

Private Sub cmdIndex_Click()
Me.sfrmCustomers.SetFocus
Me![sfrmCustomers].Form![CompanyName].SetFocus
DoCmd.FindRecord Me.cmdIndex.Caption, acStart
End Sub

--
Duane Hookom
MS Access MVP


The Grape Hunter said:
Access 2003 Windows XP Pro

The Option Group Wizard is limiting me to 20 options, and I cannot find a
tool/method/option where it can be changed. I am wanting to build an
alpha
selection group of 27 Items (26 letters + 1 for all) which I have seen
used
by others.

The Northwinds sample includes such an option group on the footer of a
form.

Any hints or tricks or work-arounds out there.

TIA
Click to expand...
Click to expand...
 
Thanks fred...?

Good effective answer. I received a similar and fully consistent answer
from Duane H. My issue has been resolved. I appreciate your time and effort
in responding.

Cheers .....Keith
 
Thanks Keith...

--
Duane Hookom
MS Access MVP


The Grape Hunter said:
Thanks Duane,

A precise, complete and functional answer. Problem now solved!
Fully consistent with the answers you so generously and regularly provide
to
users of this discussion group. You are a true asset here Duane. Thanks
from
me and on behalf of others.

Cheers .....Keith

Duane Hookom said:
You don't need to use the wizard to add more than 20. You can add options
after the wizard is finished.

The Corp Tech Demos has a Customer Menu form with all customers in alpha
order in a column on the left side of the form. There is a tall command
button to the right of the customers that allows the selection of a
letter.
As your mouse moves vertically on the command button, its caption changes
from A at the top to Z at the bottom. The user just clicks when the
appropriate letter is displayed.

The code in the mouse move event of the command button is:
Private Sub cmdIndex_MouseMove( _
Button As Integer, Shift As Integer, _
X As Single, Y As Single)
Dim strChr As String
strChr = Chr(CInt(Y / Me.cmdIndex.Height * 25 + 65))
If Me.cmdIndex.Caption <> strChr Then
Me.cmdIndex.Caption = strChr
End If
End Sub

The On Click event of the command button sets the focus to the customer
subform and finds the appropriate letter. The code could be modified to
filter the subform records rather than finding.

Private Sub cmdIndex_Click()
Me.sfrmCustomers.SetFocus
Me![sfrmCustomers].Form![CompanyName].SetFocus
DoCmd.FindRecord Me.cmdIndex.Caption, acStart
End Sub

--
Duane Hookom
MS Access MVP


The Grape Hunter said:
Access 2003 Windows XP Pro

The Option Group Wizard is limiting me to 20 options, and I cannot find
a
tool/method/option where it can be changed. I am wanting to build an
alpha
selection group of 27 Items (26 letters + 1 for all) which I have seen
used
by others.

The Northwinds sample includes such an option group on the footer of a
form.

Any hints or tricks or work-arounds out there.

TIA
Click to expand...
Click to expand...
Click to expand...
 
Back
Top