Excel - como copiar todas as colunas em uma linha com base em uma condição

Question

Sou novo em macros e espero que alguém possa ajudar Tentando fazer um relatório de uma folha de dados que atenda a algumas condições. Eu preciso buscar todos os dados (células) em uma linha, por exemplo que atendam à condição < 1 na coluna 10 e copiem essas células / linha para uma nova planilha. Eu não consigo encontrar nenhuma função no Excel, então espero que uma macro não avançada que eu possa modificar possa fazer o truque. Agradecemos antecipadamente.

    

Answer 1

• Abra uma cópia da sua planilha do Excel contendo todos os dados
• pressione ALT + F11 para abrir o editor de VBA

• abra sheet1 no painel esquerdo e insira o código abaixo

  Sub mymacro()
    For myrow = 1 To Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
      If Cells(myrow, 8) < 1 Then
        i = i + 1
        ActiveWorkbook.Sheets(1).Rows(myrow).Copy Destination:=ActiveWorkbook.Sheets(2).Rows(i)
      End If
    Next myrow
  End Sub
  

• volte à sua planilha e pressione ALT + F8 e execute sua macro

Este código será executado até a última linha usada, verifique se o valor da 8ª coluna é < 1 e, se sim, copie toda a linha para a próxima linha livre na folha 2.