I have a Access form. On it I have the exact same code 4 times. I do not know how to write modules and I would like to learn how to using this code.
Code:
Dim i As Integer
If IsNull(Me.NumTrucks) Then
GoTo One
Else
For i = 1 To 17
Me("A" & i).Enabled = Me.NumTrucks >= 1
Me("B" & i).Enabled = Me.NumTrucks >= 2
Me("C" & i).Enabled = Me.NumTrucks >= 3
Me("D" & i).Enabled = Me.NumTrucks >= 4
Me("E" & i).Enabled = Me.NumTrucks >= 5
Me("F" & i).Enabled = Me.NumTrucks >= 6
Me("G" & i).Enabled = Me.NumTrucks >= 7
Me("H" & i).Enabled = Me.NumTrucks >= 8
Me("J" & i).Enabled = Me.NumTrucks >= 9
Next
One:
End If
And this code works in the 4 instances I mentioned. So how it works is each section "A", "B", etc... has 17 fields in each one, and yes before anyone asks or says anything, all 17 for each one are needed. When you change, exit, click previous button, or next button this code will enable the fields associated with the number input in the "NumTrucks" field. So for instance if if I put 3 in the "NumTrucks" field, then fields for "A", "B", and "C" will become enabled and allow me to input data there.
I have tried to simply copy and paste the code to a module, make it a public Function and go that route, but as everyone that is way above my level on this can see, I ran into problems. Guidance please.