É possível fazer o cursor da célula piscar no excel?

Question

Eu tenho uma planilha grande - com bastante cor e fonte em negrito, etc.

Geralmente, é difícil ver o cursor, ou seja, encontrar a célula selecionada. Apenas aparece como uma linha verde ligeiramente mais grossa ao redor da célula.

Posso tornar o cursor da célula muito mais proeminente, por ex. piscar? Esse recurso parece estar presente em quase todos os aplicativos de texto: o cursor é uma linha ou caixa piscando. Mas não em planilhas! ou, pelo menos, não conheço nenhum programa de planilha eletrônica que tenha esse recurso. Existe uma razão óbvia para que não, ou estou faltando alguma outra maneira óbvia de tornar a célula selecionada facilmente visível?

    

Answer 1

am I missing some other obvious way to make the selected cell easily visible?

Bem, quando você não está digitando ativamente em uma célula (ou na barra de fórmulas), a “Caixa de Nome” (na borda esquerda da tela, à esquerda da barra de fórmulas e logo abaixo da faixa de opções) mostra as coordenadas da célula atual:

(Sevocêtiverváriascélulase/ouváriasregiõesselecionadas,eleexibeocantosuperioresquerdodaregiãomaisrecenteselecionada.)

Alémdisso(comotambémilustradoacima),o(s)cabeçalho(s)dacolunaeo(s)rótulo(s)dalinhacorrespondenteà(s)célula(s)ativa(s)sãodestacadas.

Alémdisso,achoquetocarnasteclasdedireção(←,↑,↓e→)paramoveracélulaativaajudaadestacá-loemmeioàdesordem.Claroquevocênãodevefazerissosevocêtiverváriascélulase/ouváriasregiõesselecionadas,comovaiacabarcomessaseleçãoedeixarvocêcomumaúnicacélulaselecionada.(MasShift+tecladesetadedireçãoiráexpandiroureduziraseleçãoenãoapagá-la.)

Aquiestáoutraabordagem.Éumpoucopesado,masissopodeserexatamenteoquevocêprecisasesuaplanilhaestivertãoconfusaquevocêtemdificuldadeemverasárvoresparaafloresta.Naguia"Página inicial", na faixa de opções, no painel "Células", clique em “Inserir” e selecione “Inserir linhas de folha” ou “Inserir colunas de folha”.

Estesirãoinserirlinhasembrancoacimada(s)linha(s)atualmenteselecionada(s)(ouinserircoluna(s)embrancoàesquerdada(s)coluna(s)atualmenteselecionada(s),respectivamente).Onúmerodelinhas(oucolunas)inseridaséigualaonúmerodelinhas(oucolunas)atualmenteselecionadas.Anovaáreaficaráembranco(istoé,ascélulasterãoconteúdoembranco),emboraelesherdarãoaformataçãodascélulasacima(ouàesquerdade)paraascélulasselecionadas.

IssopodecriarumefeitoIssoévisualmentemaisdramáticodoqueasoutrassugestões.Claro,essescomandosmodificamaplanilha,entãovocêdevesegui-losimediatamentecomum"desfazer", ou com a função complementar "Excluir".

"Inserir células ..." também funcionará, mas não tão bem.

