Editar registro en un listbox

Chicos tengo un listbox donde visualizo datos de las hojas de excel. Me gustaría poder modificar modificarlos pero no se como.

He conseguido eliminarlos y seleccionar los datos en la hoja.

' Para eliminar los registros
Private Sub Eliminar_Click()
Dim pregunta As Variant
If Me.programes.ListIndex < 0 Then
MsgBox "sin selección", vbExclamation
Else
pregunta = MsgBox("se elimina?", vbYesNo + vbQuestion)
If pregunta <> vbNo Then
fila = Me.programes.ListIndex + 2
Rows(fila).Delete
End If
End If
programes.Clear
Call UserForm_Initialize
End Sub

Para seleccionarlos en la hoja:

Private Sub programes_Click()
Dim fila As Integer
fila = Me.programes.ListIndex + 2
For i = 1 To 4
    Cells(fila, 1).Activate
Next i
End Sub

Como podria hacer una modificacion de datos ? Los datos se encuentran en el rango dinamico llamado PROGRAMAS

1 respuesta

Respuesta
1

[Hola

No hay forma de editar datos directamente en un ListBox. Ya que los datos están en un rango asumo que tienes algún índice o similar, es decir, alguna forma única de identificarlos ¿o no?

Abraham Valencia

Creo que no me he explicado del todo bien. Los datos los tengo en una hoja de excel pero los visualizo a través de un listbox. Lo que me gustaría es que a través de un formulario poder cambiar los datos de las hojas.
El problema que tengo es que tengo números de pedido repetidos en diferentes líneas.

Ej:
Pedido      Cantidad      Material           Sitio             Hora

1                       3               Boli               Barcelona        12:00

1                       2             Goma             Barcelona        12:00

1                       2              Aguas            Barcelona        12:00

2                     22               Botones        Madrid              22:00
...
Como ves en el pedido 1 hay 3 items . Necesitaría que cuando buscara los items del pedido 1 el material y la cantidad lo pusiera en un listbox (solo los de ese pedido)

[Hola nuevamente

Como para que te des idea, mira este archivo de ejemplo que hice hace unos meses:

https://drive.google.com/file/d/1KifPmvyZThQ538vpy6a7GPcuq1lzty6l/view?usp=sharing

Descárgalo para que lo veas y entiendas

Abraham Valencia

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas