Dúvidas sobre cálculos, funções simples e aninhadas, fórmulas matriciais, etc.
  • Avatar do usuário
Por sousabts
#59982
Boa noite,

Em anexo, envio uma planilha que preciso de uma ajuda para resolver um problema.

Tenho uma guia chamada "lista", nela tem matrícula, nome e meses.... em cada célula na coluna dos meses tem uma lista suspensa que apresenta uma situação: Edição, Pendência e Baixa.

Quando for marcado a opção baixa, será necessário que a matrícula e o nome seja copiado para a guia do mês correspondente.

Por exemplo: Na guia lista,se for selecionado "baixa" na lista suspensa na coluna C, a matrícula "123" e nome "Maria", deverá ser copiado para o mês correspondente, neste exemplo, copiado para a guia "janeiro", se o for desmarcado a situação o nome é excluído novamente da guia do mês correspondente..


Não sei se consegui explicar direito, mas, desde já agradeço se puderem me ajudar. :D
Você não está autorizado a ver ou baixar esse anexo.
Avatar do usuário
Por Deciog
#59993
sousabts , Bom Dia.

Por formula

Para a versão Excel antes de 2019, feche com CTRL + SHIFT + ENTER, são formula matricial

Confere se é desta forma que desejas

Se minha resposta foi útil, clique em obrigado é uma forma de agradecimento da ajuda

Decio
Você não está autorizado a ver ou baixar esse anexo.
Editado pela última vez por Deciog em 27 Out 2020 às 10:21, em um total de 1 vez.
sousabts agradeceu por isso
Por sousabts
#59994
Strogonoff escreveu: 27 Out 2020 às 02:21 da uma verificada, era isso?
Abraço
Ah, eu estava olhando uma situação que aconteceu.... qndo eu tiro a opção baixa e coloco outra situação ele não some do mês correspondente, ele só sai qndo eu removo toda a informação.... se não tiver como resolver não tem problema....
Por sousabts
#59995
Deciog escreveu: 27 Out 2020 às 10:14 sousabts , Bom Dia.

Por formula

Para a versão Excel antes de 2019, feche com CTRL + SHIFT + ENTER, são formula matricial

Confere se é desta forma que desejas

Se minha resposta foi útil, clique em obrigado é uma forma de agradecimento da ajuda

Decio
Oi amigo, tudo bem??

fiz o teste na planilha, mas, quando coloco baixa não esta sendo copiada para o mês correspondente não... Sera q tenho q fazer algum procedimento antes???
Por sousabts
#59997
sousabts escreveu: 27 Out 2020 às 10:12 Excelente!!
@Strogonoff,
Vc poderia me explicar como eu faço isso??
E outra coisa engraçada que percebi é que quando chego no mês de dezembro, e marco a situação baixa ele trava que preciso forçar o reinicio do programa excel.... pq será???
Por Strogonoff
#59998
Bom dia!!
clique em <ALT + F11> e abre a tela do VBA.
a esquerda da tela tem o VBA project
clique em planilha1 que é da sua lista
lá está a automatizaçao da planilha..
sousabts agradeceu por isso
Por Strogonoff
#59999
@sousabts
Em relação a sair do mês corresponsdente, somente vinculei isso na retirada do baixa para " " como você havia mencionado..
Como não entendo a lógica dos comandos, somente limitei ao que foi pedido...
Ateração feita...
Veja agora.
Você não está autorizado a ver ou baixar esse anexo.
sousabts agradeceu por isso
Por Strogonoff
#60000
sousabts escreveu: 27 Out 2020 às 10:45
sousabts escreveu: 27 Out 2020 às 10:12 Excelente!!
@Strogonoff,
Vc poderia me explicar como eu faço isso??
E outra coisa engraçada que percebi é que quando chego no mês de dezembro, e marco a situação baixa ele trava que preciso forçar o reinicio do programa excel.... pq será???

ops... isso é bug...
espera um pouco que já atualizo
sousabts agradeceu por isso
Por Strogonoff
#60001
E relação a Dezembro, o nome da planilha está errado (Dezemebro), por isso que dá o BUG, acerte a grafia da planilha que já está resolvido, como a rotina faz a busca pelo mês da coluna, ele busca a planilha com o mesmo nome e não acha... Viu como uma letra faz diferença...
Abraço
sousabts agradeceu por isso
Por Strogonoff
#60002
Strogonoff escreveu: 27 Out 2020 às 10:51 Bom dia!!
clique em <ALT + F11> e abre a tela do VBA.
a esquerda da tela tem o VBA project
clique em planilha1 que é da sua lista
lá está a automatizaçao da planilha..
Se tiver algum problema, me avisa, combinado???
sousabts agradeceu por isso
Avatar do usuário
Por Deciog
#60005
sousabts

Como eu escrevi se sua versão for dizente tem que teclar CTRL+SHIFT+ENTER

Olha agora o anexo com CTRL+SHIFT+ENTER

Confere se é desta forma que desejas

Se minha resposta foi útil, clique em obrigado é uma forma de agradecimento da ajuda

Decio
Você não está autorizado a ver ou baixar esse anexo.
PauloSouza897, sousabts agradeceu por isso
Por sousabts
#60038
Strogonoff escreveu: 27 Out 2020 às 11:07
Strogonoff escreveu: 27 Out 2020 às 10:51 Bom dia!!
clique em <ALT + F11> e abre a tela do VBA.
a esquerda da tela tem o VBA project
clique em planilha1 que é da sua lista
lá está a automatizaçao da planilha..
Se tiver algum problema, me avisa, combinado???
Excelente,