Todas essas soluções ativas (as chaves de seta de direção e os "Insert" rolará a planilha para exibir a célula atual, se necessário.

    

Answer 2

Scott sugeriu bom lista .

Deixe-me sugerir algumas outras maneiras:

Você pode pressionar Ctrl + C para copiar a (s) célula (s) ativa (s). Uma borda piscando surgirá em torno da (s) célula (s). (Isso às vezes falha se houver várias seleções.) Você pode pressionar Esc para parar o piscar.

Você pode pressionar Shift + Barra de Espaço para selecionar a (s) linha (s) correspondente (s) à seleção mais recente, ou Ctrl + Barra de espaço para selecionar a (s) coluna (s) correspondente (s). Infelizmente, se você tem uma região selecionada, estes resultam na própria seleção sendo perdida. Por exemplo, se você tiver a região F17:H42 selecionada e você pressiona Shift + Barra de Espaço , você obterá linhas 17:42 selecionado. Uma das células de canto originais ( F17 , H17 , F42 ou H42 ) pode ser destacado, mas, em geral, você não tem como saber os dois limites da coluna da seleção original ( F e H ).

Você pode pressionar Ctrl + Backspace para mostrar o ativo (mais recentemente selecionada) célula. Se você rolar para fora da célula ativa, pressionando Ctrl + Backspace irá rolar de volta para a visualização.

    

Answer 3

Veja mais uma ideia inspirada na resposta de Leonardo Alves Machado . Crie estas rotinas de VBA (“macros”):

Sub Flash()
'
' Flash Macro
'
    Call toggle
    Application.OnTime Now + TimeValue("00:00:01"), "toggle"
'
End Sub

Sub toggle()
'
    For Each cell In Selection
        tmp = cell.Interior.Color
        ' Things can be explicitly colored white ((255,255,255) = (FF,FF,FF) = &HFFFFFF),
        ' but white things are often actually uncolored.  Check whether this cell actually
        ' has no color and no pattern, and, if so, set a fake just-barely-off-white color
        ' that serves as a flag.
        If tmp = &HFFFFFF And cell.Interior.ColorIndex = xlNone _
                                                And cell.Interior.Pattern = xlNone Then
            tmp = &HFFFFFE      ' &HFFFFFF = pure white; &HFFFFFE = (pure white) - 1
        End If
        Red = tmp Mod 256
        tmp = tmp \ 256
        Grn = tmp Mod 256
        tmp = tmp \ 256
        Blu = tmp Mod 256
        ' Change to a different color (through a reversable process).
        Red = (Red + 128) Mod 256
        Grn = (Grn + 128) Mod 256
        Blu = (Blu + 128) Mod 256
        tmp = RGB(Red, Grn, Blu)
        ' If we're being called for the second time, the above reconstructs the original
        ' color.  If the reconstructed color is &HFFFFFE, that (probably) means that
        ' the cell was originally uncolored, in which case we restore it to that state.
        ' Otherwise, just restore the color.
        If tmp = &HFFFFFE Then
            cell.Interior.Pattern = xlNone
        Else
            cell.Interior.Color = tmp
        End If
    Next
End Sub

Agora, quando você executar a rotina Flash , ele chamará toggle , que altera a cor de preenchimento (interior) de todas as células na seleção para algo radicalmente diferente. (Se você pode melhorar este algoritmo de inversão de cores, por favor, diga-nos o que você faz.) Em seguida, ele agenda toggle para ser chamado novamente um segundo depois; isso restaurará as cores originais e produzirá um efeito intermitente.

Se você quer piscar mais de uma vez, basta alterar a macro de chamada para algo como

    Call toggle
    Application.OnTime Now + TimeValue("00:00:01"), "toggle"
    Application.OnTime Now + TimeValue("00:00:02"), "toggle"
    Application.OnTime Now + TimeValue("00:00:03"), "toggle"
    Application.OnTime Now + TimeValue("00:00:04"), "toggle"
    Application.OnTime Now + TimeValue("00:00:05"), "toggle"

Modificando toggle para trabalhar em toda a coluna e / ou linha atual é simples e é deixado como um exercício.

O código é um pouco mais complicado do que deveria ser. Eu tentei explicar porque nos comentários, mas deixei de fora a lógica, que é, quando uma célula do Excel tem "preenchimento" especificado, mesmo que seja branco sólido, as linhas de fronteira desaparecem. Você pode ver isso por si mesmo, definindo a célula B2 ter um preenchimento de branco sólido:

Antes de adicionar o caso especial, quando eu corri o código Flash em uma célula sem cor (formato padrão), a primeira chamada para toggle mudou para cinza sólido (127.127.127) e a segunda chamada mudou "de volta" para branco sólido - que, claro, não era o que era antes, e que fez com que as linhas de fronteira desaparecessem.

Se você mover o cursor antes que a sequência piscando seja concluída, toggle mudará a (s) cor (es) da seleção original, e depois da nova seleção (modificada). Então, essas mudanças não se cancelarão (como deveriam), e assim você terá um monte de células com suas cores alteradas. Então não faça isso.

    

Answer 4

Eu acredito que há um caminho. Eu encontrei este blog que ensina como fazê-lo. Basicamente diz:

1. Selecione a célula que você deseja ativar e desativar.
2. Escolha Estilo no menu Formatar. Excel exibe a caixa de diálogo estilo.
3. Na caixa Nome do estilo, insira um novo nome de estilo. (Para este exemplo, use o nome do estilo Flashing.)
4. Usando os controles na caixa de diálogo, modifique todos os atributos para o estilo, conforme desejar.
5. Clique em OK.

Agora você pode aplicar o estilo a qualquer outra célula desejada em sua pasta de trabalho. Agora crie as macros (há duas delas), da seguinte maneira:

Dim NextTime As Date

Sub StartFlash()
    NextTime = Now + TimeValue("00:00:01")
    With ActiveWorkbook.Styles("Flashing").Font
        If .ColorIndex = xlAutomatic Then .ColorIndex = 3
        .ColorIndex = 5 - .ColorIndex
    End With
    Application.OnTime NextTime, "StartFlash"
End Sub

Sub StopFlash()
    Application.OnTime NextTime, "StartFlash", schedule:=False
    ActiveWorkbook.Styles("Flashing").Font.ColorIndex = xlAutomatic
End Sub

Para iniciar os itens piscando, basta executar o StartFlash. As células formatadas com o estilo Flashing alternam entre texto vermelho e branco aproximadamente uma vez por segundo. Quando você quiser desligar o flash, simplesmente execute a macro StopFlash.