............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

pegar de un libro a otro

Ver el tema anterior Ver el tema siguiente Ir abajo

pegar de un libro a otro

Mensaje por yeli el Dom Jul 04, 2010 11:16 am

hola buenos dias......
quisiera hacerles una consulta tengo 2 libros (libro_A y libro_B)

en el libro_A tengo una tabla en la hija 2
esa tabla quiero q aparesca en la hoja 2 del libro_B, todo esto apartir de un macro..........
este macro tendria q abrir el libro_A (en modo de lectura unicamente, si es posible)

cmo seria esto
gracias de ante mano


yeli

Femenino Cantidad de envíos : 12
Edad : 30
Ciudad - Pais : argentina
Version de Excel : 2007
Fecha de inscripción : 04/07/2010

Volver arriba Ir abajo

Re: pegar de un libro a otro

Mensaje por yeli el Dom Jul 04, 2010 6:33 pm

hola logre acer el siguiente macro pero m tira un error y no ace lo q quiero =(

Código:

Sub Macro1()
'
' Macro1 Macro
'

'
Workbooks.Open Filename:="E:\1º grado A.xlsm"
    Windows("1º grado A.xlsm").Activate
    Range("D1:V19").Select
    Selection.Copy
    Windows("caratula.xlsm").Activate
    Range("E6").Select
    ActiveSheet.Pictures.Paste(Link:=True).Select
End Sub


porfa ayuda.. =P

yeli

Femenino Cantidad de envíos : 12
Edad : 30
Ciudad - Pais : argentina
Version de Excel : 2007
Fecha de inscripción : 04/07/2010

Volver arriba Ir abajo

Re: pegar de un libro a otro

Mensaje por GalileoGali el Dom Jul 04, 2010 10:13 pm

Corre la macro con F8 y cuéntanos qué error surge y en qué línea

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1963
Edad : 62
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: pegar de un libro a otro

Mensaje por yeli el Dom Jul 04, 2010 11:10 pm

hola me tira me sale el siguiente error:
Código:
se ha producido el error "9" en tiempo de ejecucion
subindice fuera del intervalo

yeli

Femenino Cantidad de envíos : 12
Edad : 30
Ciudad - Pais : argentina
Version de Excel : 2007
Fecha de inscripción : 04/07/2010

Volver arriba Ir abajo

Re: pegar de un libro a otro

Mensaje por GalileoGali el Lun Jul 05, 2010 12:57 pm

suponiendo que el Libro abierto desde el que ejecutas la macros es "caratula.xlsm"
Proba cambiar esto

Windows("caratula.xlsm").Activate
por
Windows(ThisWorkBook.Name).Activate

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1963
Edad : 62
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: pegar de un libro a otro

Mensaje por yeli el Lun Jul 05, 2010 3:41 pm

hola galileogali

cambie lo q m dijiste.. y abre el otro libro todo bien.....
pero copia el rango de la primera hoja osea " Range("D1:V19").Select"
y yo quiero q se copie ese rango pero de la segunda hoja
grac x tu paciencia.... =)

yeli

Femenino Cantidad de envíos : 12
Edad : 30
Ciudad - Pais : argentina
Version de Excel : 2007
Fecha de inscripción : 04/07/2010

Volver arriba Ir abajo

Re: pegar de un libro a otro

Mensaje por GalileoGali el Lun Jul 05, 2010 9:10 pm

1) cambia esto
Windows("1º grado A.xlsm").Activate
Range("D1:V19").Select
Selection.Copy
por

ActiveWorkbook.Sheets(2).Range("D1:V19").Copy

2) Es hora de que comiences a estudiar VBA, al menos lo mas Básico

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1963
Edad : 62
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: pegar de un libro a otro

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.