Error -2147024809 (80070057)
Publicado por By (222 intervenciones) el 28/10/2013 00:11:31
Proyecto en Excel pero me presenta el error mencionado.
Ejecuto el formulario Consulta y Modifica, selecciono una línea del ListBox, presiono el botón Modificar para que abra otro formulario donde modifico los datos y antes me sale el dicho error.
Como soy nulo en esto de programación de código, nada entiendo sobre el error aunque estuve buscando por google pero no encontré respuesta para tal fin.
¿Podria alguien resolverme dicho error? Dejo libro para mejor entendimiento
Esta la carga del ListBox
Si hace falta subir el libro, lo hare y dejare enlace, una ves que uso W8 con IE10 y con IE10 no se puede subir desde el foro
Ejecuto el formulario Consulta y Modifica, selecciono una línea del ListBox, presiono el botón Modificar para que abra otro formulario donde modifico los datos y antes me sale el dicho error.
Como soy nulo en esto de programación de código, nada entiendo sobre el error aunque estuve buscando por google pero no encontré respuesta para tal fin.
¿Podria alguien resolverme dicho error? Dejo libro para mejor entendimiento
1
2
3
4
5
6
7
8
Private Sub btnlistcliMO_Click()
If LC.ListIndex <> -1 Then
Modificar = TrueFilaModificacion = LC.List(LC.ListIndex, 8) ‘AQUÍ ES DONDE ME MARCA ERROR
UFMOC.Showbtnbusccli_Click
End If
End Sub
Esta la carga del ListBox
1
2
3
4
5
6
7
8
Private Sub UserForm_Initialize()
LC.ColumnCount = 8
LC.ColumnHeads = True
LC.ColumnWidths = "27 pt;135 pt;70 pt;170 pt;110 pt;70 pt;70 pt;140 pt"
LC.RowSource = "Proveedor!A2:H" & _
Sheets("Proveedor").Range("A" & Rows.Count).End(xlUp).Row
txtbusccli.SetFocusEnd Sub
Si hace falta subir el libro, lo hare y dejare enlace, una ves que uso W8 con IE10 y con IE10 no se puede subir desde el foro
Valora esta pregunta
0
