Foros del Web » Soporte técnico » Ofimática »

Sobre Excel

Estas en el tema de Sobre Excel en el foro de Ofimática en Foros del Web. Tengo un excel con unos registros en el formato +34 965.202.202 y necesito pasarlos a 965202020, osea eliminar el +34 y el espacio y los ...
  #1 (permalink)  
Antiguo 05/04/2007, 22:03
 
Fecha de Ingreso: abril-2007
Mensajes: 2
Antigüedad: 17 años
Puntos: 0
Sobre Excel

Tengo un excel con unos registros en el formato +34 965.202.202 y necesito pasarlos a 965202020, osea eliminar el +34 y el espacio y los puntos de separacion, son muchisimos. Alquien sabria orientarme en si hay alguna formula para acerlo de la forma mas rapida posible, porque si no voy a tardar mas de 10 años de mi vida.

Gracias y Salu2.
  #2 (permalink)  
Antiguo 05/04/2007, 22:49
Avatar de mrocf  
Fecha de Ingreso: marzo-2007
Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años, 1 mes
Puntos: 88
Sonrisa Sobre Excel

Hola !
Te voy a pasar una macro que hará lo que indicas:
Código:
Sub ReemplazosVarios()
    For Each Celda In Selection
        Celda.Formula = Right(Celda.Value, Len(Celda.Value) - 4)
    Next
    
    Selection.Replace What:=".", Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False
End Sub
COMENTARIOS:
1) Si no sabes como incorporar esta macro te explico como hacerlo:
a) en la planilla donde tienes el problema y mientras mantienes apretada la tecla "Alt" oprimes la tecla "F8".

b) Donde te pide que pongas un nombre de macro escribes Macro1 y seleccionas Crear.

c) Te aparecerá lo siguiente:
Cita:
Sub Macro1()
End Sub
que lo reemplazarás TOTALMENTE por el texto anterior.

d) Cierras la ventana que tiene que ver con el Visual Basic, retornas a EXCEL y comienzas a usar la macro.

e) Su uso es muy sencillo: seleccionas el texto que deseas corregir (esta es la clave operativa), vuelves a presionar Alt + F8, seleccionas (si es que ya no lo está) ReemplazosVarios y seleccionas Ejecutar...

f) Esto te va a funcionar correctamente SIEMPRE QUE se mantenga el mismo formato, es decir: 4 caracteres iniciales a descartar y "puntos" a eliminar.

Pruébalo y luego nos cuentas.
Saludos

Última edición por mrocf; 05/04/2007 a las 23:01
  #3 (permalink)  
Antiguo 09/04/2007, 05:06
 
Fecha de Ingreso: abril-2007
Mensajes: 2
Antigüedad: 17 años
Puntos: 0
Re: Sobre Excel

Funciona perfectamente, muchisimas gracias por tu ayuda.

Salu2.
  #4 (permalink)  
Antiguo 09/04/2007, 08:32
Avatar de mrocf  
Fecha de Ingreso: marzo-2007
Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años, 1 mes
Puntos: 88
Sonrisa Re: Sobre Excel

Fue un gusto.
Saludos
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 06:31.