Como selecionar e destacar células diagonais no Excel?
No Excel, geralmente precisamos selecionar várias células, mas você já tentou selecionar e destacar as células diagonais em um intervalo? Neste artigo, apresentarei um código VBA para selecionar rapidamente células diagonais para você.
Selecionar e destacar células diagonais
Selecionar e destacar células diagonais
Para selecionar células diagonais, você pode usar um código de macro.
1. Selecione a célula onde deseja iniciar a seleção diagonal e pressione as teclas Alt + F11 para ativar a janela Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole o código abaixo no script.
VBA: Selecionar células diagonais
Sub selectDiag()
'UpdatebyExtendoffice20171128
Dim I As Long
Dim xCount As Long
Dim xRg As Range
On Error Resume Next
Set xRg = ActiveCell
If xRg Is Nothing Then Exit Sub
xCount = Val(InputBox("How many cells do you want to select diagonally?", "KuTools For Excel"))
If xCount = 0 Then Exit Sub
For I = 1 To (xCount - 1)
Set xRg = Union(xRg, ActiveCell.Offset(I, I))
Next I
xRg.Select
End Sub
3. Pressione F5 e uma caixa de diálogo aparecerá para lembrá-lo de selecionar células; digite o número de células diagonais que deseja selecionar na caixa de texto.
4. Clique OK. As células diagonais na seleção foram selecionadas.
Em seguida, você pode destacar as células com a cor de fundo.

Desbloqueie a Magia do Excel com o Kutools AI
- Execução Inteligente: Realize operações de células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- Fórmulas Personalizadas: Gere fórmulas sob medida para otimizar seus fluxos de trabalho.
- Codificação VBA: Escreva e implemente código VBA sem esforço.
- Interpretação de Fórmulas: Compreenda fórmulas complexas com facilidade.
- Tradução de Texto: Supere barreiras linguísticas dentro de suas planilhas.
Artigos Relacionados
- Como aplicar formatação condicional a valores que não estão entre dois números no Excel?
- Como destacar duplicatas e datas sobrepostas no Excel?
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.





- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins