Este tutorial demonstrará como selecionar e trabalhar com linhas ou colunas inteiras no VBA.
Primeiro, abordaremos como selecionar linhas e colunas inteiras e, em seguida, demonstraremos como manipular linhas e colunas.
Selecione Linhas ou Colunas Inteiras
Selecione uma única linha
Você pode selecionar uma linha inteira com o Objeto de linhas assim:
1 | Linhas (5) .Selecionar |
Ou você pode usar WholeRow juntamente com o Faixa ou Objetos de Células:
1 | Intervalo ("B5"). WholeRow.Select |
ou
1 | Células (5,1) .EntireRow.Select |
Você também pode usar o Objeto de alcance para se referir especificamente a uma linha:
1 | Intervalo ("5: 5"). Selecione |
Selecione uma coluna
Ao invés de Objeto de linhas, use o Objeto de Colunas para selecionar colunas. Aqui você pode fazer referência ao número da coluna 3:
1 | Colunas (3) .Selecionar |
ou a letra “C”, entre aspas:
1 | Colunas ("C"). Selecione |
Ao invés de WholeRow, usar Coluna inteira juntamente com o Faixa ou Objetos de Células para selecionar colunas inteiras:
1 | Intervalo ("C5"). ColunaInteira.Selecione |
ou
1 | Células (5,3) .EntireColumn.Select |
Você também pode usar o Objeto de alcance para se referir especificamente a uma coluna:
1 | Intervalo ("B: B"). Selecione |
Selecione várias linhas ou colunas
A seleção de várias linhas ou colunas funciona exatamente da mesma maneira ao usar WholeRow ougetherColumn:
1 | Intervalo ("B5: D10"). WholeRow.Select |
ou
1 | Intervalo ("B5: B10"). WholeColumn.Select |
No entanto, ao usar os objetos Linhas ou Colunas, você deve inserir os números das linhas ou letras das colunas entre aspas:
1 | Linhas ("1: 3"). Selecione |
ou
1 | Colunas ("B: C"). Selecione |
Selecione linha ou coluna ActiveCell
Para selecionar a linha ou coluna ActiveCell, você pode usar uma destas linhas de código:
1 | ActiveCell.EntireRow.Select |
ou
1 | ActiveCell.EntireColumn.Select |
Selecionar linhas e colunas em outras planilhas
Para selecionar Linhas ou Colunas em outras planilhas, você deve primeiro selecionar a planilha.
12 | Folhas ("Folha2"). SelecioneLinhas (3) .Selecionar |
O mesmo se aplica ao selecionar linhas ou colunas em outras pastas de trabalho.
123 | Pastas de trabalho ("Book6.xlsm"). AtiveFolhas ("Folha2"). SelecioneLinhas (3) .Selecionar |
Nota: você deve Ativar a pasta de trabalho desejada. Ao contrário do Objeto de planilhas, a Objeto de pasta de trabalho não tem um Selecione o Método.
É necessário selecionar linhas e colunas?
No entanto, (quase?) Nunca é necessário selecionar Linhas ou Colunas. Você não precisa selecionar uma linha ou coluna para interagir com eles. Em vez disso, você pode aplicar Métodos ou Propriedades diretamente às Linhas ou Colunas. As próximas seções demonstrarão diferentes métodos e propriedades que podem ser aplicados.
Você pode usar qualquer método listado acima para se referir a Linhas ou Colunas.
Métodos e propriedades de linhas e colunas
Excluir linhas ou colunas inteiras
Para excluir linhas ou colunas, use o Método de exclusão:
1 | Linhas ("1: 4"). Excluir |
ou:
1 | Colunas ("A: D"). Excluir |
Inserir linhas ou colunas
Use o Método de Inserção para inserir linhas ou colunas:
1 | Linhas ("1: 4"). Inserir |
ou:
1 | Colunas ("A: D"). Inserir |
Copiar e colar linhas ou colunas inteiras
Colar na linha ou coluna existente
Ao copiar e colar linhas ou colunas inteiras, você precisa decidir se deseja colar sobre uma linha / coluna existente ou se deseja inserir uma nova linha / coluna para colar seus dados.
Estes primeiros exemplos irão copiar e colar sobre uma linha ou coluna existente:
1 | Intervalo ("1: 1"). Intervalo de cópia ("5: 5") |
ou
1 | Intervalo ("C: C"). Intervalo de cópia ("E: E") |
Inserir e colar
Os próximos exemplos serão colados em uma linha ou coluna recém-inserida.
Isso copiará a linha 1 e inserirá na linha 5, deslocando as linhas existentes para baixo:
12 | Intervalo ("1: 1"). CopiarIntervalo ("5: 5"). Insira |
Isso irá copiar a coluna C e inseri-la na coluna E, deslocando as colunas existentes para a direita:
12 | Intervalo ("C: C"). CopiarIntervalo ("E: E"). Inserir |
Ocultar / Reexibir linhas e colunas
Para ocultar linhas ou colunas, defina seus Propriedades Ocultas para verdadeiro. Use False para ocultar as linhas ou colunas:
12345 | 'Ocultar linhasLinhas ("2: 3"). WholeRow.Hidden = True'Reexibir linhasLinhas ("2: 3"). WholeRow.Hidden = False |
ou
12345 | 'Esconder ColunasColunas ("B: C"). WholeColumn.Hidden = True'Mostrar colunasColunas ("B: C"). WholeColumn.Hidden = False |
Grupo / Desagrupar linhas e colunas
Se você deseja agrupar linhas (ou colunas), use um código como este:
12345 | 'Grupo RowsLinhas ("3: 5"). Grupo'Colunas de GrupoColunas ("C: D"). Grupo |
Para remover o agrupamento, use este código:
12345 | 'Desagrupar linhasLinhas ("3: 5"). Desagrupar'Desagrupar colunasColunas ("C: D"). Desagrupar |
Isso irá expandir todos os níveis de estrutura de tópicos “agrupados”:
1 | ActiveSheet.Outline.ShowLevels RowLevels: = 8, ColumnLevels: = 8 |
e isso reduzirá todos os níveis de contorno:
1 | ActiveSheet.Outline.ShowLevels RowLevels: = 1, ColumnLevels: = 1 |
Definir altura da linha ou largura da coluna
Para definir a largura da coluna, use esta linha de código:
1 | Colunas ("A: E"). Largura da coluna = 30 |
Para definir a altura da linha, use esta linha de código:
1 | Linhas ("1: 1"). RowHeight = 30 |
Ajuste automático da altura da linha / largura da coluna
Para ajustar automaticamente uma coluna:
1 | Colunas ("A: B"). Ajuste automático |
Para ajustar automaticamente uma linha:
1 | Linhas ("1: 2"). Ajuste automático |
Linhas e colunas em outras planilhas ou pastas de trabalho
Para interagir com linhas e colunas em outras planilhas, você deve definir o Objeto de planilhas:
1 | Folhas ("Folha2"). Linhas (3) .Inserir |
Da mesma forma, para interagir com linhas e colunas em outras pastas de trabalho, você também deve definir o Objeto de pasta de trabalho:
1 | Pastas de trabalho ("book1.xlsm"). Folhas ("Folha2"). Linhas (3) .Inserir |
Obter linha ou coluna ativa
Para obter a linha ou coluna ativa, você pode usar o Linha e Propriedades da coluna do Objeto ActiveCell.
1 | MsgBox ActiveCell.Row |
ou
1 | MsgBox ActiveCell.Column |
Isso também funciona com o Objeto de alcance:
1 | Intervalo de MsgBox ("B3"). Coluna |