Private Sub ComboBox1_Click() 'Mostramos un aviso MsgBox ("Has cliqueado sobre: " & ComboBox1.List(ComboBox1.ListIndex)) End Sub