Me desculpe, mas, como eu faço para incluir mais pessoas na guia lista??
Por osvaldomp
#60041
Instale uma cópia do código abaixo no módulo da planilha Lista. Para acessar o módulo clique com o direito sobre a guia daquela planilha e escolha Exibir Código.
Código: Selecionar todos
Private Sub Worksheet_Change(ByVal Target As Range)
 Dim m As Range
  If Target.Column < 3 Or Target.Column > 14 Then Exit Sub
  If Target.Value = "Baixa" Then
   Sheets(Cells(1, ActiveCell.Column).Text).Cells(Rows.Count, 1).End(3)(2).Resize(, 2).Value = Cells(ActiveCell.Row, 1).Resize(, 2).Value
  Else: Set m = Sheets(Cells(1, ActiveCell.Column).Text).[A:A].Find(Cells(ActiveCell.Row, 1))
   If Not m Is Nothing Then Sheets(Cells(1, ActiveCell.Column).Text).Rows(m.Row).Delete
  End If
End Sub

dica - não utilize Select nos seus códigos
sousabts agradeceu por isso
Por sousabts
#60042
Deciog escreveu: 27 Out 2020 às 12:07 sousabts

Como eu escrevi se sua versão for dizente tem que teclar CTRL+SHIFT+ENTER

Olha agora o anexo com CTRL+SHIFT+ENTER

Confere se é desta forma que desejas

Se minha resposta foi útil, clique em obrigado é uma forma de agradecimento da ajuda

Decio
Desta forma ficou mais compreensivo para mim, pois consigo entender melhor as formulas....
Mas, eu estava tentando incluir mais pessoas, mas, tem ocorrido erro, veja so:
Na sua formula é: =SEERRO(ÍNDICE(Lista!$A$2:$A$4;MENOR(SE(SE(ÉNÚM(PROCURAR("Baixa";Lista!$C$2:$N$4;1));Lista!$C$1:$N$1)=$R$1;LIN(Lista!$A$2:$A$4)-1;FALSO);LIN(A1)));"")

então quero incluir mais pessoas, tentei editar, da seguinte forma abaixo, mas, parece que não funciona, será pq???

=SEERRO(ÍNDICE(Lista!$A$2:$A$1600;MENOR(SE(SE(ÉNÚM(PROCURAR("Baixa";Lista!$C$2:$N$1600;1));Lista!$C$1:$N$1)=$R$1;LIN(Lista!$A$2:$A$1600)-1;FALSO);LIN(A1)));"")
Avatar do usuário
Por Deciog
#60044
sousabts, Boa Tarde

A formula voce alterou corretamente porem!

Voce precisa encerrar com as teclas juntas CTRL+SHIFT+ENTER assim a formula fica com essas chaves no inicio { e fim } isso significa forma matricial

Como fazer selecione todas as abas de Janeiro a Dezembro, depois coloca a formula na célula A2 ai tecla F2 ai encere com as teclas juntas CTRL+SHIF+ENTER depois copia as formula para baixo até onde quer o resultado

Se minha resposta foi útil, clique em obrigado é uma forma de agradecimento da ajuda

Decio
sousabts agradeceu por isso
Por sousabts
#60048
Deciog escreveu: 28 Out 2020 às 12:45 sousabts, Boa Tarde

A formula voce alterou corretamente porem!

Voce precisa encerrar com as teclas juntas CTRL+SHIFT+ENTER assim a formula fica com essas chaves no inicio { e fim } isso significa forma matricial

Como fazer selecione todas as abas de Janeiro a Dezembro, depois coloca a formula na célula A2 ai tecla F2 ai encere com as teclas juntas CTRL+SHIF+ENTER depois copia as formula para baixo até onde quer o resultado

Se minha resposta foi útil, clique em obrigado é uma forma de agradecimento da ajuda

Decio
Perfeito.... Agora sim deu certo!

Muito Obrigado.
Por Strogonoff
#60057
Como você viu , tem várias recitas de bolo de chocolate, e todas funcionam e se adaptam a sua necessidade...

If Not Intersect(Target, Range("C2:N100" )) Is Nothing Then ' esse numero 100 após a letra N aumentará para as 100 linhas, na planilha enviada estava 4, nesse fórum gosto de trabalhar codigos simples e explicar passo a passo para que as pessoas tenham condições de criar em cima do codigo enviado, que foi exatamente como comecei. o cplicado...odigo acima enviado pelo colega, é o ideal, porém para o iniciante, poderá ser complicado, e um detalhesinho o codigo estará perdido...
Precisando estamos a disposição
sousabts agradeceu por isso
Por osvaldomp
#60059
Strogonoff escreveu: 28 Out 2020 às 15:15 ... o cplicado...odigo acima enviado pelo colega, é o ideal, porém para o iniciante, poderá ser complicado,
O código foi elaborado com base na boa técnica, notadamente sem o uso de Select, que certamente não é uma técnica recomendável para iniciantes e muito menos para iniciados. Ainda, códigos enxutos são de fácil elaboração, fácil leitura e interpretação e de rápida execução.

e um detalhesinho o codigo estará perdido...
Esse comentário não faz sentido ;)
sousabts agradeceu por isso

Segue uma ideia, veja se aproveita. 1. elabore um[…]

Pessoal, ao salvar minha tabela dinâmica no […]

DÚVIDA: Como gerar a data final?

Isso mesmo Strogonoff, muito obrigado! Sobre a su[…]

Variáveis em um Dashboard

Você precisa de um gráfico dinâ[…]

Bom dia! Estou precisando de uma ajuda com SQL e V[…]

Como você não informou o horár[…]

Como abrir tela de Logon do SAP ECC?

@FAMenezes , Tudo bom... sei que já faz um[…]

Rotina e Macro

Oi. Tenho uma planilha com um jogo. Nele os partic[…]