Jump to content



Foto

Separador no excel




Existem 11 respostas neste tópico

#1 Fernando Wobeto    

Fernando Wobeto
  • Participante
  • 1738 mensagens

Publicado 30 December 2002 - 10:40 AM

E ai pessoal tenho uma planilha no excel com uma lista de telefones, e eu gostaria de acrescentar um hifem no meio dos dígitos.
ex: 99772458 por 9977-2458 (de todos os números, que são em torno de 2000)

Mas não me serve acrescentar máscara!
Precisa ser mudança geral dos números.

Valeu!
'http://www.babooforum.com.br/idealbb/images/smilies/4.gif


#2 Alcy    

Alcy
  • Participante
  • 279 mensagens

Publicado 31 December 2002 - 05:47 PM

Taí a fórmula pedida, onde B1 é o número do telefone sem o traço separador.

você deve colocar esta fórmula numa outra posição, tipo C1.

Eu ainda previ a possibilidade de você ter um numero de telefone com apenas 7 dígitos!

=IF(LEN(B1)=7;LEFT(B1;3);LEFT(B1;4))&"-"&RIGHT(B1;4)


#3 Fernando Wobeto    

Fernando Wobeto
  • Participante
  • 1738 mensagens

Publicado 03 January 2003 - 10:44 AM


----------------
On 12/31/2002 6:47:41 PM Alcy wrote:

Taí a fórmula pedida, onde B1 é o número do telefone sem o traço separador.

você deve colocar esta fórmula numa outra posição, tipo C1.

Eu ainda previ a possibilidade de você ter um numero de telefone com apenas 7 dígitos!

=IF(LEN(B1)=7;LEFT(B1;3);LEFT(B1;4))&"-"&RIGHT(B1;4)

----------------


Cara valeu, mas.... não funcionu a fórmula ela nem dá erro mas aparece #NOME? dentro da célula.

#4 Snap™    

Snap™
  • Participante
  • 344 mensagens

Publicado 03 January 2003 - 12:38 PM

Tente o seguinte:

Selecione todas as células em que você irá colocar os números de telefones e faça o seguinte:
1- Após estar com as células selecionadas: Formatar > Células (ou Ctrl + 1);
2- Clique na aba "Número";
3- Em categoria, escolha a opção "Personalizado";
4- Em "Tipo", digite o seguinte: ###-####;(###) ###-#### (copie e cole para não ter erro).

Tente ver agora se deu certo...

Espero ter ajudado.
Fui....

#5 Snap™    

Snap™
  • Participante
  • 344 mensagens

Publicado 03 January 2003 - 12:44 PM

Vou ser explícito:
Para você personalizar para o formato: xxxx-xxxx
Digite: ####-####
Para você personalizar para o formato: (xx) xxxx-xxxx
Digite: (##) ####-####

PS: Para você não ter que redigitar todos os números novamente, basta você fazer isso em uma célula, copiar (Crtl + C), selecione todas as outras células e clique com o botão direito do mouse, escolha "Colar especial..." marque a opção "Formatos" e pronto.

Valeu...


#6 Fernando Wobeto    

Fernando Wobeto
  • Participante
  • 1738 mensagens

Publicado 03 January 2003 - 12:49 PM


----------------
On 1/3/2003 1:38:49 PM Snap™ wrote:

Tente o seguinte:

Selecione todas as células em que você irá colocar os números de telefones e faça o seguinte:
1- Após estar com as células selecionadas: Formatar > Células (ou Ctrl + 1);
2- Clique na aba "Número";
3- Em categoria, escolha a opção "Personalizado";
4- Em "Tipo", digite o seguinte: ###-####;(###) ###-#### (copie e cole para não ter erro).

Tente ver agora se deu certo...

Espero ter ajudado.
Fui....
----------------

Pois é meu amigo, mas desse jeito que você me indicou eu estaria colocando uma máscara no número e pra mim não serve!!!!

Mesmo assim valeu.

#7 Snap™    

Snap™
  • Participante
  • 344 mensagens

Publicado 03 January 2003 - 12:51 PM

Para você não ter que redigitar todos os números novamente, basta você fazer isso em uma célula, copiar (Crtl + C), selecione todas as outras células e clique com o botão direito do mouse, escolha "Colar especial..." marque a opção "Formatos" e pronto.

Valeu...




#8 Alcy    

Alcy
  • Participante
  • 279 mensagens

Publicado 03 January 2003 - 01:35 PM

O Office que uso é em inglês, então a fórmula também é:

=IF(LEN(B1)=7;LEFT(B1;3);LEFT(B1;4))&"-"&RIGHT(B1;4)

Testando de novo a fórmula, eu copiei a fórmula acima (daqui do fórum) e colei no Excel e funcionou correto! Eu poderia ter digitado alguma coisa errada, mas não, está correta!

Veja aí no seu Excel como fica estas funções em português:

IF = SE

Estas funções são de TEXTO.

LEN => comprimento = ?
LEFT => esquerda = ?
RIGHT => direita = ?


#9 Fernando Wobeto    

Fernando Wobeto
  • Participante
  • 1738 mensagens

Publicado 05 January 2003 - 01:17 PM

Ok! Vou pesquisar em cima de sua fórmula e se for por causa do idioma eu posto ela aqui em português para que tiver o mesmo problema!

#10 Glauber Lima    

Glauber Lima
  • Participante
  • 2382 mensagens

Publicado 05 January 2003 - 01:55 PM

----------------
On 12/30/2002 11:40:44 AM Fernando Wobeto wrote:

E ai pessoal tenho uma planilha no excel com uma lista de telefones, e eu gostaria de acrescentar um hifem no meio dos dígitos.
ex: 99772458 por 9977-2458 (de todos os números, que são em torno de 2000)

Mas não me serve acrescentar máscara!
Precisa ser mudança geral dos números.

Valeu!
----------------


Um modo muito prático é desenvolver a seguinte macro (copie e cole, EXCETO os textos em VERMELHO):

--> INÍCIO DA MACRO

'Esta macro funciona com telefones de 7 ou 8 dígitos

'Apenas modifique aqui para refletir o intervalo de células onde
'os telefones se encontram. Substitua os valores entre aspas.

Intervalo = "A1:A2000"

for each celu in range(Intervalo)
vr = trim(celu.formular1c1)
if len(vr) = 7 then vrnew = mid(vr,1,3) + "-" + mid(vr,4,4) else vrvew = mid(vr,1,4) + "-" + mid(vr,5,4)
celu.formular1c1 = vrnew
next celu
msgbox "Operação concluída."

---> FIM DA MACRO

Observações:
- Faça um backup da planilha original

- Se você não souber como criar a macro, poste aqui

Abraços,
Glauber Lima