Quitar selección items listbox
Publicado por Alfonso (14 intervenciones) el 13/02/2015 10:13:57
Tengo muchas hojas y practicamente en todas tengo listbox y quiero que en estos listbox no tenga ningun item seleccionado. Adjunto el código que me proporcionaron para una unica hoja y para esa hoja si me funciona. Pero copio el código cambiando el nombre de cada listbox correspondiente en cada hoja correspondiente a esos listbox pero no me funciona. Que estoy haciendo mal?
Private Sub Worksheet_Activate()
Dim F As Long
For F = 0 To ListBox1.ListCount
ListBox1.Selected(F) = False
Next F
End Sub
Private Sub Worksheet_Activate()
Dim F As Long
For F = 0 To ListBox1.ListCount
ListBox1.Selected(F) = False
Next F
End Sub
Valora esta pregunta


0