Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Hello,
I tried to use a combo box to create a list, but after posting a question on this site, the only info I got about selecting more than one item from the list was to use a macro to put info in a separate cell. I then tried the list box on the forms menu and this allows me to select multiple items by holding down the control key. this is exactly what I wanted. However, is there a way to make this list a drop-down list instead of a basic list with double arrows? (I don't want to have to use more than one cell) thanks Jen |
#2
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
never mind, I just noticed the macro example from earlier has different tabs
and there is one that does exactly what I need! "jen_writer" wrote: Hello, I tried to use a combo box to create a list, but after posting a question on this site, the only info I got about selecting more than one item from the list was to use a macro to put info in a separate cell. I then tried the list box on the forms menu and this allows me to select multiple items by holding down the control key. this is exactly what I wanted. However, is there a way to make this list a drop-down list instead of a basic list with double arrows? (I don't want to have to use more than one cell) thanks Jen |
#3
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
ok but, I want to use a combo box instead of the cell validation. what do I
need to change in the below macro? Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) Dim rngDV As Range Dim oldVal As String Dim newVal As String If Target.Count 1 Then GoTo exitHandler On Error Resume Next Set rngDV = Cells.SpecialCells(xlCellTypeAllValidation) On Error GoTo exitHandler If rngDV Is Nothing Then GoTo exitHandler If Intersect(Target, rngDV) Is Nothing Then 'do nothing Else Application.EnableEvents = False newVal = Target.Value Application.Undo oldVal = Target.Value Target.Value = newVal If Target.Column = 3 Then If oldVal = "" Then 'do nothing Else If newVal = "" Then 'do nothing Else Target.Value = oldVal _ & ", " & newVal End If End If End If End If exitHandler: Application.EnableEvents = True End Sub "jen_writer" wrote: never mind, I just noticed the macro example from earlier has different tabs and there is one that does exactly what I need! "jen_writer" wrote: Hello, I tried to use a combo box to create a list, but after posting a question on this site, the only info I got about selecting more than one item from the list was to use a macro to put info in a separate cell. I then tried the list box on the forms menu and this allows me to select multiple items by holding down the control key. this is exactly what I wanted. However, is there a way to make this list a drop-down list instead of a basic list with double arrows? (I don't want to have to use more than one cell) thanks Jen |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Select End of list in formula? | Excel Worksheet Functions | |||
Advanced filter and a list | New Users to Excel | |||
select list by selecting a cell | Excel Worksheet Functions | |||
Extract each item in the list | Excel Worksheet Functions | |||
Extracting/look up data from a list and select multiple instances | Excel Worksheet Functions |