list box problem

[hitch_hiker]

my list box is supposed to be 2 columns , it appears to be only one, and the LinkCell shows 0 for all choices , what do i need to do, using excel2010

please, please

 

[GlennUK]

Is this embedded in a sheet? If so, what type of ListBox? Forms Control, or ActiveX Control?

 

[hitch_hiker]

it is in a worksheet, made by vba ( listed below ), I'm sure I have not done something , but I have no idea what

Sub Macro4()
'
' Macro4 Macro
'
'

  '
    ' find blank cell
    Dim adr As String, adrR1C1 As String
   
  Range("c10").Select
     Do
         If IsEmpty(ActiveCell) = False Then
         ActiveCell.Offset(1, 0).Select
         End If
     Loop Until IsEmpty(ActiveCell) = True
 
    ' load addr with blank cell reference
   adr = ActiveCell.Address(ReferenceStyle:=xlA1)
 
    ' create listbox and make LinkedCell = adr
   ActiveSheet.ListBoxes.Add(220.5, 240, 284.75, 51.75).Select
    
    With Selection
      .ListFillRange = "'product list'!$u$140:$v$500"
      '
        .LinkedCell = adr
        .MultiSelect = xlSimple
        .Display3DShading = False
    '
    
    
 End With
 
 Range("a15").Select
    
End Sub

I am trying to display 2 columns ( one the product id the other the description ) on selection I want to pass the product id to the LinkedCell

 

[Norie]

I don't think you can display more than one column in a Forms listbox.

 

[hitch_hiker]

thanks for that, could I use a combobox , I could concatenate the two cells, and use a landing cell and manipulate from there , but it poses a few thinking problems

 

[Norie]

Why not use an ActiveX listbox?

Mind you that still wouldn't give you the 2 values selected in the control source.

You could create code that concatenates the 2 values and put the result in a cell.

 

[hitch_hiker]

can I create the active x listbox using vba ? , this is only active when the "help" button is pressed.