☰

Filtro avanzado con múltiples criterios

tag-icon • tag-icon microsoft-excel
Filtro avanzado con múltiples criterios

tengo tres hojas de trabajo

  1. ConditionSheet: Tener valor de condiciones en la celda E5&E7

  2. SourceSheet: Datos completos

  3. TargetSheet: Cuando ejecuto la macro, New worksheetcreo con este nombre según conditionSheetel valor.

Desde SourceSheetQuiero crear una nueva hoja de trabajo con datos específicos.

En ConditionSheetla celda E5que tiene el primer criterio y E7el segundo criterio

En base a esto, quiero crear una nueva hoja de trabajo con el nombre 'TargetSheet'

En esto, solo aquellas copias de datos SourceSheetcuyo Column Fvalor coincide con E5el valor de la celda en ConditionalSheet& Column Hdel SourceSheetvalor coinciden con E7el valor deConditionalSheet

El segundo criterio es opcional, así que utilicé IIFla función para pasar la condición.

El siguiente comando copió todos los datos, sourcesheetya sea de una o dos condiciones.

Sheets("SourceSheet").Range("A1:AB" & Worksheets("TargetSheet").Rows.Count).AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=IIf(Sheets("ConditionSheet").Range("E7") = "", Sheets("ConditionSheet").Range("E5:E5"), Sheets("ConditionSheet").Range("E5:E7")), _
CopyToRange:=Sheets("TargetSheet").Range("A1"), _
Unique:=True

Quiero copiar solo datos según criterios.

Por favor guíame.

(Gracias por el espectador y los usuarios respondidos)

información relacionada