That's right!.. That's just what I said to Isladogs and MajP. Store each value, one value per record, in a regular child table so I can slice and dice the data with regular queries.
Obviously you can do that. That is what people have been doing for years. But that does not give the feel of the MVF combo. The idea was to give you some of the function of an MVF control. Expandable working on the combobox down arrow, checkboxes, ability to close the list. In my case in addition the ability to select all, deselect all, and order the list.
And that is what my original demo showed.
Interesting. Does that treeview control work in 64-bit Access? How are values selected from the tree stored? Are there cascading tables for each level of the tree?
Really? I thought multiselect list boxes used MVF's to store multiple selections.
I thought treeviews only worked in 32-bit Access because mscomctl.ocx cannot be used in 64-bit?
So how, for example, would a selection in the tree's 3rd level be stored in the table? Example: 4, M, M1 in your sample tree.
' Available Selections Recordset
Set AvailSelections _
= CurrentDb.OpenRecordset( _
"SELECT tblSelectionsTree.SelectionID, " & _
"tblSelectionsTree.SelectionText, " & _
"tblSelectionsTree.ParentID " & _
"FROM tblSelectionsTree;", _
RecordsetTypeEnum.dbOpenSnapshot)
' User's current selections Recordset
' Edited by MVF form
Set UserSelections _
= CurrentDb.OpenRecordset( _
"SELECT tblUserSelections.UserID_FK, " & _
"tblUserSelections.SelectionID_FK " & _
"FROM tblUserSelections " & _
"WHERE tblUserSelections.UserID_FK=" & Me.UserID & ";", _
RecordsetTypeEnum.dbOpenDynaset, _
RecordsetOptionEnum.dbFailOnError)
'--------------- Color -----------'
' Available Selections Recordset
Set AvailSelections _
= CurrentDb.OpenRecordset( _
"SELECT tblColorSelections.SelectionID, " & _
"tblColorSelections.SelectionText, " & _
"0 as ParentID " & _
"FROM tblColorSelections " & _
"ORDER BY tblColorSelections.SelectionText;", _
RecordsetTypeEnum.dbOpenSnapshot)
' User's current selections Recordset
' Edited by MVF form
Set UserSelections _
= CurrentDb.OpenRecordset( _
"SELECT tblUserColorSelections.UserID_FK, " & _
"tblUserColorSelections.SelectionID_FK " & _
"FROM tblUserColorSelections " & _
"WHERE tblUserColorSelections.UserID_FK=" & Me.UserID & ";", _
RecordsetTypeEnum.dbOpenDynaset, _
RecordsetOptionEnum.dbFailOnError)
No.
I've always noticed in field properties that you can choose multiselect yes/no for combo and list controls. So without the checkboxes, how does one multiselect, hold down the shift key and click on multiple values?
Can controls other than lists be used with mvf's and the checkboxes will appear?
Already provided you the demo along with a video presentation on how to do this.
There is a listbox, textbox, and combobox control designed for MVF. The checkboxes appear in the listbox and combobox. These are not the same controls as a multiselect listbox or standard combo.
and those controls are for exclusive use with mvf's, and cannot be adapted to work directly with normal tables, thus reason for mimicking them with popup modal form, right?
Depends on whether its a simple or extended multiselect listbox.
Have you looked at the Demo? As you asked the demo shows multiple ways to select multiple values and store in a normal junction table. The subform and pop up have checkboxes. The multi select does not. The crosstab uses just a click.
enum 2, extended, uses shift key, but none of those options display checkboxes.Depends on whether its a simple or extended multiselect listbox.
Public Function ConcatStates(CompanyName As String) As String
Dim rs As DAO.Recordset
Dim strOut As String
Set rs = CurrentDb.OpenRecordset("select State from qryUnionCompanyRegions where companyName = '" & CompanyName & "'")
Do While Not rs.EOF
If strOut = "" Then
strOut = rs!State
Else
strOut = strOut & ", " & rs!State
End If
rs.MoveNext
Loop
ConcatStates = strOut
End FunctionSELECT qryUnionCompanyRegions.CompanyName, concatStates([companyname]) AS Regions
FROM qryUnionCompanyRegions
GROUP BY qryUnionCompanyRegions.CompanyName, concatStates([companyname]);
