Visual Basic para Aplicaciones - Aparicion de mensaje de error

Life is soft - evento anual de software empresarial
   
Vista:

Aparicion de mensaje de error

Publicado por Miguel (2 intervenciones) el 16/02/2009 16:53:32
Mi nombre es Miguel y soy un estudiante de edad avanzada de vba para excel . La razón de este e-mail es para que alguien con mas conocimientos que yo me indicase la razón de que me aparezca un mensaje de error en el procdimiento siguiente:

Sub CopiarPegarRango() 'Se crea este procedimiento en el Modulo1 del Libro1
Dim Rango1 As Range, Rango2 As Range, Nombre As String
Nombre = "C:Documents and SettingsAdministradorMis documentosLibro2.xls"
Workbooks.Open Filename:=Nombre 'Para abrir el Libro2
Set Rango1 = Workbooks("Libro1.xls").Sheets("Hoja1").Range("A1:B2") 'Establece el Rango1
Set Rango2 = Workbooks("Libro2.xls").Sheets("Hoja2").Range("C2") 'Establece el Rango2
Rango1.Copy Rango2 'Para Copiar el Rango1 del Libro1 en el Libro2, a partir de la celda "C4" del Libro2

Estaba convencido de que con este procedimiento se podría copiar el Rango1 del Libro1 en el Rango2 del Libro2, pero no es así.

Gracias en adelanto por la respuesta

Miguel
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de JuanC

RE:Aparicion de mensaje de error

Publicado por JuanC (431 intervenciones) el 16/02/2009 20:17:25
pues aparentemente el código está bien
probá depurar el código paso a paso (F8) y ver qué pasa con las variables porque por ahí no se asignan correctamente... algún problema al abrir el archivo...
o usando Is Nothing ...

Saludos desde Baires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar