Altere todas as células na ActiveSheet para valores usando VBA no Microsoft Excel

Anonim

Neste capítulo, você aprenderá como alterar todas as células na planilha ativa para valores usando o VBA no Microsoft Excel.

Vamos dar um exemplo e entender como escrevemos o código VBA para alterar o valor das células na planilha ativa.

Como alterar todos os valores das células na planilha ativa?

Temos dados no Excel, nos quais queremos substituir o valor de todas as células por apenas um valor de célula.

Siga as etapas abaixo: -

  • Pressione a tecla Alt + F11 para abrir o aplicativo Visual Basic

  • Em VBAProject, clique duas vezes na Folha 1
  • Insira o código VBA fornecido abaixo
 Sub Values_1 () With ActiveSheet.UsedRange Range ("A1: I7"). Value = Range ("A2"). Value End With End Sub 

  • Para executar o código, pressione a tecla F5
  • O valor da célula A2 será atualizado no intervalo definido

Como mudar o valor da primeira para a segunda tabela?

Temos 2 mesas, 1st o intervalo da tabela é A3: I5 e 2WL o intervalo da tabela é A8: I10. Queremos substituir o valor de 1st tabela com o valor de 2 tabela na planilha ativa.

Para alterar o valor, siga as etapas e códigos fornecidos abaixo: -

  • Abra o aplicativo Visual Basic
  • Insira o código abaixo: -
Sub Values_1 () With ActiveSheet.UsedRange Range ("A3: I5"). Value = Range ("A8: I10"). Value End With End Sub 

  • Execute o código pressionando F5
  • Os valores serão atualizados

Se você gostou de nossos blogs, compartilhe com seus amigos no Facebook. E você também pode nos seguir no Twitter e no Facebook.

Gostaríamos muito de ouvir de você, diga-nos como podemos melhorar, complementar ou inovar nosso trabalho e torná-lo melhor para você. Escreva-nos no site de e-mail