31/05/2012, 16:48
|
| | Fecha de Ingreso: mayo-2012 Ubicación: Bogota
Mensajes: 2
Antigüedad: 12 años, 7 meses Puntos: 0 | |
Respuesta: Error 1004, error definido por la aplicacion o el objeto Hola, me sorprende como resolviste el problema que te plantearon
Quisiera preguntarte acerca del mismo error
la verdad le he dado todas las vuelats posibles y no entiendo. Estoy tan confundido que aunque tuviera la respuesta en la nariz no la hallaría.
Setrata de esto, tengo dos combobox uno dependiente del otro (municipio depende de departamento), el error me aparece cuando ejecuto el boton agregar y el depurador me señala en amarillo en la siguiente linea
Cells(1, columna).Select
Private Sub cmbdepartamentoe_Change()
Application.ScreenUpdating = False
'Llenamos el combobox cmbmunicipioe al recibir el foco,
'pero antes lo limpiamos
cmbmunicipioe.Clear
'seleccionamos la hoja5
Hoja6.Select
'miramos lo que hay seleccionado en el combobox1
'Listindex + 1 nos devuelve la columna del departamento
'porque el listindex empieza siempre por cero
columna = cmbdepartamentoe.ListIndex + 1
'seleccionamos la celda que proceda,
'a partir de la segunda fila
Cells(1, columna).Select
'vamos a llenar dinámicamente el combobox
'dependiendo del país elegido
Do While Not IsEmpty(ActiveCell)
'Añadimos los nombres de las hojas al combobox
cmbmunicipioe.AddItem ActiveCell
'bajamos una fila
ActiveCell.Offset(1, 0).Select
Loop
End Sub
Lo curioso es que en el mismo formulario tengo otros combobox similares y no me ponen problema, si me ayudas te estaré muy agradecido, un saludo especial desde Colombia. |