check if more then one record is selected within subform

[jaryszek]

Hi,

I have multisearch subform.

User can input value into unboud textbox, click button Search and subform will be requery with choosen results.
Next i want to give users possibility to click button "Add" and show choosen record (with all fields) in other unbound texboxes.



It is possible to check if user selected only one row or more ? (if more, mgsbox will be displayed).

Please help,
Best Wishes,
Jacek Antek

[ranman256]

i think access will present only 1 value if you ask:
msgbox subform.form.txtBox

no matter how many rows the user selects.

[jaryszek]

It is true (access will show values from 1 record of selection) but i want prevent user for doing that.
Sometimes user may not see accidentally that they choosed bad record.

Best Wishes,
Jacek

[Bulzie]

So the subform is a continuous form showing multiple records? And you are worried they will select 2 records before hitting your add button which you say opens another subform or puts the values in unbound fields on the Main form? The Add button is on the main form or subform?

[Micron]

What I can't figure out is, when the user clicks off the form where they have selected records, how would one maintain that selection when clicking on some part of the main form, or even another part of the same subform?? I don't think you can do this without providing a static selector, such as a checkbox. As soon as you click on your command button the selection will be no more.

[Micron]

Learned something today (again). Trick is to not put the event on the subform but rather the subform control, and that event would be the Exit event:

Private Sub Child5_Exit(Cancel As Integer) 'child 5 is the name of the subform control
If Forms!MyFormName!Child5.Form.SelHeight > 1 Then
   MsgBox "Can only select one record."
   Cancel = True
End If

End Sub

However, the subform selection will still be deselected when any control on the main form is clicked, so some handling of the selected record will have to be done in the same Exit event, such as getting Forms!MyFormName!Child5.Form.CurrentRecord.

[jaryszek]

Hi Guys,

thank you for all your tips and help.
Micron method is working !

Subform is datasheet view form.

Now, mouse_up event is triggering Micron code and show msgbox where user select more then 1 record.

Best Wishes,
Jacek

[Micron]

Glad we could help. Good luck with your project!