D
DW
I am trying to change a combobox's value for each record listed in a subform
I tried;
Private Sub Command10_Click()
line1:
Forms!laborcost.chargelaborsubform!Combo26.SetFocus
If Forms!laborcost.chargelaborsubform!Combo26 = "No" Then
Forms!laborcost.chargelaborsubform!Combo26 = "Yes"
DoCmd.GoToRecord , , acNext
GoTo line1
Else
Exit Sub
End If
End Sub
with no prevail, can you help?
DW
I tried;
Private Sub Command10_Click()
line1:
Forms!laborcost.chargelaborsubform!Combo26.SetFocus
If Forms!laborcost.chargelaborsubform!Combo26 = "No" Then
Forms!laborcost.chargelaborsubform!Combo26 = "Yes"
DoCmd.GoToRecord , , acNext
GoTo line1
Else
Exit Sub
End If
End Sub
with no prevail, can you help?
DW