raul461

Cadipas spain respondió: Cambia por este otro código: Sub insertar_formula() For r = 21 To 94 Cells(r, 2).Formula = "=+IF('PURE'!G21<>"""",'PURE'!b21,"""")" Next End Sub

d2enri respondió: Solo debes filtrar los datos seleccionar las POR y te juntaría todos los datos Luego das imprimir y ya estaría Si sabes usar la grabadora de macros solo sigue esos paso y ya esta si no sabes dímelo y te paso el código o bien te explico como