Para DAM. Modificar macro que copia formula Matricial
DAM, esta ayuda es muy similar a la anterior.
Existen hojas en un libro dispuestas en pareja: una tiene un nombre como por ejemplo:
"JORGE", "ANA", "MARGARITA", etc. Y cada una de las hojas lleva una que le acompaña y antepone a su nombre la palabra “TEMP_”, quedando así: “TEMP_JORGE”, “TEMP_ANA”, “TEMP_MARGARITA”, etc.
Se necesita reemplazar las constantes "TEMP_JORGE", por las variables de los nombres.
For i = 2 To h_combos.Range("M" & Rows.Count).End(xlUp).Row
r = h_combos.Cells(i, "M")
Sheets(r).Select
Range("A2").Select
Selection.FormulaArray = _
"=IFERROR(INDEX(TEMP_JORGE!R2C:R326C,SMALL(IF(ISERROR(TEMP_JORGE!R2C:R326C),"""", ROW(TEMP_JORGE!R2C:R326C)-MIN(ROW(TEMP_JORGE!R2C:R326C))+1),
ROW(R[-1]))),"""")"
Selection.AutoFill Destination:=Range("A2:BF2"), Type:=xlFillDefault
Range("A2:BF2").Select
Selection.AutoFill Destination:=Range("A2:BF326"),Type:=xlFillDefault
Range("A2:BF326").Select
Next
Igualmente requiero modificar del rango de celdas “R2C:R326C” toma el valor “326” que corresponde al número de fila final que tiene registro, se requiere reemplazar por un valor
variable que se incrementará por el crecimiento de los registros, en la tabla.
El rango de celdas que contiene la base de datos es un rango de celdas variable que lleva
por nombre “database”.
De antemano, muchas gracias, le doy vuelta por todos los lados pero no logro que me den los valores.
Saludos;
Jorge
