Atalho de teclado para alterar maiúsculas e minúsculas de texto nas células no Excel 2010?


Respostas:


8

A sugestão de Paul é boa ou você pode escrever suas próprias macros e atribuir teclas de atalho

 Sub makeUPPER()
  ActiveCell = UCase(ActiveCell)
 End Sub

 Sub makeLOWER()
  ActiveCell = LCase(ActiveCell)
 End Sub

4

Usei a seguinte técnica para converter uma coluna de texto em maiúsculas.

  1. Mova o cursor para uma coluna em branco.
  2. Na célula vazia na mesma linha que a primeira célula que você deseja converter, digite =upper(A3), se A3 for a primeira célula que você deseja converter.
  3. A célula anteriormente vazia agora deve mostrar o equivalente em maiúscula da sua primeira célula de texto.
  4. Copie esta célula na coluna para a mesma altura que todo o seu texto.
  5. Agora você deve ter uma coluna equivalente ao seu texto, mas todas em maiúsculas.
  6. Destaque todas as células do texto em maiúsculas e selecione copiar.
  7. Clique com o botão esquerdo do mouse na primeira célula do texto de origem (que não está em maiúsculas), que selecionará a célula.
  8. Clique com o botão direito do mouse.
  9. Selecione Colar Especial
  10. Na caixa de listagem, selecione o botão de opção "Valores" e clique em OK.
  11. Agora você terá 2 colunas de texto em maiúsculas.
  12. Exclua a coluna que contém as =upper()fórmulas.

O mesmo princípio funciona para as funções de manipulação de texto adequada e outras.


1

Se você instalar o excelente suplemento ASAP Utilities Excel (gratuito para uso pessoal) ...

http://www.asap-utilities.com/download-asap-utilities.php

isso possui MAIÚSCULAS embutidas e opções em minúsculas (além de um zilhão de outras) às quais você pode atribuir teclas de atalho (consulte o site para obter mais informações)


0

Copie o texto que você deseja alterar para maiúsculas e minúsculas para colar na palavra, realce-o e pressione Shift + f3 até que tudo esteja no caso desejado e recorte e cole novamente.


Isso não parece prático para várias células.
David Richerby

0

Isso funciona melhor para mim, pois funciona em várias seleções de células:

Sub Uppercase()
    For Each Cell In Selection
        If Not Cell.HasFormula Then
            Cell.Value = UCase(Cell.Value)
        End If
    Next Cell
End Sub
Ao utilizar nosso site, você reconhece que leu e compreendeu nossa Política de Cookies e nossa Política de Privacidade.
Licensed under cc by-sa 3.0 with attribution required.