title: Seperate listbox items to do a for each loop
body: <p>I'm having trouble seperating my listbox items, so I can run them in a loop. I know this atm takes all items and tries to run them through, however I don't know how to seperate them.
  The code is following:</p>
  
  <pre><code>Dim SelectedItems As String
  Dim LastRow As Long
  
  LastRow = ActiveSheet.Range("F1").SpecialCells(xlCellTypeLastCell).Row
  
  For i = 0 To ListBox2.ListCount - 1
  If ListBox2.Selected(i) = True Then
  SelectedItems = SelectedItems &amp; ListBox2.List(i) &amp; vbNewLine
  End If
  Next i
  
  If SelectedItems = "" Then
  MsgBox "Please select minimum one country"
  Else
  
  For Each SelectedItems In ListBox2
  
      For i = 11 To LastRow
  
      If Range("F" &amp; i).Value = SelectedItems Then
      Rows(i).EntireRow.Hidden = True
      Else: Rows(i).EntireRow.Hidden = False
      End If
  
      Next i
  Next SelectedItems
  </code></pre>
  
  <p>can someone assist?</p>