Hola, por favor me puedes ayudar ha resolver un pequeño problema que es tengo los nombres de las hojas unas 500 en celdas y quiero copiar un rango de otra hoja en las hojas que su nombre esta en cada celda. Me podéis contestar en el foro o xpabjul@gmail.com tengo ester macro:
sub macro2() ' sheets("ref").select range
("f4:r14").select selection.copy sheet.cells(a5).value ' sheets("pepe").select
activewindow.scrollworkbooktabs position:=xlfirst range("h4").select
activesheet.paste end sub a5 es un arngp cuyo valor es pepe en la línea de pepe funciona pero que coja los valores de a6,a7....... gracias Excel 2003 Windows Xp. |