I need a Warning Popout Box!

[Z1nkstar]

I have this Database that people can add more items within orders, such as if we need a part from our Fabrication Department. . . . .We have a Guy that enters it in but sometimes forgets to check whos name it goes under so it doesnt assign itself to that persons form.I want a Warning Popout that States this."You have failed to Assign this Part""Please Check One of the Boxes Please"And it has an OK button so that they can Go back and make the changes.The Check boxes have names corresponding to another Form for a specific person. Each check box assigns that order to that persons form.I have Attached some pictures the names are as follows.PabloRubenLeo

[June7]

Can be only one checkbox selected? Suggest using radio buttons in an Option Group control. Or listbox or combobox.

Is this checkbox value saved to a field?

Why would you need a form for each person? Why not one form and apply filter criteria?

[Z1nkstar]

I didnt set it up that way I am coming behind a guy that got fired to try and fix some of the mistakes.

If you can see there are 4 check boxes but only 3 of them are used so I deleted the four which says Lenses.

I need a warning box that pops up if none of them are checked.

[Thompyt]

I learned this from the board (June7Helped)

Private Sub Action_Complete_Click()
If Me![Field Name] & "" = "" Then
[Checkbox Field Name] = False
MsgBox "You forgot to fill it in dude!"
Exit Sub
End If
End Sub

Hope this helps some

[Z1nkstar]

I have made this Code.

If ListDanville = False Then
    MsgBox "You forgot to fill in Who!"
    End If
If ListTeam1 = False Then
    MsgBox "You forgot to fill in Who!"
    End If
If ListTeam2 = False Then
    MsgBox "You forgot to fill in Who!"
    End If

And all it does is exit back to main form how can I get it to stay on the edit form???

[Z1nkstar]

Updated Code,
But still get the part were it goes back to main form.

this is code now

If ListDanville Or ListTeam1 Or ListTeam2 = False Then
    MsgBox "You forgot to fill in Who!"
    End If

[June7]

Since you want to verify that at least one of the checkboxes is checked, the code should be:

If ListDanville = False And ListTeam1 = False And ListTeam2 = False Then
MsgBox "You forgot to fill in Who!"
End If

However, that won't prevent multiple checkboxes checked. That's why I suggested alternatives.

Consider this:

If IIf(ListDanville = False, 0, 1) + IIf(ListTeam1 = False, 0, 1) + IIf(ListTeam2 = False, 0, 1) <> 1 Then
MsgBox "You either did not select Who or selected more than 1 - correct this!"
End If

Where did you put the code? Is it in the subform BeforeUpdate event?

Sub Form_BeforeUpdate(Cancel As Boolean)
If IIf(ListDanville = False, 0, 1) + IIf(ListTeam1 = False, 0, 1) + IIf(ListTeam2 = False, 0, 1) <> 1 Then
MsgBox "You either did not select Who or selected more than 1 - correct this!"
Cancel = True
End If
End Sub

[Z1nkstar]

Okay what I think you are trying to accomplish is non Multiple boxes being checked... Thats not my Case.

I want at least one box check when that form is left. . . .

I want a warning for when none of the check boxes are checked. . .

And when the warning opens it doesnt leave that form but goes back to edit the mistake.

[rpeare]

On your section that has the checkboxes select them all in design view, in the TAG property put in "REQ" or something similar.

On your button click you can then have something like:

dim ctl as control
dim iTotAnswered as long

for each ctl in me.controls 'this cycles through every control on the form, if you're using a tabbed form you can lock it down to a specific tab of the tab control
    if instr(ctl.tag, "REQ") > 0 then
        if ctl.value = -1 then
            iTotAnswered = iTotAnswered + 1
        endif
    endif
next ctl

if iTotAnswered = 0 then
    msgbox "HEY DUMMY FILL OUT A RESPONSIBLE PARTY", vbokonly, "DUMMY WARNING"
    exit sub
endif

'leave your other code here

this way if you ever add/remove stations all you have to do is make sure the checkbox has it's TAG property set and you're good.

[Z1nkstar]

Well my current code works but i need to stay on the edit form so that he can make his changes.

so is there a code to say dont close the form.

[June7]

I want at least one box check when that form is left. . . .

My code accomplishes that as well as prevent multiple selections. This could be incorporated into rpeare's more flexible code.

[Z1nkstar]

Okay used rpeare's code and it worked.