Hernan HA

Dante Amor respondió: Prueba con la siguiente macro. No sé exactamente a qué te refieres con "ciertas formulas condicionales"; estoy copiando toda las celdas pero revisa si es lo que requieres. Sub Filtar_Trasladar() ' ' Por Dante Amor ' Application.ScreenUpdating = False...

Aneudys Martinez respondió: Seria de la siguiente manera Sub Completar() Dim rango As Range Set rango = Sheets("Hoja1").Range("E1:E10000") fecha = Sheets("Actualizacion").[E4] For Each celda In rango If celda.Value = "SI" and celda.offset(0,1) = "" Then celda.Value = "SI"...

Victor Rodriguez respondió: Creo que utilizando fórmulas matriciales ya podrías resolver tu problema. ¿Puedes poner unas imágenes para poder ver mejor que necesitas?

Dante Amor respondió: Te anexo la macro para lo siguiente: 1. Captura el dato en la hoja "actualización", celda C4 2. Ejecuta la macro. Si no hay dato, te envía un mensaje 3. La macro realiza los 2 filtros 4. Si hay información en la columna A, la copia y la pega en la...