Here is one way to take action once an item has been selected from each list, but you haven't explained how to do the comparison or where the results go.
Private Sub ListBox1_Click()
Compare
End Sub
Private Sub ListBox2_Click()
Compare
End Sub
Private Sub Compare()
If Me.ListBox1.ListIndex >= 0 And _
Me.ListBox2.ListIndex >= 0 Then
' compare two items i want the sheet to show in 2 others cell sheet
' the numeric result value that is calculated in another sheet
' Remove current choices
Me.ListBox1.ListIndex = -1
Me.ListBox2.ListIndex = -1
End If
End Sub
Bookmarks