Note: The other languages of the website are Google-translated. Back to English
Log in  \/ 
x
or
x
Inscreva-se  \/ 
x

or

Como quebrar ou dividir o número em dígitos individuais no Excel?

Supondo que você precise quebrar ou dividir o número em dígitos individuais, como mostrado na imagem abaixo, o que você pode fazer para conseguir isso? Este artigo fornecerá dois métodos para você.

Divida ou divida o número em dígitos individuais com a fórmula
Divida ou divida o número em dígitos individuais com o Kutools para Excel


Divida ou divida o número em dígitos individuais com a fórmula

Esta seção mostrará uma fórmula para dividir as células numéricas selecionadas em dígitos individuais no Excel.

1. Selecione uma célula em branco (diz célula C1) para localizar o primeiro dígito dividido do número na célula A1 e insira a fórmula = MID ($ A1, COLUNA () - (COLUNA ($ C1) - 1), 1) na barra de fórmula e, em seguida, pressione o entrar chave.

Importante: Na fórmula, A1 é a célula com o número que você precisa dividir em dígitos e C1 é a célula para localizar o primeiro dígito dividido. Altere-os conforme necessário.

2. Continue selecionando a célula C1 e arraste o identificador de preenchimento para as células certas até que todos os dígitos da célula A1 sejam divididos.

3. Mantenha essas células de dígitos divididos selecionadas e arraste a alça de preenchimento até as células até que todos os números sejam divididos em dígitos separados. Veja a imagem:


Divida ou divida o número em dígitos individuais com o Kutools para Excel

A Dividir células utilidade de Kutools for Excel ajuda a dividir facilmente todas as células numéricas selecionadas em dígitos individuais de uma vez. Faça o seguinte.

Antes de aplicar Kutools for Excel, Por favor baixe e instale primeiro.

1. Selecione as células com o número que você precisa dividir em dígitos e clique em Kutools > Unir e dividir > Dividir células. Veja a imagem:

2. No Dividir células caixa de diálogo, selecione Dividir em colunas opção no Tipo e na seção Especificar um separador, selecione Especificar largura e insira o número 1 na caixa de texto. Clique no OK botão.

3. No próximo pop-up Dividir células caixa de diálogo, especifique uma célula em branco para localizar o primeiro dígito dividido e clique no botão OK botão.

Depois de clicar no OK botão, todos os números nas células selecionadas são divididos em dígitos separados imediatamente como mostrado na imagem abaixo.

  Se você quiser ter um teste gratuito (30 dias) deste utilitário, por favor clique para fazer o downloade, em seguida, aplique a operação de acordo com as etapas acima.


Divida ou divida o número em dígitos individuais com o Kutools para Excel


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 ...
  • Super Formula Bar (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!
officetab bottom
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Scott · 10 months ago
    Is there a way for the Split Numbers formula to work on a cell receiving changing data, so that the split numbers automatically update when the source cell changes?
  • To post as a guest, your comment is unpublished.
    ikram khan · 1 years ago
    9310B82214332A this no want to spilt in next column in this format 82214332A what to do
  • To post as a guest, your comment is unpublished.
    Vikash Srivastav · 2 years ago
    Dear Sir,


    bill no bill Date Party Name Item Name Acutal Quantity
    01 01-04-2019 abc mobile 20


    ISKO TWENTIES ROW ME LANA HAI



    KINDLY MADAD KIJIYE VERY VERY IMPORTANT
  • To post as a guest, your comment is unpublished.
    Jagan · 2 years ago
    Final Text: BEARING, BALL; TYPE: DEEP GROOVE, CAGE MATERIAL: STEEL, ROW QUANTITY: SINGLE, INSIDE DIAMETER: 30 MM, OUTSIDE DIAMETER: 72 MM, WIDTH: 19 MM, CLOSURE TYPE: SINGLE SHIELDED, LOAD CAPACITY: DYNAMIC: 29.6, STATIC: 16 KN, SPEED: 13000 RPM; MANUFACTURER PART NO 63 63 6306 Z SKF

    I want to find the "63 6306 Z SKF" within the final text, Can anyone guide me
    • To post as a guest, your comment is unpublished.
      crystal · 2 years ago
      Hi Jagan,
      The final text you shown above locate in one cell? or would you please provide a screenshot of your example showing what you are exactly trying to do?
  • To post as a guest, your comment is unpublished.
    Yogesh kumar · 3 years ago
    if data is in below format what will do?
    DDD 1 2 3 4 5 6 7 8 9 10 11 12 13 14
    1,2,3,5,15,12,11
    12,10,13,11,5,2,4
    1,5,7,4


    Need number from 1st cell to below heading number(i.e. if we have 1,5,11 then answer put in cell below 1,5,11)
  • To post as a guest, your comment is unpublished.
    Priya · 3 years ago
    Option Explicit
    'Main Function
    Function NumberToText(ByVal MyNumber)
    Dim Count
    Dim Result
    Dim NLength
    Count = 1
    NLength = Len(MyNumber) + 1
    Do While Count < NLength
    Result = Result & GetDigit(Mid(MyNumber, Count, Count)) & Space(1)
    Count = Count + 1
    Loop
    NumberToText = Result
    End Function

    Function GetDigit(Digit)
    Select Case Val(Digit)
    Case 1: GetDigit = "One"
    Case 2: GetDigit = "Two"
    Case 3: GetDigit = "Three"
    Case 4: GetDigit = "Four"
    Case 5: GetDigit = "Five"
    Case 6: GetDigit = "Six"
    Case 7: GetDigit = "Seven"
    Case 8: GetDigit = "Eight"
    Case 9: GetDigit = "Nine"
    Case Else: GetDigit = "Zero"
    End Select
    End Function


    I am trying to convert digits into words for preparing mark sheet purpose. Eg: 63 => Six Three but this is not working with 3 digit number Eg:798 =>Seven Zero Eight ERROR. Please Help
    • To post as a guest, your comment is unpublished.
      crystal · 3 years ago
      Dear Priya,
      The following User-defined function can help you.

      Function NumberToText(ByVal xNum)
      Dim I As Long
      Dim xTemp As Long
      Dim xStr As String
      Dim Result As String
      For I = 1 To Len(xNum)
      xTemp = Mid(xNum, I, 1)
      Select Case xTemp
      Case 1: xStr = "One"
      Case 2: xStr = "Two"
      Case 3: xStr = "Three"
      Case 4: xStr = "Four"
      Case 5: xStr = "Five"
      Case 6: xStr = "Six"
      Case 7: xStr = "Seven"
      Case 8: xStr = "Eight"
      Case 9: xStr = "Nine"
      Case Else: xStr = "Zero"
      End Select
      Result = Result & xStr & Space(1)
      Next
      NumberToText = Result
      End Function
  • To post as a guest, your comment is unpublished.
    Reddy · 4 years ago
    Hi,

    Advise me the formula for multi digit number combine to single digit

    exp: 12345 (inside one cell) autocalculate to 1+2+3+4+5 = 6