Foro Excel

Al tratar de obtener la información de una hoja de trabajo que no es la activa, coloco en el programa:

La macro esta en el botón de la hoja de trabajo FINAL del libro enviado.

Sheets("P.Kinder A").Select, y luego Range(cNombre).Select, para así­ poder obtener luego con Range(cNombre).Value , el valor de la celda en cuesstión, pero en el segundo paso me aparece el error 1004, del metodo Select.

Adjunto archivo para corroborar el error.

Espero me ayuden en este proceso, dado que me tiene con dolor de cabeza.

Nota: No pude enviar el archivo en formato XLS, dado que me decia que era muy grande, por eso lo comprimi.

Gracias por vuestra ayuda.

Hola ascomp,

No puedo abrir tu archivo porque no tengo RAR ni quiero instalarlo. En todo caso creo que con mi bola de cristal y un poco de magia blanca podre adivinar donde esta el problema

Creo que el codigo lo ejecutas desde el modulo VBA de una hoja que no es la P.Kinder A. Al usar la instruccion Range(cNombre).Value creo que esperas que Excel asuma que se trata de un rango en la hoja activa. Efectivamente esto es lo que ocurre si el rango "no calificado" (sin indicar la hoja) se referencia desde un modulo estandar, un modulo de Formulario (UserForm), el modulo del libro (ThisWorkbook), cualquier otro modulo de clase que no sea de una hoja. Cuando se usa un rango "no calificado" en el modulo de una hoja, por defecto se asume que el rango pertenece a la hoja en cuyo modulo esta el procedimiento y no a la hoja activa. De ahi que si el procedimiento no esta en el modulo de la hoja P.Kinder A y el rango cNombre si lo esta, obtendras un error por refernciar un objeto inexistente.

Prueba sustituir las tres instruciiones que usas

Sheets("P.Kinder A").Select
Range(cNombre).Select
MsgBox Range(cNombre).Value

por la siguiente:

MsgBox Sheets("P.Kinder A").Range(cNombre).Value

Muchas gracias KL, era justo la solución que queria, dado que modifique la acción para obtener el dato, y con la lí­nea de acción que me diste.

Muchas gracias.