Ver Mensaje Individual
  #4 (permalink)  
Antiguo 02/07/2010, 07:42
Avatar de mrocf
mrocf
 
Fecha de Ingreso: marzo-2007
Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años, 1 mes
Puntos: 88
De acuerdo Moverse entre libros, Excel macro

Hola! RoberT89. La corrección que te ha sugerido Abraham es pertinente. Sin embargo: no es la única dificultad...

- totallibro = Application.ThisWorkbook.Name
"totallibro" contiene un valor de texto como "MiLibro.xls", por ejemplo.

- casalibro = Application.GetOpenFilename
"casalibro" también contiene un valor de texto. Pero debe ser algo como: "C:/OtroLibro.xls"

Y allí es donde tienes el error pues deberías utilizar en el Workbooks(casalibro).Activate el texto "OtroLibro.xls"

Podrías corregirlo agregando una sola línea de código más:

casalibro = Application.GetOpenFilename
Workbooks.Open casalibro
casalibro = ActiveWorkbook.Name

Saludos, Cacho.