seleccionar celdas de manera independiente y ejecutar macro
publicado
Tengo un Formulario el cual lleno con un listbox el cual paso a celdas que son de la b8 a b32 y después la lista continua de la h8 a h57 y necesito que cualquiera que seleccione de estas ejecute la macro hasta este momento solo puedo hacerlo con una en especifico o en rango pero necesito que pueda seleccionar cualquiera de las mencionadas les paso el código como lo tengo. Gracias
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
If Selection.Address <> "$B$8" Then
MsgBox "SELECCIONE CELDAS DE PRODCUTOS " & ElRango
Exit Sub
Else
With ListIndex = "b8"
ActiveCell = ListBox1
ActiveCell.Offset(1, 0).Select
ListBox1.ListIndex = -1
End With
End If
End Sub
* Te recomenda
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Tengo un Formulario el cual lleno con un listbox el cual paso a celdas que son de la b8 a b32 y después la lista continua de la h8 a h57 y necesito que cualquiera que seleccione de estas ejecute la macro hasta este momento solo puedo hacerlo con una en especifico o en rango pero necesito que pueda seleccionar cualquiera de las mencionadas les paso el código como lo tengo. Gracias
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
If Selection.Address <> "$B$8" Then
MsgBox "SELECCIONE CELDAS DE PRODCUTOS " & ElRango
Exit Sub
Else
With ListIndex = "b8"
ActiveCell = ListBox1
ActiveCell.Offset(1, 0).Select
ListBox1.ListIndex = -1
End With
End If
End Sub
* Te recomenda