no consigo evitar error 1004 con on error goto

[ebu]

buenas!
espero que me puedan ayudar con un problemilla:
tengo el siguiente codigo:
For j = 0 To UBound(vChildComp)
...............
On Error GoTo Salto1
Range("CONFIG").Activate
..........
Salto1:
On Error GoTo Salto2
Range("OPERACION").Activate
.......
Salto2:
...............
Next j

en la primera vuelta llega a On Error GoTo Salto1 y salta a Salto1 (porque se produce un error) y sigue normal. hasta ai todo bien.pero en la segunda vuelta llega a On Error GoTo Salto2 y me da el error 1004. porque no me salta a salto2? supuestamente tendria que hacerlo no?

gracias por adelantado!

[culd]

Tenes que usar "Exit Sub" ó "Exit Function" cuando finaliza el control de error de un goto... Osea seria algo asi

Iniciado por ebu

For j = 0 To UBound(vChildComp)
...............
On Error GoTo Salto1
Range("CONFIG").Activate
Exit Sub
..........
Salto1:
On Error GoTo Salto2
Range("OPERACION").Activate
Exit Sub
.......
Salto2:
...............
Next j

Aparte en el "Salto1:"
Podes usar "Err." para saber el numero de error y la descripcion, asi sabes que esta pasando.

Por que la idea es que no tire ningun error

[ebu]

gracias por responder!
he probado tu codigo y me sigue dando error 1004 en Range("OPERACION").Activate.

te explico: tengo un excel con varias hojas. en algunas hojas tengo unas celdas llamadas CONFIG y OPERACION. el caso es q en las hojas que no tengo nombradas ninguna celda con CONFIG y OPERACION me da un error.

la idea: que mire si Range("CONFIG").Activate(es decir, si existe esa celda en la hoja), si no existe me dara error entonces con Salto1 que se pase a Range("OPERACION").Activate y si este tampoco no existe que vaya a salto2.

yo creo que con unos simples goto tendria q funcionar...

he probado en introducir On Error GoTo 0 y Resume Next pero tampoco lo consigo. no se si en este caso estas lineas serian necesarias...

espero que me puedan ayudar!

muchas gracias!

[culd]

El objeto para el acceso al excel que tipo es... Ado, Dao, DataControl... cual?

Con goto no se soluciona eso, con una simple sentancia condicional se hace, pero depende el objeto que estes usando

[ebu]

yo programo en el editor de visual basic en excel. no tengo que usar ningun objeto porq accedo directamente a los datos de excel.

[Judgement]

Saludos, talvez si limpias el error despues de manejarlo en Salto1

Código vb:

Err.Clear