Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Form: Copy from one list box to another
I am creating a custom form and have two listboxes: source and target. I
want the users to be able to select a product in the source listbox and click the "Add" button that takes that selection and adds it to the target listbox. I tried the following to no avail: Private Sub AddButton_Click() 'Adds whatever is selected in the Source listbox to the Target listbox With LB_Target .AddItem LB_Source.Selected '<-Compile Error: Argument not optional End With End Sub Any suggestions/insights? Thanks. -- -SA |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Form: Copy from one list box to another
On Jul 28, 10:32 am, StumpedAgain
wrote: I am creating a custom form and have two listboxes: source and target. I want the users to be able to select a product in the source listbox and click the "Add" button that takes that selection and adds it to the target listbox. I tried the following to no avail: Private Sub AddButton_Click() 'Adds whatever is selected in the Source listbox to the Target listbox With LB_Target .AddItem LB_Source.Selected '<-Compile Error: Argument not optional End With End Sub Any suggestions/insights? Thanks. -- -SA Hello StumpedAgain, You need to use the current index of the source list box. The Selected property is used with List Boxes that have the MultiSelect property set. It takes a index number like this... LB_Source(1). You can then test it to see if the return value is True or False. Here is what you need... Private Sub AddButton_Click() With LB_Target .AddItem LB_Source.Value End With End Sub Sincerely, Leith Ross |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Form: Copy from one list box to another
Somthing like this
Private Sub CommandButton1_Click() With ListBox1 If .Value < "" Then ListBox2.AddItem .Value End If End With End Sub "StumpedAgain" wrote: I am creating a custom form and have two listboxes: source and target. I want the users to be able to select a product in the source listbox and click the "Add" button that takes that selection and adds it to the target listbox. I tried the following to no avail: Private Sub AddButton_Click() 'Adds whatever is selected in the Source listbox to the Target listbox With LB_Target .AddItem LB_Source.Selected '<-Compile Error: Argument not optional End With End Sub Any suggestions/insights? Thanks. -- -SA |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Form: Copy from one list box to another
The If thing didn't work, but I modified to the following to get it to work:
Private Sub AddButton_Click() 'Adds whatever is selected in the Source listbox to the Target listbox With LB_Target .AddItem LB_Source.Value End With End Sub Thanks -- -SA "Office_Novice" wrote: Somthing like this Private Sub CommandButton1_Click() With ListBox1 If .Value < "" Then ListBox2.AddItem .Value End If End With End Sub "StumpedAgain" wrote: I am creating a custom form and have two listboxes: source and target. I want the users to be able to select a product in the source listbox and click the "Add" button that takes that selection and adds it to the target listbox. I tried the following to no avail: Private Sub AddButton_Click() 'Adds whatever is selected in the Source listbox to the Target listbox With LB_Target .AddItem LB_Source.Selected '<-Compile Error: Argument not optional End With End Sub Any suggestions/insights? Thanks. -- -SA |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Form: Copy from one list box to another
Another add-on question:
If a user selects the product and adds it, how do I remove it from the origination listbox so that they can't select it more than once? I tried the following but however I seem to try it, I can only remove the first entry in the listbox, not the currently selected entry: Private Sub AddButton_Click() 'Adds whatever is selected in the Source listbox to the Target listbox With LB_Target .AddItem LB_Source.Value End With 'Removes the selected from the Source list so that it cannot be selected more than once With LB_Source .RemoveItem Selected.Count End With End Sub -- -SA "StumpedAgain" wrote: I am creating a custom form and have two listboxes: source and target. I want the users to be able to select a product in the source listbox and click the "Add" button that takes that selection and adds it to the target listbox. I tried the following to no avail: Private Sub AddButton_Click() 'Adds whatever is selected in the Source listbox to the Target listbox With LB_Target .AddItem LB_Source.Selected '<-Compile Error: Argument not optional End With End Sub Any suggestions/insights? Thanks. -- -SA |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Form: Copy from one list box to another
Thanks! Do you happen to know how to remove the selected item from a
listbox? I can remove the first item (and have done so in multiple ways), but can't seem to remove whichever is selected using a button. I tried variations of the following with no result: With LB_Source .RemoveItem LB_Source(Selected) End With -- -SA "Leith Ross" wrote: On Jul 28, 10:32 am, StumpedAgain wrote: I am creating a custom form and have two listboxes: source and target. I want the users to be able to select a product in the source listbox and click the "Add" button that takes that selection and adds it to the target listbox. I tried the following to no avail: Private Sub AddButton_Click() 'Adds whatever is selected in the Source listbox to the Target listbox With LB_Target .AddItem LB_Source.Selected '<-Compile Error: Argument not optional End With End Sub Any suggestions/insights? Thanks. -- -SA Hello StumpedAgain, You need to use the current index of the source list box. The Selected property is used with List Boxes that have the MultiSelect property set. It takes a index number like this... LB_Source(1). You can then test it to see if the return value is True or False. Here is what you need... Private Sub AddButton_Click() With LB_Target .AddItem LB_Source.Value End With End Sub Sincerely, Leith Ross |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Form: Copy from one list box to another
After scouring google, I finally found a solution that deletes the selected
entry in a list box: Dim i As Long With LB_Source For i = 0 To LB_Source.ListCount - 1 If LB_Source.Selected(i) Then .RemoveItem (i) End If Next i End With -- -SA "StumpedAgain" wrote: Thanks! Do you happen to know how to remove the selected item from a listbox? I can remove the first item (and have done so in multiple ways), but can't seem to remove whichever is selected using a button. I tried variations of the following with no result: With LB_Source .RemoveItem LB_Source(Selected) End With -- -SA "Leith Ross" wrote: On Jul 28, 10:32 am, StumpedAgain wrote: I am creating a custom form and have two listboxes: source and target. I want the users to be able to select a product in the source listbox and click the "Add" button that takes that selection and adds it to the target listbox. I tried the following to no avail: Private Sub AddButton_Click() 'Adds whatever is selected in the Source listbox to the Target listbox With LB_Target .AddItem LB_Source.Selected '<-Compile Error: Argument not optional End With End Sub Any suggestions/insights? Thanks. -- -SA Hello StumpedAgain, You need to use the current index of the source list box. The Selected property is used with List Boxes that have the MultiSelect property set. It takes a index number like this... LB_Source(1). You can then test it to see if the return value is True or False. Here is what you need... Private Sub AddButton_Click() With LB_Target .AddItem LB_Source.Value End With End Sub Sincerely, Leith Ross |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Adding custom list and text boxes to the custom tool bar from Excel C API | Excel Discussion (Misc queries) | |||
Adding custom list and text boxes to the custom tool bar from Excel C API | Excel Programming | |||
Copy form field value to another form (calendar) | Excel Programming | |||
2nd Form deselects list box items on main form | Excel Programming | |||
Can you sort a list based on catagory names without useing a custom list? | Excel Programming |