How to get selected value in multicolumn listbox

by

you can use this code

Private Sub CommandButton3_Click()
    Dim strng As String
    Dim lCol As Long, lRow As Long

    With Me.ListBox1 '<--| refer to your listbox: change "ListBox1" with your actual listbox name
        For lRow = 0 To .ListCount - 1 '<--| loop through listbox rows
            If .selected(lRow) Then '<--| if current row selected
                For lCol = 0 To .ColumnCount - 1 '<--| loop through listbox columns
                    strng = strng & .List(lRow, lCol) & " | " '<--| build your output string
                Next lCol
                MsgBox "you selected" & vbCrLf & Left(strng, (Len(strng) - 1)) '<--| show output string (after removing its last character ("|"))
                Exit For '<-_| exit loop
            End If
        Next lRow
    End With
End Sub

More Related Contents:

  1. VBA Excel Populate ListBox with multiple columns
  2. How to filter listbox values based on a Textbox value
  3. VBA – destroy a modeless UserForm instance properly
  4. Excel VBA Userform – Execute Sub when something changes
  5. Excel Useform: How to hide application but have icon in the taskbar
  6. How to error handle 1004 Error with WorksheetFunction.VLookup?
  7. How can Excel VBA open file using default application
  8. How to compare two entire rows in a sheet
  9. Run same excel macro on multiple excel files
  10. VBA : save a file with UTF-8 without BOM
  11. Saving a Excel File into .txt format without quotes
  12. Passing variable from Form to Module in VBA
  13. VBA – Range to jpg picture
  14. Fastest way to delete rows which cannot be grabbed with SpecialCells
  15. Combine multiple Excel workbooks into a single workbook
  16. Excel Macro, inserting internationally valid formula during run-time
  17. Making VBA Form TextBox accept Numbers only (including +, – and .)
  18. VBA Convert date to week number
  19. Inserting an Online Picture to Excel with VBA
  20. Change length of For loop while in the loop
  21. VBA – Run Time Error 1004 ‘Application Defined or Object Defined Error’
  22. Consolidating worksheets into one
  23. Copy filtered data to another sheet using VBA
  24. Range.Find on a Date That is a Formula
  25. Range() vs Cells() vs Range.Cells()
  26. Add new row to excel Table (VBA)
  27. VBA Function argument list select
  28. VBA recognizing workbook by partial name
  29. Run-time error ’91’ (Object variable or With block variable not set)
  30. Loop through cells and add to a range

Leave a Comment