hola! como estás? quiero subir el archivo, pero la limitación de tamaño me condiciona a sacarle tantas cosas que probablemente termine eliminando partes que son necesarias evaluar para ver donde está el problema. Dejé solo dos hojas, a las cuales le borré la mayor parte de los datos que estaban cargados en las mismas, borré todos los módulos innecesarios en visual basic, saqué todos los botones que no se utilizarían, etc etc.... ya no sé que más sacarle sin que quede algo inútil y aún así el archivo ocupa 178 kb. He visto en otra consulta de macros que una persona subió un archivo de más de 800 kb.
Como puedo hacer?
Por
Corvette, · publicado
tengo un libro con varias pestañas , en una hoja recojo los datos de cada una de las pestañas
he grabado una macro Y quiero ver si me podéis decir como la repito.
Esto es para la primera linea .
la segunda linea debe recoger el dato de la pestaña siguiente
y dejar el dato en Range siguiente( G3, H3..) y así hasta el fin de las pestañas.
como hacer que la macro se ejecute recogiendo de la pestaña siguiente y deposite en la fila siguiente .
¿podeis ayudarme?
ActiveCell.FormulaR1C1 = "='HHC5'!R[10]C[-2]"
Range("G2").Select
ActiveCell.FormulaR1C1 = "='HHC5'!R[28]C[-3]"
Range("H2").Select
ActiveCell.FormulaR1C1 = "='HHC5'!R[27]C[-5]"
Range("I2").Select
ActiveCell.FormulaR1C1 = "='HHC5'!R[32]C[-6]"
Range("J2").Select
ActiveCell.FormulaR1C1 = "='HHC5'!R[33]C[-7]"
Range("K2").Select
ActiveCell.FormulaR1C1 = "='HHC5'!R[34]C[-8]"
Range("L2").Select
ActiveCell.FormulaR1C1 = "='HHC5'!R[38]C[-9]"
Range("M2").Select
ActiveCell.FormulaR1C1 = "='HHC5'!R[42]C[-10]"
Range("M2").Select
End Sub