Multiple slection from a list box / combo box then put the selction into a form

[macaulayrg2003]

I have a table of perssonel. I wish to be able to select either 1, 2 or 3 etc then put that seclection into a form. can this be done. I have tried to make a list box, combo box but cannot make multiple selection even though I have multi value selected on the look up propreties.

this is my basics table

ID	Personnel
1	SSHP
2	Ships Staff
3	ESHP
4	Contractor
5	NSI
6	Base Staff

can anybody help

[pkstormy]

When you set the multi-select to one of the settings which allows multiple values in a listbox, to get all the selected values from that listbox you'll need to write some vba code to walk through the items and see which ones are selected. You'll then need to figure out how you'll want to utilize the selected item values in the code. I'm pretty sure there are some listbox examples in the code repository.

[Missinglinq]

Here's an example. The items selected are used to create a String Variable, with a Comma between each item. The String in this example is then assigned to a Control named MyTextBox for display, using

Left(strNames, Len(strNames) - 1)

to strip away the final Comma. Replace MyListBox and MyTextBox with the actual names of these Controls on your Form.

Private Sub MyListBox_AfterUpdate()

Dim strNames As String

Dim varItem As Variant

For Each varItem In Me.MyListBox.ItemsSelected
  strNames = strNames & Me.MyListBox.ItemData(varItem) & ","
Next varItem

Me.MyTextBox = Left(strNames, Len(strNames) - 1)

End Sub

Linq ;0)>

[macaulayrg2003]

Hi Ling,

Thank you for the help, but I am stll at a loss, I suspect I put this code into the after update in the events tab in the property box of my combo box. However I only have the one list with 6 departments on it so I don't understand why I would have 2 boxes named mylistbox and mytextbox. I am sorry if I am being dense with this

Regards
macaulayrg2003

[Missinglinq]

You need to replace MyListBox, in the code, with the actual name of your Listbox, and MyTextBox with the actual name of the Textbox, on your Form, where you want to display these selections!

Linq ;0)>

[macaulayrg2003]

Cheers Ling,

Sorry about being a bit slow on the uptake. Got it to work now. I am trying to make a form with lots of Multi Value Fields, but it is driving me up the wall.

Cheers
macaulay

[Missinglinq]

Glad we could help!

Good luck with your project!

Linq ;0)>