Note: The other languages of the website are Google-translated. Back to English

Como rapidamente reticular destacar a célula ativa no Excel?

Se houver dados de várias colunas e linhas em uma planilha, você já imaginou ao ativar uma célula, sua coluna e linha relativas são realçadas? Por exemplo, clique em F11 e a coluna F e a linha 11 serão destacadas ao mesmo tempo, conforme a imagem abaixo mostrada. Aqui, este artigo apresenta os truques rápidos que podem ajudá-lo a destacar a célula ativa no Excel.
doc crosshair destaque 1

Destaque cruzado da célula ativa com VBA

Destaque cruzado da célula ativa com o Kutools para Excel boa ideia 3


Destaque cruzado da célula ativa com VBA

No Excel, não há nenhuma função interna que possa ajudá-lo a destacar a célula ativa, mas aqui eu apresento um VBA que pode ajudar a destacar a linha e a coluna da célula ativa.

1. Pressione Alt + F11 chaves para abrir Microsoft Visual Basic para Aplicações janela.

2. Em seguida, no Projeto painel, clique duas vezes na planilha em que deseja aplicar este VBA e, a seguir, copie e cole o código VBA abaixo no script correto. Veja a imagem:

Dica: Se o painel Projeto estiver oculto, clique em Veja > Explorador de Projetos in Microsoft Visual Basic para Aplicações janela para exibi-lo.

VBA: Crosshair destaca a célula ativa.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice6/1/2016
    Application.ScreenUpdating = False
    With Target
        .Worksheet.Cells.Interior.ColorIndex = 0
        .EntireRow.Interior.Color = vbYellow
        .EntireColumn.Interior.Color = vbYellow
    End With
    Application.ScreenUpdating = True
End Sub
doc crosshair destaque 2

3. Em seguida, salve e feche o VBA e, agora, quando você ativa uma célula, sua linha e coluna relativas são destacadas.
doc crosshair destaque 3

Se você quiser destacar apenas a célula ativa, você pode usar o seguinte VBA.

VBA: realce a célula ativa que você selecionar

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice6/1/2016
    Application.ScreenUpdating = False
    Target.Worksheet.Cells.Interior.ColorIndex = 0
    Target.Interior.Color = vbYellow
    Application.ScreenUpdating = True
End Sub

Nota: Nos códigos VBA acima, o ColorIndex pode mudar como você quiser.


Destaque cruzado da célula ativa com o Kutools para Excel

Se você não estiver familiarizado com o VBA, você pode tentar aplicar Kutools for Excel'S Layout de leitura utilitário para rapidamente destacar a célula ativa.

Kutools for Excel, com mais de 300 funções úteis, tornam seus trabalhos mais fáceis. 

Depois de instalação grátis Kutools para Excel, faça o seguinte:

Clique Kutools > Layout de leitura para habilitar o Layout de leitura Utilitário. Veja a imagem:
doc crosshair destaque 4

NOTA

1. Clique Kutools > Layout de leitura novamente para desativar este utilitário.

2. Clique Kutools > Layout de leitura > Configurações de layout de leitura para especificar as formas, estilos e cores que você precisa no Configurações de layout de leitura diálogo. Veja a imagem:
doc crosshair destaque 5

Dica: Este utilitário se aplica a toda a pasta de trabalho.


As melhores ferramentas de produtividade para escritório

O Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Insira rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de discussão e enviar emails ...
  • Barra Super Fórmula (edite facilmente várias linhas de texto e fórmula); Layout de leitura (ler e editar facilmente um grande número de células); Colar na faixa filtrada...
  • Mesclar células / linhas / colunas sem perder dados; Dividir o conteúdo das células; Combinar linhas / colunas duplicadas... Evite células duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Único Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros; Seleção aleatória ...
  • Cópia exata Várias células sem alterar a referência da fórmula; Criação automática de referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Extrair Texto, Adicionar texto, remover por posição, Remover Espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salvar e aplicar esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro Especial por negrito, itálico ...
  • Combine pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Divida os dados em várias folhas; Conversão em lote de xls, xlsx e PDF...
  • Mais de 300 recursos poderosos. Suporta Office / Excel 2007-2021 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Recursos completos de avaliação gratuita de 30 dias. Garantia de devolução do dinheiro em 60 dias.
guia kte 201905

Guia do Office traz 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!
parte inferior da aba do escritório
Comentários (2)
Ainda não há classificações. Seja o primeiro a avaliar!
Este comentário foi feito pelo moderador no site
Oi. Você pode, por favor, ajudar com um código VBA que não remova a formatação da célula ou as células coloridas anteriores.
Este comentário foi feito pelo moderador no site
Olá, o código VBA não pode satisfazer a sua necessidade, sugiro que experimente o Kutools for Excel.
Não há comentários postados aqui ainda
Deixe o seu comentário
Postando como convidado
×
Avalie esta postagem:
0   Personagens
Locais sugeridos

Siga-nos

Copyright © 2009 - www.extendoffice.com. | Todos os direitos reservados. Distribuído por ExtendOffice. | | | Mapa do site
Microsoft e o logotipo do Office são marcas comerciais ou marcas registradas da Microsoft Corporation nos Estados Unidos e / ou em outros países.
Protegido por Sectigo SSL