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

Como aumentar automaticamente a letra em uma para obter a próxima letra no Excel?

Supondo que você tenha uma célula contendo a letra AB, você precisa aumentar a última letra em um para obter a próxima letra AC, AD ... e assim por diante. Ou você tem uma letra A e deseja aumentá-la para B, C ... para criar uma lista de letras. Como conseguir isso? Este artigo pode ajudá-lo nos detalhes.

Aumente a letra AB em um para obter AC, AD ... com fórmula
Aumente a letra em um para obter a lista de letras com fórmula
Aumente a letra em um para obter a lista de letras com a função definida pelo usuário


Aumente a letra AB em um para obter AC, AD ... com fórmula

Faça o seguinte para aumentar a letra em um no Excel.

1. Selecione uma célula em branco abaixo da letra fornecida, insira a fórmula abaixo nela e pressione o botão Entrar chave. 

=IF(RIGHT($A2,1)="Z", CHAR(CODE(LEFT(A2,1))+1),LEFT(A2,1))&CHAR(65+MOD(CODE(RIGHT(A2,1))+1-65,26))

Importante: Na fórmula, A2 é a célula que contém a letra fornecida.

2. Continue selecionando A3, arraste a alça de preenchimento para baixo para obter a lista de letras de que você precisa.


Aumente a letra A em um para obter a lista de letras com fórmula

Você pode usar o = CHAR (CÓDIGO (A1) +1) fórmula para aumentar a letra em um no Excel. Faça o seguinte.

1. Selecione uma célula em branco abaixo da letra fornecida e insira a fórmula = CHAR (CÓDIGO (A2) +1) na Barra de Fórmula e pressione o botão Entrar chave. Veja a imagem:

2. Selecione a célula de resultado, arraste a alça de preenchimento para baixo para obter a letra que você precisa.

Importante: Com esta fórmula, depois de obter a letra Z, se você continuar arrastando a alça de preenchimento para baixo, obterá alguns caracteres especiais como mostrado na imagem abaixo. Se você deseja obter a letra AA após Z, a seguinte função definida pelo usuário pode ajudá-lo.


Aumente a letra em um para obter a lista de letras com a função definida pelo usuário

A seguinte função definida pelo usuário também pode ajudá-lo a aumentar a letra em um no Excel.

1. Pressione outro + F11 simultaneamente para abrir o Microsoft Visual Basic para Aplicações janela.

2. No Microsoft Visual Basic para Aplicações janela, clique em inserção > Módulo. Em seguida, copie e cole o código VBA abaixo no Módulo janela.

Código VBA: Aumente a letra em um para obter a lista de letras

Function ColLtrs(i As Long) As String
    ColLtrs = Replace(Cells(1, i).Address(False, False), "1", "")
End Function

3. Pressione outro + Q chaves para fechar o Microsoft Visual Basic para Aplicações janela.

4. Selecione uma célula em branco abaixo da letra fornecida e insira a fórmula = ColLtrs (ROW ()), e depois pressione o botão Entrar para obter a segunda letra.

2. Selecione a célula de resultado, arraste a alça de preenchimento para baixo para obter a letra que você precisa.

Importante: Com este método, as letras que você aumentou são baseadas no número da linha. Você precisa iniciar a primeira letra A na primeira linha da planilha, caso contrário, a letra ficará desordenada.


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-2019 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Teste gratuito de 30 dias com recursos completos. 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 (13)
Ainda não há classificações. Seja o primeiro a avaliar!
Este comentário foi feito pelo moderador no site
obrigado pelo acima. Mas e se você quiser incrementar de 400_A para 400_B? Eu tentei algumas coisas, mas só consigo fazer funcionar com números.
obrigado
chantal
Este comentário foi feito pelo moderador no site
Encontrou a resposta. Obrigada.
=ESQUERDA(B1,4)&"_"&CHAR(CÓDIGO(DIREITA(B1,1))+1)
chantal
Este comentário foi feito pelo moderador no site
a fórmula =ColLtrs(ROW()) funciona perfeitamente bem em uma célula do excel, preciso usar a mesma dentro de um VBA para me dar resultado de A a Z depois AA a AZ e assim por diante. Se eu usar CHAR no VBA ele tem limitação de ir somente até Z.
Afzal
Este comentário foi feito pelo moderador no site
Oi,
Maneira não continuar usando o código VBA? O código VBA acima pode criar letras de A a Z, depois AA a AZ e assim por diante para atender às suas necessidades.
cristal
Este comentário foi feito pelo moderador no site
Caro senhor
Quando executo a função =ColLtrs(ROW()) em uma planilha do Excel, obtenho resultados perfeitos, mas se eu quiser chamar essa função ou valor de célula no VBA, é possível. Então minha variável poderia ser i com valores 1,2,3,4,....27,28, etc e o resultado deveria ser A,B,C,D....,AA,AB e assim por diante. É possível?
obrigado
Afzal Sorathiya
Este comentário foi feito pelo moderador no site
Oi,
Selecione as células numéricas e execute o código abaixo para resolver o problema.

