S
Sandy
On 'frmAllRepairs' I have two combo boxes - the first 'cboRepairCategory'
determines the list for the second:- 'cboRepairType' using the following
code:
Private Sub cboRepairCategory_AfterUpdate()
On Error Resume Next
Select Case cboRepairCategory.Value
Case "Grips"
cboRepairType.RowSource = "tblGrips"
Case "Loft and Lie"
cboRepairType.RowSource = "tblLoftAndLie"
Case "ReGlue"
cboRepairType.RowSource = "tblReGlue"
Case "Shafts"
cboRepairType.RowSource = "tblShafts"
End Select
End Sub
A selection is then made in the second combo box from say 'tblGrips'.
'tblGrips' has three fields
1) Repair Type (Text) - which supplies the values to the combo box
2) Unit Cost to Buy (Currency) - which I would like to appear automatically
in text box 'txtBuyPrice'
3)Unit Cost to Sell (Currency) - which I would like to appear automatically
in text box 'txtSellPrice'
Any ideas?
Sandy
determines the list for the second:- 'cboRepairType' using the following
code:
Private Sub cboRepairCategory_AfterUpdate()
On Error Resume Next
Select Case cboRepairCategory.Value
Case "Grips"
cboRepairType.RowSource = "tblGrips"
Case "Loft and Lie"
cboRepairType.RowSource = "tblLoftAndLie"
Case "ReGlue"
cboRepairType.RowSource = "tblReGlue"
Case "Shafts"
cboRepairType.RowSource = "tblShafts"
End Select
End Sub
A selection is then made in the second combo box from say 'tblGrips'.
'tblGrips' has three fields
1) Repair Type (Text) - which supplies the values to the combo box
2) Unit Cost to Buy (Currency) - which I would like to appear automatically
in text box 'txtBuyPrice'
3)Unit Cost to Sell (Currency) - which I would like to appear automatically
in text box 'txtSellPrice'
Any ideas?
Sandy