Como clicar na letra do alfabeto para ir para a célula que começa com essa letra no Excel?
Ao usar uma planilha do Excel com grande quantidade de dados, você sabe como navegar ou encontrar certas células que contêm o conteúdo especificado rapidamente? Com o método neste artigo, você pode clicar em uma célula de letra do alfabeto para navegar até a célula cujo conteúdo começa com essa letra do alfabeto automaticamente.
Clique na letra do alfabeto para ir para a célula que começa com aquela letra com o código VBA
Clique na letra do alfabeto para ir para a célula que começa com aquela letra com o código VBA
Faça o seguinte para ir para uma célula clicando em uma célula do alfabeto no Excel.
1. Na planilha, você precisa ir para uma célula clicando em uma célula do alfabeto, clicar com o botão direito do mouse na guia da planilha e clicar em Ver código no menu do botão direito. Veja a imagem:
2. Então um Microsoft Visual Basic para Aplicações janela for exibida, copie e cole o código VBA abaixo na janela de código.
Código VBA: Clique na letra do alfabeto para ir para a célula que começa com essa letra
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim xRg As Range
Dim xCell As Range
Dim xRgRtn As Range
On Error Resume Next
Application.EnableEvents = False
If Not Intersect(Target, Range("1:1")) Is Nothing Then
Set xRg = ActiveSheet.UsedRange
Set xRg = xRg(1).Offset(1, 0).Resize(xRg.Rows.Count, xRg.Columns.Count)
For Each xCell In xRg
If Left(xCell.Value, 1) = Target.Value Then
If xRgRtn Is Nothing Then
Set xRgRtn = xCell
Else
Set xRgRtn = Application.Union(xRgRtn, xCell)
End If
End If
Next
If xRgRtn.Address = Target.Address Then
MsgBox "No matched cell found", , "KuTools For Excel"
Else
xRgRtn.Select
End If
End If
Application.EnableEvents = True
End Sub
Anote os: No código, 1: 1 significa que as letras do alfabeto estão localizadas na primeira linha da planilha.
3. aperte o outro + Q simultaneamente para fechar o Microsoft Visual Basic para Aplicações janela.
A partir de agora, ao clicar em uma célula do alfabeto, todas as células que começam com aquela letra são selecionadas de uma só vez na planilha automaticamente.
Se nenhuma célula começar com a letra selecionada, você receberá uma Kutools for Excel caixa de diálogo como a imagem abaixo mostrada.
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com Kutools for Excele experimente eficiência como nunca antes. Kutools for Excel Oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab Traz a interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
