Como selecionar intervalos utilizando Visual Basic for Applications (exemplos novices)

Exemplos de como selecionar células manualmente

Para selecionar manualmente todos os dados numa coluna, selecione a primeira célula e prima Ctrl+Shift+Seta Para Baixo.

Da mesma forma, para selecionar manualmente uma linha e todas as colunas anexadas à linha, prima Ctrl+Shift+Seta Para Baixo+Seta Para a Direita. No entanto, todos os dados têm de ser contíguos (ou seja, não pode ter linhas ou colunas em branco). Além disso, pode selecionar a região de dados atual (dados contíguos, sem linhas ou colunas em branco) ao fazer 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, em seguida, clique emOK
   .

Também pode selecionar este intervalo utilizando código Visual Basic for Applications simples.

Nota Se tentar gravar este procedimento com o gravador de macros, não receberá os mesmos resultados.

Exemplos de como utilizar um Visual Basic para selecionar células num intervalo

A Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita. Isto inclui, mas não se limita, às garantias implícitas de comerciante ou adequação a um fim específico. Este artigo assume que está familiarizado com a linguagem de programação que está a ser demonstrada e com as ferramentas utilizadas 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 irão modificar estes exemplos de forma a fornecer funcionalidades ou procedimentos de construção adicionados para satisfazer os seus requisitos específicos. Os seguintes Visual Basic de código mostram-lhe como selecionar intervalos variados.

Se conhecer a célula inicial (neste exemplo, a célula inicial é a célula C1) e quiser selecionar até à última célula (na mesma coluna) que tem dados mas não sabe esse endereço, utilize o seguinte código:

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

Nota A macro SelectRangeDown assume que os seus dados são contíguos. Caso contrário, se houver células em branco na coluna de dados que está a selecionar, esta macro poderá não selecionar todas as células na coluna.

Se os seus dados começarem na célula C1, mas não for contíguos na mesma, utilize 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 suporta 1.048.576 linhas, utilize a seguinte macro no Excel 2007:

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

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

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

Se conhecer a célula inicial (neste código de exemplo, a célula inicial é D1) e quiser selecionar a coluna abaixo e à direita, utilize o seguinte código:

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

Para selecionar todos os dados na região atual, utilize o seguinte código:

   Sub CurrentArea()
      Selection.CurrentRegion.Select
   End Sub

Os exemplos incluídos neste artigo mostram-lhe como selecionar intervalos variados na livro ativo do seu livro atual.

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

291308 Como selecionar células/intervalos através Visual Basic procedimentos na Excel