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 SubPara 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
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