Sub NumTOAZ()
Dim xRg como intervalo
Dim xStr As String
On Error Resume Next
Para cada xRg na seleção
xStr = Replace(Cells(1, xRg.Value).Address(False, False), "1", "")
xRg.Value = xStr
Seguinte
End Sub
cristal
Este comentário foi feito pelo moderador no site
O Excel foi a planilha que substituiu o Lotus 1-2-3 e, tendo existido por tanto tempo, você pensaria que os gênios da Microsoft teriam criado um meio mais simples de recuperar um número de coluna de células, sem ter que escrever sua própria função. Em 2001, 2002, quando eu estava programando em VBA, havia apenas 65536 linhas em uma planilha do Excel, agora o número aumentou para ridículos 1.4 milhão de linhas. Não é o tamanho do banco de dados que conta, mas o quão inteligente você gerencia os dados em seu disco rígido, ao acessar esses dados através do Excel.

Se isso não o deixa chateado, então o esquema Bankers Rounding usado pelo Excel deve terminar o trabalho! Aprendemos matemática na escola, arredondamento básico, venha descobrir, a "guilda" dos banqueiros quer determinar como os valores em dinheiro são arredondados para melhor atender às suas vantagens. Por exemplo, 1.5 está mais próximo de 1 ou 2, mas é arredondado para 2, sendo o número par. 0.5 está mais próximo de 0 ou 1, mas sendo o número ímpar, eles o arredondam para 0. O sistema inteiro está corrompido e eles criam o software de negócios usado pelas empresas americanas.



Li um comentário abaixo do que estou abordando e alguém basicamente disse: "Tenho muitos amigos banqueiros e eles nunca ouviram falar do Bankers Rounding; Eles dizem que usaram um método chamado "5 Step Rounding" na UE. Então isso significa que o Bankers Rounding é usado apenas na sabotagem da economia americana, mas não é bom o suficiente para arruinar a economia europeia que está tentando dominar o mundo?! em sua arrogância!
Harold McBroom
Este comentário foi feito pelo moderador no site
Tudo o que o homem faz é corrupto. Tudo.
Me
Este comentário foi feito pelo moderador no site
Existe uma maneira de fazer isso para palavras inteiras? Onde cada letra da palavra sobe um número X de caracteres
Dan
Este comentário foi feito pelo moderador no site
Este código permitirá que você vá de A a ZZ.

=IF(B2="Z","AA",IF(LEN(B2)=1,CHAR(CODE(B2)+1),IF(RIGHT(B2,1)="Z",CHAR(CODE(LEFT(B2,1))+1),LEFT(B2,1))&CHAR(65+MOD(CODE(RIGHT(B2,1))+1-65,26))))
Zac
Este comentário foi feito pelo moderador no site
Como faço para recomeçar em A quando Z é usado?
Brick House
Este comentário foi feito pelo moderador no site
Eu preciso de um código de AZ, AA-ZZ, AAA para ZZZ, AAAA para ZZZZ
KarenS
Este comentário foi feito pelo moderador no site
Olá, desculpe não poder ajudar com este problema. Você pode postar o problema no fórum abaixo para obter ajuda de outros entusiastas do Excel.
https://www.extendoffice.com/forum/kutools-for-excel.html 
cristal
Não há comentários postados aqui ainda
Deixe o seu comentário
Postando como convidado
×
Avalie esta postagem:
0  Personagens
Locais sugeridos