ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Count number of selected item in Listbox (https://www.excelbanter.com/excel-programming/301398-count-number-selected-item-listbox.html)

Todd huttenstine

Count number of selected item in Listbox
 
Hey guys what is the code to count the number of selected
items in a listbox. I know how to count the total number
of items in a listbox but how do you count the total
number of items that are selected?


Thank you
Todd Huttenstine

Todd huttenstine

Count number of selected item in Listbox
 
This is a followup to my original post:

I came up with the following code...

Dim Counter As Long
Counter = 0
With ListBox1
For i = 0 To .ListCount - 1
ListValue = .List(i)
If .Selected(i) = True Then
Counter = Counter + 1
End If
Next
MsgBox Counter
End With

Can anyone tell me if there is a more effecient way of
doing this?


Thanks
Todd Huttenstine




-----Original Message-----
Hey guys what is the code to count the number of selected
items in a listbox. I know how to count the total number
of items in a listbox but how do you count the total
number of items that are selected?


Thank you
Todd Huttenstine
.


Tom Ogilvy

Count number of selected item in Listbox
 
Dim Counter As Long
Counter = 0
With ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) = True Then
Counter = Counter + 1
End If
Next
MsgBox Counter
End With

No reason to assign the list value to listvalue

Why are you worried about this? There is no built in count you can access.
You must have some pretty tight code if you are worried about this
efficiency.

--
Regards,
Tom Ogilvy

"Todd Huttenstine" wrote in message
...
This is a followup to my original post:

I came up with the following code...

Dim Counter As Long
Counter = 0
With ListBox1
For i = 0 To .ListCount - 1
ListValue = .List(i)
If .Selected(i) = True Then
Counter = Counter + 1
End If
Next
MsgBox Counter
End With

Can anyone tell me if there is a more effecient way of
doing this?


Thanks
Todd Huttenstine




-----Original Message-----
Hey guys what is the code to count the number of selected
items in a listbox. I know how to count the total number
of items in a listbox but how do you count the total
number of items that are selected?


Thank you
Todd Huttenstine
.




Bob Phillips[_6_]

Count number of selected item in Listbox
 
Dim i As Long
Dim c As Long

With Me.ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) Then
c = c + 1
End If
Next i
End With

MsgBox c & " items selected"


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Todd Huttenstine" wrote in message
...
Hey guys what is the code to count the number of selected
items in a listbox. I know how to count the total number
of items in a listbox but how do you count the total
number of items that are selected?


Thank you
Todd Huttenstine




Todd Htutenstine

Count number of selected item in Listbox
 
Thank you

Yes I need to count the number of selected items in the
listbox as a validation. I have items(week numbers for
each month) in the listbox tied to pivotfields(weeks worth
of data) in pivot tables. I have a pivot table underneath
the pivot table I am manipulating with the listbox. I
want to ensure that a user does not select more than 6
pivotfields (in the listbox) so it does not build the
pivot table on top of the second pivot table below. A
user will never need to select more than 6 months of data
because there are no more than 6 full/incomplete weeks in
any givin month.



Todd
-----Original Message-----
Dim Counter As Long
Counter = 0
With ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) = True Then
Counter = Counter + 1
End If
Next
MsgBox Counter
End With

No reason to assign the list value to listvalue

Why are you worried about this? There is no built in

count you can access.
You must have some pretty tight code if you are worried

about this
efficiency.

--
Regards,
Tom Ogilvy

"Todd Huttenstine"

wrote in message
...
This is a followup to my original post:

I came up with the following code...

Dim Counter As Long
Counter = 0
With ListBox1
For i = 0 To .ListCount - 1
ListValue = .List(i)
If .Selected(i) = True Then
Counter = Counter + 1
End If
Next
MsgBox Counter
End With

Can anyone tell me if there is a more effecient way of
doing this?


Thanks
Todd Huttenstine




-----Original Message-----
Hey guys what is the code to count the number of

selected
items in a listbox. I know how to count the total

number
of items in a listbox but how do you count the total
number of items that are selected?


Thank you
Todd Huttenstine
.



.



All times are GMT +1. The time now is 02:01 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com