Como selecionar intervalos usando Visual Basic for Applications (exemplos iniciantes)

Exemplos de como selecionar células manualmente

Para selecionar manualmente todos os dados em uma coluna, selecione a primeira célula e pressione CTRL+SHIFT+DOWN ARROW.

Da mesma forma, para selecionar manualmente uma linha e todas as colunas anexadas à linha, pressione CTRL+SHIFT+DOWN ARROW+RIGHT ARROW. No entanto, todos os dados devem ser contíguos (ou seja, você não pode ter linhas ou colunas em branco). Além disso, você pode selecionar a região atual de dados (dados contíguos, sem linhas ou colunas em branco) fazendo o seguinte:

1. No menu Editar, clique em Ir para.

2. Na caixa de diálogo Ir para, clique em Especial.

3. Na caixa de diálogo Ir para Especial, clique em Região atual e clique emOK
   .

Você também pode selecionar esse intervalo usando código Visual Basic for Applications simples.

Observação Se você tentar gravar esse procedimento usando o gravador de macro, não receberá os mesmos resultados.

Exemplos de como usar Visual Basic código para selecionar células em um intervalo

A Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não se limita às garantias implícitas de comercialização ou adequação a uma finalidade específica. Este artigo supõe que você está familiarizado com a linguagem de programação que está sendo demonstrada e com as ferramentas usadas para criar e depurar procedimentos. Os engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um procedimento específico, mas não modificarão esses exemplos para fornecer funcionalidades adicionais ou procedimentos de construção para atender aos seus requisitos específicos. Os exemplos Visual Basic de código a seguir mostram como selecionar intervalos variados.

Se você conhece a célula inicial (neste exemplo, a célula inicial é a célula C1) e deseja selecionar até a última célula (na mesma coluna) que tenha dados, mas não saiba esse endereço, use o seguinte código:

   Sub SelectRangeDown()
      Range("c1", Range("c1").End(xlDown)).Select
   End Sub

Observação A macro SelectRangeDown supõe que seus dados são contíguos. Caso contrário, se houver células em branco na coluna de dados que você está selecionando, essa macro pode não selecionar todas as células na coluna.

Se seus dados começam na célula C1, mas não são contíguos nessa coluna, use a seguinte macro no Microsoft Office Excel 2003 e em versões anteriores do Excel:

   Sub SelectRangeDown_Discontiguous()
      Range("c1", Range("c65536").End(xlUp)).Select
   End Sub

Como Microsoft Office Excel 2007 oferece suporte a 1.048.576 linhas, use a seguinte macro no Excel 2007:

 Sub SelectRangeDown_Discontiguous()
      Range("c1", Range("c1048576").End(xlUp)).Select
   End Sub

Se você quiser selecionar a partir da célula ativa para baixo e todas as colunas à direita (supondo dados contíguos em todas as linhas e colunas), use o seguinte código:

   Sub myrangearea()
      Range(ActiveCell, ActiveCell.End(xlDown).End(xlToRight)).Select
   End Sub

Se você conhece a célula inicial (neste código de exemplo, a célula inicial é D1) e deseja selecionar para baixo a coluna e para a direita, use o seguinte código:

   Sub RangeFromStart()
      Range("d1", Range("d1").End(xlDown).End(xlToRight)).Select
   End Sub

Para selecionar todos os dados da região atual, use o seguinte código:

   Sub CurrentArea()
      Selection.CurrentRegion.Select
   End Sub

Os exemplos incluídos neste artigo mostram como selecionar intervalos variados na planilha ativa da pasta de trabalho atual.

Para obter informações adicionais sobre como selecionar intervalos com Visual Basic for Applications (e para exemplos mais avançados), clique no seguinte número de artigo para exibir o artigo na Base de Dados de Conhecimento da Microsoft:

291308 Como selecionar células/intervalos usando Visual Basic procedimentos em Excel