Cópiar intervalo quando determinada célula atingir valor

Professor André L.

Identidade verificada

• CPF verificado
• E-mail verificado

Respondeu há 1 ano

Melhor resposta

Essa foi a melhor resposta, escolhida pelo autor da dúvida

Para que isto funcione coloque na Célula K7 a seguinte função: 

=SE(Planilhab!I8=5;Planilhab!B8:G8;0).

O zero foi só para que a célula não ficasse em branco, mas pode colocar vazio: "".

Coloquei uma planilha no link para ajudar:

https://uspbr-my.sharepoint.com/:x:/g/personal/alapolli_usp_br/EZ73y9U6YJJAml9oDrpPlu8BLjjnrKwdcIOBjgwl2p9hXA?e=FjDAvI

Professor Vitor D.

Identidade verificada

• CPF verificado
• E-mail verificado

Respondeu há 1 ano

Olá Marcelo!

Para copiar o intervalo B8:H8 da Planilha B para a célula K7 da Planilha A quando a célula I8 da Planilha B contiver o número 5, você pode usar a seguinte fórmula na célula K7 da Planilha A:

=SE('Planilha B'!I8=5;'Planilha B'!B8:H8;"")

Esta fórmula utiliza a função SE para verificar se a célula I8 na Planilha B contém o número 5. Se a condição for verdadeira, a fórmula copiará o intervalo B8:H8 da Planilha B para a célula K7 na Planilha A. Caso contrário, a célula K7 na Planilha A ficará em branco.

Lembre-se de substituir "Planilha B" pelo nome real da Planilha B em sua pasta de trabalho. Você pode simplesmente digitar o nome da planilha ou selecioná-la clicando na aba correspondente.

Professora Ana M.

Identidade verificada

• CPF verificado
• E-mail verificado

Respondeu há 1 ano

você pode usar uma macro para realizar essa tarefa.

Siga as etapas abaixo para criar uma macro que copie o intervalo B8:H8 da Planilha B para a célula K7 da Planilha A quando a célula I8 da Planilha B atingir o valor 5:

Pressione Alt + F11 para abrir o Editor VBA.
No Editor VBA, clique em "Inserir" e selecione "Módulo" para inserir um novo módulo.
No novo módulo, cole o seguinte código:

VBA
Sub CopiarIntervalo()
    If Sheets("Planilha B").Range("I8").Value = 5 Then
        Sheets("Planilha B").Range("B8:H8").Copy Destination:=Sheets("Planilha A").Range("K7")
    End If
End Sub
Substitua "Planilha B" pelo nome real da sua Planilha B e "Planilha A" pelo nome real da sua Planilha A.
Feche o Editor VBA.
Agora, você pode executar a macro clicando em "Desenvolvedor" na faixa de opções do Excel (se a guia "Desenvolvedor" não estiver visível, você pode ativá-la nas opções do Excel) e selecionando "Macros". Em seguida, selecione a macro "CopiarIntervalo" e clique em "Executar".

Essa macro verificará se a célula I8 da Planilha B contém o valor 5 e, se for o caso, copiará o intervalo B8:H8 da Planilha B para a célula K7 da Planilha A.