CodeName - Usar con With

10/10/2003 - 09:44 por amal | Informe spam
Hola a todos,

Es la primera vez que participo activamente en este grupo, aunque os
he leido durante mucho tiempo..

Estoy haciendo una macro en un libro1 (el que contiene el código) que
tiene que buscar en otros libros, libro2 y libro3, el valor de algunas
celdas para poner ese valor en un libro4 (que es el que llama a la
macro).

Teniendo todos los libros abiertos..
En una parte de la macro del libro1 tengo puesta:

libro3.xls Activate
With wsKXXr
'(hoja de donde quiero sacar unos valores)
valor1 = .cells(1,5).value
valor2 = .cells(8,15).value
End With

Pero no funciona. el codename wsKXXr me aparece vacio, a pesar de que
existe.

¿es que no se puede usar el codename de una hoja desde otro libro que
no sea el que contiene a esa hoja en cuestion?

Agradecería mucho vuestra ayuda..
Un abrazo
Ana
 

Leer las respuestas

#1 gti
10/10/2003 - 16:55 | Informe spam
Tienes que activar el libro
Worksheets("Hoja1").activate
Después ya podrás leer las celdas

"Ana" escribió en el mensaje
news:
Hola a todos,

Es la primera vez que participo activamente en este grupo, aunque os
he leido durante mucho tiempo..

Estoy haciendo una macro en un libro1 (el que contiene el código) que
tiene que buscar en otros libros, libro2 y libro3, el valor de algunas
celdas para poner ese valor en un libro4 (que es el que llama a la
macro).

Teniendo todos los libros abiertos..
En una parte de la macro del libro1 tengo puesta:

libro3.xls Activate
With wsKXXr
'(hoja de donde quiero sacar unos valores)
valor1 = .cells(1,5).value
valor2 = .cells(8,15).value
End With

Pero no funciona. el codename wsKXXr me aparece vacio, a pesar de que
existe.

¿es que no se puede usar el codename de una hoja desde otro libro que
no sea el que contiene a esa hoja en cuestion?

Agradecería mucho vuestra ayuda..
Un abrazo
Ana

Preguntas similares