Excel - Preencher várias planilhas com base nos dados inseridos em uma planilha principal
Excel - Preencher várias planilhas com base nos dados inseridos em uma planilha principal
- Questão
- Solução
Questão
Estou fazendo uma pasta de trabalho de contabilidade com os seguintes critérios:Na primeira folha chamada "Conta", todas as transações serão listadas na tabela que vai de C6 a H6 e abaixo a cada entrada. Uma das colunas na tabela é rotulada como "Setor" e refere-se a despesas ou fontes de receita. Existem 7 setores e cada um deles tem uma folha neste manual.
O que eu gostaria de fazer, é que cada folha do setor individual seja preenchida automaticamente com os dados toda vez que a planilha da Conta for atualizada, e tenha base na coluna Setor na tabela. Então, basicamente, se o setor disser "Geral", gostaria que a fila inteira fosse transferida para a pasta chamada "Geral" e assim por diante para cada setor individual.
Alguma dica ou sugestão?
Solução
Nota 1: O setor é inserido na coluna H.Nota 2: Digite o setor como o último valor da linha.
Privado Sub Worksheet_Change (ByVal Alvo como intervalo) Se Intersect (Alvo, Colunas ("H: H")) Não é nada então Sair Sub Range (Range ("C" & Target.Row), Range ("H" & Target.Row Copiar _ Sheets (Target.Value) .Range ("C" e Rows.Count) .End (xlUp) .Offset (1, 0) End Sub
Para implementar o código:
- Clique com o botão direito do mouse na guia "Conta" e selecione Exibir código.
- Cole o código no grande campo branco.
Obrigado ao TrowaD por essa dica.