Este fórum está sendo desativado

[nmareis]

Bom dia,
preciso de uma ajudinha se for possível....tenho um ficheiro com várias abas e em todas as abas ele tem uma coluna que diz " semana".....depois eu em cada aba se quiser ver o que foi feito, tenho que andar de aba em aba a filtrar a semana correspondente para apenas ficar com aquela semana filtrada em todas as abas...será que dá para criar uma macro que vá procurar a coluna e seleccione a semana que eu quero em todas as abas? e depois se possível desfiltar e ficar com todas á mostra de novo.

Agradeço a ajuda...obrigado

[babdallas]

Sim, é totalmente possível. Anexe um arquivo para facilitar o entendimento.
Se os dados tiverem a mesma estrutura, também poderia fazer uma base única usando o PowerQuery e depois fazendo uma tabela dinâmica com segmentação de dados para buscar os dados da semana desejada.

[nmareis]

Obrigado pela pronta resposta....segue link do ficheiro de que falo para ver se me pode ajudar...obrigado!
https://we.tl/t-cBPDdSPne0

[nmareis]

Sim, é totalmente possível. Anexe um arquivo para facilitar o entendimento.
Se os dados tiverem a mesma estrutura, também poderia fazer uma base única usando o PowerQuery e depois fazendo uma tabela dinâmica com segmentação de dados para buscar os dados da semana desejada.

Obrigado pela pronta resposta....segue link do ficheiro de que falo para ver se me pode ajudar...obrigado!
https://we.tl/t-cBPDdSPne0

[nmareis]

não me consegue ajudar?

[osvaldomp]

Sugestão: disponibilize o seu arquivo diretamente aqui no fórum.

[nmareis]

boa tarde,
pretendo clicar num botão que me pergunte a semana..selecionar a semana e o ano e depois ele seleciona em todas as abas a semana daquele ano.uma observação...caso não tenha o numero da semana ele passa para a aba seguinte..
só agora consegui disponibilizar o arquivo...cá vai...se me puder ajudar agradeço..obrigado

[osvaldomp]

Olá. Cá vamos ...

Você publicou planilhas vazias e em planilhas vazias não é possível desenvolver e aplicar testes com fórmulas e macros.

Já sabemos que no seu arquivo há múltiplas planilhas, então basta publicar um arquivo com apenas 3 ou 4 planilhas.

Preencha 4 a 5 linhas em cada planilha, com conteúdos diferentes e prepare ao menos duas delas como exemplo de resultado desejado.

Ainda, a semana a ser filtrada estará na coluna I. E o ano a ser filtrado estará em qual coluna?

[nmareis]

Boa noite,

anexo agora um exemplo mais completo...preenchido....a data está na coluna J, lá tem o ano, ageradeço-lhe ointeresse e ajuda demonstrada...obrigado....anexo ficheiro.

[osvaldomp]

Cá vamos

Código: Selecionar todos

Sub FiltraSemanaEAno()
 Dim ans As String, ws As Worksheet, LR As Long, StartDate As Date, EndDate As Date
  ans = InputBox("DIGITE O NÚMERO DA SEMANA E O" & vbLf & "ANO SEPARADOS POR UM ESPAÇO")
  If ans <> "" Then
   For Each ws In ThisWorkbook.Worksheets
    If ws.Name <> "Mira" Then
     On Error Resume Next
     ws.ShowAllData
     On Error GoTo 0
     LR = ws.Cells(Rows.Count, 1).End(3).Row
     ws.[A8:Q8].AutoFilter 9, Left(ans, Len(ans) - 5)
     StartDate = DateSerial(Right(ans, 4), 1, 1)
     EndDate = DateSerial(Right(ans, 4), 12, 31)
     ws.[A8:Q8].AutoFilter Field:=10, Criteria1:=">=" & CDbl(StartDate), Operator:=xlAnd, Criteria2:="<=" & CDbl(EndDate)
    End If
   Next ws
  End If
End Sub

Código: Selecionar todos

Sub MostraTudo()
 Dim ws As Worksheet
  For Each ws In ThisWorkbook.Worksheets
   If ws.Name <> "Mira" Then
    On Error Resume Next
    ws.ShowAllData
    On Error GoTo 0
   End If
  Next ws
End Sub

[nmareis]

boas....és um fenómeno!!! é isto mesmo...obrigado...já agora uma pergunta...consegues criar uma macro que procure uma palavra qualquer nesta abas todas?

[osvaldomp]

...consegues criar uma macro que procure uma palavra qualquer nesta abas todas?

1. a palavra procurada poderá estar em mais de uma planilha ?

2. qual o resultado esperado se a palavra for encontrada em apenas uma planilha ?

3. qual o resultado esperado se a palavra for encontrada em múltiplas planilhas ?

4. qual o resultado esperado se a palavra não for encontrada ?

5. como vamos saber qual é a palavra procurada ?

[nmareis]

1 - pode estar em qualquer planilha
2-manda para essa planilha
3-a planilha ou planilhas onde está a mesma palavra aparecem filtradas apenas com estas
4-não existe
5-pelo texto

[nmareis]

boas..olha se acrescento mais uma planilha no ficheiro depois a macro dá erro...sabes como posso contornar isso?

obrigado

[osvaldomp]

A planilha acrescentada está visível ? Se não, será preciso incluir o seu nome como exceção no código.

Se você preferir disponibilize o arquivo com a nova planilha, com os códigos instalados e informe em qual dos códigos ocorre o erro.

[nmareis]

o ero que dá é o seguinte: " Run-time error 1004
Não possivel efetuar a tarefa para o intervalo de células especificado.selecione uma unica célula e tente novamente."
O ficheiro onde coloquei esta macro basicamente é parecido que o interior enviado mas tem mais colunas até á coluna DK ( dados privados da empresa ), mas até aí tudo na boa...mas quando acrescente mais uma aba...dá esse erro..

[osvaldomp]

.

Se você preferir disponibilize o arquivo com a nova planilha, com os códigos instalados e informe em qual dos códigos ocorre o erro.