Excel: Juntar dados de várias folhas numa só

Question

Excel: como filtrar dados de várias folhas de excel. Tenho várias folhas e queria juntar numa folha dados utilizando critérios. Aguardo as vossas indicações. Obrigada.

Answer 1

Cole este código na pasta de trabalho que possui os códigos e execute:

Sub Exemplo()

Dim lRow As Long

Dim lResumo As Long

Dim ws As Worksheet

Dim wsResumo As Worksheet

Set wsResumo = Workbooks.Add(xlWBATWorksheet).Sheets(1)

wsResumo.Range("A1:D1") = Array("Nome", "Clube", "Prova", "Planilha")

lResumo = 2

For Each ws In ThisWorkbook.Worksheets

With ws

'Considerando uma linha e cabeçalho

For lRow = 2 To .Cells(.Rows.Count, "A").End(xlUp).Row

If .Cells(lRow, "B") = "FCP" Then

.Rows(lRow).Copy

wsResumo.Rows(lResumo).PasteSpecial xlPasteValues

wsResumo.Cells(lResumo, "D") = .Name

lResumo = lResumo + 1

End If

Next lRow

End With

Next ws

End Sub

Answer 2

Muito obrigada! Deu resultado.

Answer 3

Passo a explicar:

o meu ficheiro excel tem várias folhas (cerca de 15) e quero criar uma folha que importe os dados das 15 de acordo com determinados critérios.

Por exemplo em todas as folhas tenho coluna A (nomes) coluna B (clube) C (prova) e quero numa só folha recolher todas as linhas que contenham um determinado critério da coluna B. Ou seja, na coluna B estão clubes como o FCP, Benfica, Leixões. Quero recolher os dados de todos os jogadores do FCP que constam nas várias folhas.

Peço desculpa mas não sei como enviar anexar o meu ficheiro excel.

Fico a aguardar as vossas indicações.

Answer 4

Olá Sandra,

É necessárioq eu você poste mais informações sobre o que deseja ou até mesmo uma cópia do arquivo mostrando como está e como deveria ficar, pois assim ficaria mais fácil da comunidade lhe auxiliar na sua dúvida, uma vez que existem algumas funções que podem lhe auxiliar. Acesse os links abaixo e verifique se tem alguma função ou algum recurso que te ajude a fazer o que deseja.

http://office.microsoft.com/pt-br/excel-help/funcao-se-HP010342586.aspx

http://office.microsoft.com/pt-br/excel-help/inicio-rapido-criar-um-relatorio-de-tabela-dinamica-HA010359471.aspx

http://office.microsoft.com/pt-br/excel-help/conheca-o-excel-2010-crie-formulas-RZ101862712.aspx

Espero ter ajudado.

Até mais!!!