For each.. Next statement with listbox

Matt

Board Regular
Joined
Feb 16, 2002
Messages
212
I have a listbox which allows multiple items to be selected. I would like to use a "For Each 'selected item' in 'listbox'" type statement for each item that has been selected. Is this possible? If so, please advise.

Thanks in advance

Matt
This message was edited by Matt on 2002-10-18 10:03
 

Excel Facts

What is the shortcut key for Format Selection?
Ctrl+1 (the number one) will open the Format dialog for whatever is selected.

Andrew Poulsom

MrExcel MVP
Joined
Jul 21, 2002
Messages
73,092
You can't use the For Each next construct - that only applies to collections.

Use a For next loop like this:

Code:
Sub Test()
   Dim i As Integer
   For i = 0 To ListBox1.ListCount -1
      If ListBox.Selected(i) Then
'        *** Replace next line with your code ***
         MsgBox ListBox1.List(i) & "is selected" 
      End If
   Next i
End Sub
 

Forum statistics

Threads
1,144,050
Messages
5,722,234
Members
422,417
Latest member
Johhny

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top