Ver originalDim Sel As ListItemFor Each Sel In ListView1.ListItems If Sel.Selected Then MsgBox Sel.Text End IfNext Sel