Hi,

I figure it out.


  For i = 1 To .ListItems.Count
  If .ListItems(i).Checked = True Then
Thanks.