
Eu tenho três planilhas
ConditionSheet
: Tendo valor de condições na célulaE5
&E7
SourceSheet
: Dados CompletosTargetSheet
: Quando executo a macroNew worksheet
crie com este nome baseado noconditionSheet
Valor.
De SourceSheet
quero criar uma nova planilha com dados específicos.
Na ConditionSheet
célula E5
tendo o primeiro critério e E7
tendo o segundo critério
Com base nisso, quero criar uma nova planilha com o nome 'TargetSheet'
Neste, apenas as cópias de dados SourceSheet
cujo Column F
valor corresponde ao E5
valor da célula em ConditionalSheet
& Column H
do SourceSheet
valor correspondem ao E7
valor deConditionalSheet
O segundo critério é opcional, então usei IIF
a função para passar a condição.
O comando a seguir copiou todos os dados, sourcesheet
sejam eles uma ou duas condições.
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
Quero copiar apenas dados com base em critérios.
Por favor me guie.
(Obrigado pelo visualizador e usuários respondidos)