Give users ability to multi-select from list of items into cells with separator.
When you double-click any cell in that column, Multi-Select will be displayed allowing users to select multiple items in cell.
Cell then will have list of selected separated by comma.
Items are expected to be listed in column A in sheet named "Lists".
You may change list col, sheet, workbook as well as list separator in the call.
Access is limited.
Login here using your Linkedin account. to see or download code.
No registration, not another password to remember, login using your Linkedin account and have access to all public codes in Mydev.net
Linkedin Login
List column, ListSheet, Workbook, Separater
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = Range("D" & 1).Column Then
RetList = Frm6.ANmaMultiSelect(, "Lists")
If RetList = "ANmaMultiSelect-Clear" Then
Target.Value = ""
ElseIf RetList > "" Then
Target.Value = RetList
End If
Cancel = True
End If
End Sub
If Target.Column = Range("D" & 1).Column Then
RetList = Frm6.ANmaMultiSelect(, "Lists")
If RetList = "ANmaMultiSelect-Clear" Then
Target.Value = ""
ElseIf RetList > "" Then
Target.Value = RetList
End If
Cancel = True
End If
End Sub
Views 641
Downloads 167
CodeID
DB ID
