Como alterar a altura da linha / largura da coluna alternadamente no Excel?
Suponha que você tenha uma planilha grande com várias colunas ou linhas que precisam ter sua largura ou altura ajustadas alternadamente. Você pode alterar a altura da linha ou a largura da coluna uma por uma manualmente se houver poucas colunas ou linhas. Mas, como você poderia alterar várias alturas de linha ou larguras de coluna de uma só vez no Excel?
Alterar a altura de cada outra linha com a função Filtro
Alterar a altura de cada outra linha / largura da coluna com código VBA
Alterar a altura de cada outra linha / largura da coluna com Kutools para Excel
Alterar a altura de cada outra linha com a função Filtro
Ao usar a função Filtro, você precisa criar uma coluna auxiliar primeiro e, em seguida, aplicar o recurso Filtro para filtrar as linhas desejadas e ajustar toda a altura das linhas filtradas de uma só vez. Por favor, faça o seguinte:
1. Ao lado dos seus dados, em uma célula em branco, insira os números 0 e 1 separadamente na primeira e segunda linha, depois selecione-os e arraste a alça de preenchimento sobre o intervalo de células que deseja ajustar a altura da linha e marque Copiar Células na forma da alça de preenchimento, e você obterá o resultado conforme a captura de tela a seguir:
2. Em seguida, selecione a coluna auxiliar e clique em Dados > Filtro, depois clique no botão e selecione 0 ou 1 na lista suspensa, neste exemplo, vou selecionar 0, veja a captura de tela:
3. Clique em OK, todas as linhas que contêm o número 0 foram filtradas. E então selecione essas linhas filtradas e clique em Página Inicial > Formatar > Altura da Linha, veja a captura de tela:
4. Na caixa de diálogo Altura da Linha, insira a altura da linha desejada, veja a captura de tela:
5. Em seguida, clique em OK para fechar esta caixa de diálogo, e a altura das linhas filtradas selecionadas foi ajustada. Por último, clique em Dados > Filtro para cancelar o recurso de filtro, e a altura da sua linha foi alterada alternadamente. Veja a captura de tela:
Notas:
1. Você pode alterar a altura da linha alternadamente começando na primeira linha.
2. Este método não é aplicado para alterar a largura da coluna.
3. Após concluir o procedimento, você pode excluir a coluna auxiliar conforme necessário.
Alterar a altura de cada outra linha / largura da coluna com código VBA
Se você precisar alterar tanto a altura da linha quanto a largura da coluna, o seguinte código VBA pode ajudá-lo.
1. Pressione as teclas ALT + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole o seguinte código na Janela do Módulo.
Código VBA: Alterar a altura de cada outra linha em uma planilha
Sub RowHeight()
'Update 20140625
Dim Rng As Range
Dim WorkRng As Range
Dim xInput As Long
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xInput = Application.InputBox("Row height", xTitleId, "", Type:=2)
For i = 1 To WorkRng.Rows.Count Step 2
WorkRng.Rows(i).RowHeight = xInput
Next
End Sub
3. Em seguida, pressione a tecla F5 para executar este código, e uma caixa de prompt aparecerá para lembrá-lo de selecionar o intervalo que deseja ajustar a altura da linha, veja a captura de tela:
4. E então clique em OK, outra caixa de prompt aparecerá para permitir que você insira a altura da linha necessária, veja a captura de tela:
5. E então clique em OK, a altura da linha do intervalo selecionado foi alterada alternadamente a partir da primeira linha. Veja a captura de tela:
Notas:
1. Se você quiser ajustar a largura de cada outra coluna, aplique o seguinte código VBA:
Código VBA: Alterar a largura de cada outra coluna em uma planilha
Sub CloumnWidth()
'Update 20140625
Dim Rng As Range
Dim WorkRng As Range
Dim xInput As Long
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xInput = Application.InputBox("Cloumn width", xTitleId, "", Type:=2)
For i = 1 To WorkRng.Columns.Count Step 2
WorkRng.Columns(i).ColumnWidth = xInput
Next
End Sub
2. Se você quiser alterar a altura da linha ou a largura da coluna começando na segunda linha / coluna, basta selecionar o intervalo de dados a partir da segunda linha / coluna.
Alterar a altura de cada outra linha / largura da coluna com Kutools para Excel
Se você instalou Kutools para Excel, sua ferramenta Selecionar Intervalos de Linhas e Colunas também pode ajudá-lo a selecionar cada outra linha ou coluna primeiro e, em seguida, alterar a altura da linha e a largura da coluna ao mesmo tempo.
Kutools para Excel inclui mais de 300 ferramentas úteis para Excel. Gratuito para experimentar sem limitação por 30 dias. Obtenha agora.
1. Selecione o intervalo de dados que deseja usar.
2. Vá até Kutools > Selecionar > Selecionar Intervalos de Linhas e Colunas, veja a captura de tela:
3. Na caixa de diálogo Selecionar Intervalos de Linhas e Colunas, marque Linhas ou Colunas na seção Selecionar conforme desejar, e depois na seção Opções, insira o Intervalo e o número de Colunas ou Linhas neles, neste exemplo, escolherei colunas, veja a captura de tela:
4. Em seguida, clique em OK, cada outra coluna foi selecionada na seção, veja a captura de tela:
5. E então clique em Página Inicial > Formatar > Largura da Coluna, e insira o número da largura da coluna desejada na caixa de diálogo Largura da Coluna, veja as capturas de tela:
![]() | ![]() | ![]() |
6. Em seguida, clique em OK, e a largura da coluna foi alterada alternadamente a partir da primeira coluna.
Notas:
1. Para selecionar cada outra linha, marque Linhas na caixa de diálogo Selecionar Intervalos de Linhas e Colunas na etapa 3.
2. Se você quiser alterar a altura da linha ou a largura da coluna começando na segunda linha / coluna, basta selecionar o intervalo de dados a partir da segunda linha / coluna.
Artigos relacionados:
Como sombrear cada outra linha ou linhas alternadas no Excel?
Como excluir rapidamente cada outra linha no Excel?
Melhores Ferramentas de Produtividade para Office
Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
O Office Tab traz interface com abas para o Office e facilita muito o seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas na mesma janela, em vez de abrir novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!