Seleção multicritério com VBA

Eu criei uma macro que me permite abrir vários arquivos com base em seus nomes e copiar folhas em uma em outra pasta de trabalho. Agora eu gostaria de adicionar alguns critérios, eu determino a última linha com dados. Eu usei isso:

lstRow2 = alarms.Cells(alarms.Rows.Count, "A").End(xlUp).Row

E agora eu quero passar por cada linha e verificar se a colunaG de cada linha contém seqüências de caracteres como ("condenser", "pump", etc) se sim, copiar a linha, mas não a linha inteira, apenas uma série de colunas pertencentes à linha (por exemplo, para cada linha que corresponde aos meus critérios, copie essas colunasA-B-X-Z) e, finalmente, copie tudo isso em outra planilha.

Obrigado pela ajuda

questionAnswers(3)

yourAnswerToTheQuestion