XL: Returning a Value from a List Box in Visual Basic

Last reviewed: March 2, 1998
Article ID: Q124214

The information in this article applies to:

Microsoft Excel 98 Macintosh Edition
Microsoft Excel 97 for Windows
Microsoft Excel for Windows 95, versions 7.0, 7.0a
Microsoft Excel for Windows, versions 5.0, 5.0c
Microsoft Excel for the Macintosh, versions 5.0, 5.0a

SUMMARY

In Microsoft Excel, there is no direct property to return the value selected in a list box using Visual Basic, Applications Edition macro code. To do this, use the index number of the list based on the selection, and use a combination of the List property and the ListIndex property.

MORE INFORMATION

Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact the Microsoft fee-based consulting line at (800) 936-5200. For more information about the support options available from Microsoft, please see the following page on the World Wide Web:

   http://www.microsoft.com/support/supportnet/refguide/default.asp

The List property returns all the values in the list box as an array of strings. The ListIndex property returns an integer indicating the position of the selected item within the List array. By combining these two properties, you can retrieve the selected text value. The following code example demonstrates how to retrieve the selected text value from a list box on a dialog sheet.

Visual Basic Code Example

   Sub GetSelectedListText()

      ' Display the dialog box.
      DialogSheets(1).Show

      ' Set a variable named "SelectedText" to the selected
      ' value in the list box.
      With DialogSheets(1).ListBoxes(1)
         SelectedText = .List(.ListIndex)
      End With

      ' Display the selected value in a message box.
      MsgBox SelectedText

   End Sub

Note: Instead of the using the ListIndex property of List, you could use the Value property of List. The Value property for a listbox will return a number from 1 to the number of items in the list.

Additional query words: 5.00 5.00a 5.00c 7.00 7.00a
Keywords : kbcode kbprg PgmHowto PgmOthr
Version : WINDOWS: 5.0,5.0c,7.0,7.0a; MACINTOSH: 5.0,5.0a
Platform : MACINTOSH WINDOWS
Issue type : kbhowto

THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY.

Last reviewed: March 2, 1998
© 1998 Microsoft Corporation. All rights reserved. Terms of Use.