El combobox dependiente me genera error al actualizar,buscar,y limpiar su contenido.
Tengo un formulario que cuando quiero guardar la información me da un error, al parecer el error esta en el código del ComboBox4 . Su código en lo siguiente
Private Sub ComboBox5.Clear
Hoja2.Select
columna = ComboBox4.ListIndex + 1
Cells(2, columna).Select
Do While ActiveCell <> Empty
ComboBox5.AddItem ActiveCell
ActiveCell.Offset(1, 0).Select
Loop
End Sub
la parte del código que me pinta en amarillo cuando aprieto depurar al saltarme el error es
Cells(2, columna).Select, espero tu respuesta , desde ya gracias...
Private Sub ComboBox5.Clear
Hoja2.Select
columna = ComboBox4.ListIndex + 1
Cells(2, columna).Select
Do While ActiveCell <> Empty
ComboBox5.AddItem ActiveCell
ActiveCell.Offset(1, 0).Select
Loop
End Sub
la parte del código que me pinta en amarillo cuando aprieto depurar al saltarme el error es
Cells(2, columna).Select, espero tu respuesta , desde ya gracias...
1 Respuesta
Respuesta de Luis Mondelo
1
Perdona pero no entiendo el comienzo de la macro:
Private Sub ComboBox5.Clear???????
Private Sub ComboBox5_Change()
ComboBox5.Clear
Hoja2.Select
columna = ComboBox4.ListIndex + 1
Cells(2, columna).Select
Do While ActiveCell <> Empty
ComboBox5.AddItem ActiveCell
ActiveCell.Offset(1, 0).Select
Loop
End Sub
Perdón te envíe mal el código, ahora esta bien...subraye en la parte que me pinta en amarillo cuando le doy depurar.
Aparentemente no veo ningún error en la macro, todo depende del valor seleccionado en el combo4. ¿Es así?
a simple vista no párese luego que tenga un error, con el formulario completo me da el error, te puedo enviar el archivo para que lo veas...???
Ya te he contestado por mail.
Recuerda finalizar la consulta
