Foros


Inicio » Excel

Página: 1 2

Mensaje Autor

Arriba
07/Jul/05 12:12
DIVIDIR NOMBRES COMPLETOS

A veces nos topamos con listas de nombres completos en una sola celda, y lo que queremos es tener el apellido paterno en una celda, el materno en otra, y el nombre en otra celda tambien. Esta formula me ha sido de mucha utilidad pricipalmete en la preparacion de la carga batch de la declaracion de sueldos y salarios.

A lo que vamos:

Vamos a utlizar 4 columnas: columa A, B,C y D, en la primer fila pondremos los encabezados A1=NOMBRES COMPLETOS, B1=APELLIDO PATERNO, C1=APELLIDO MATERNO y por ultimo D1=NOMBRE(S).

CELDA A2[/b:85440e9aee]= EL NOMBRE COMPLETO QUE VAYAMOS A DIVIDIR
[b:85440e9aee]CELDA B2[/b:85440e9aee]=EXTRAE(A2,1,((ENCONTRAR(" ",A2))-1))
[b:85440e9aee]CELDA C2[/b:85440e9aee]=EXTRAE((EXTRAE(A2,((ENCONTRAR(" ",A2))+1),99)),1,((ENCONTRAR(" ",(EXTRAE(A2,((ENCONTRAR(" ",A2))+1),99))))-1))
[b:85440e9aee]CELDA D2=EXTRAE((EXTRAE(A2,((ENCONTRAR(" ",A2))+1),99)),((ENCONTRAR(" ",(EXTRAE(A2,((ENCONTRAR(" ",A2))+1),99))))+1),99)

Nota: Esta formula solo funciona para apellidos de una sola palabra, es decir no funciona con apellidos como "De la Cruz", "De la Fuente", etc.
Nota2: El formato de la celda A2 debe ser -apellido paterno-apellido materno-nombre-

Espero les sea de utilidad. Hasta pronto
 
Perfil

arturo
Soldado

Mensajes: 19
Ingresó: Mayo 18, 2004
Ubicación:

No Conectado

Agregar como amigo

Arriba
07/Jul/05 12:30
Re: DIVIDIR NOMBRES COMPLETOS

Gracias por la aportacion, y yo tambien la utlizo pero para las cartas patronales de IMSS, INFONAVIT, y ademas para confrontar SUA-NOMINA-(EMA/EBA) es muy buena esa formula, ademas cuando son formatos que manda el IMSS, se pone "$", en lugar de " "

saludos
 
Visiten mi espacio elnidodelseguro.com .mx
 
Perfil

lcgabrielaranda
Mayor

Mensajes: 1191
Ingresó: Mayo 18, 2004
Ubicación:

No Conectado

Agregar como amigo

Arriba
07/Jul/05 12:50
Re: DIVIDIR NOMBRES COMPLETOS

LO QUE SE MENCIONA ES CORRECTO, YO ASI LO MANEJO AL EXPORTAR LAS EMISIONES A EXCEL Y TENGO LOS MISMOS PROBLEMAS CON LOS NOMBRES
 
Perfil

Edgar_Ruben10
Subteniente

Mensajes: 175
Ingresó: Marzo 04, 2005
Ubicación:

No Conectado

Agregar como amigo

Arriba
07/Jul/05 19:25
Re: DIVIDIR NOMBRES COMPLETOS

Ya que estamos con el tema, esta es la macro que uso, no requiere usar una cuarta celda, solo se posiciona en la columna que tiene el nombre y lo reemplazará e insertará las columnas de [i:f95b4b0423]Ap.Paterno, Ap.Materno y Nombre(s)[/i:f95b4b0423]
[code:1:f95b4b0423]Sub SeparaNombres()
' Separa Nombres con división "/" en columnas con encabezado
' Macro recorded 02/10/2004 ByPaco
' Posicionarse en la primera celda a separar

If Cells(ActiveCell.Row, ActiveCell.Column).Value = Empty Then GoTo fin
ActiveCell.EntireColumn.Insert
ActiveCell.EntireColumn.Insert
ActiveCell.EntireColumn.Insert
Cells(ActiveCell.Row, ActiveCell.Column + 3).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.TextToColumns Destination:=Cells(ActiveCell.Row, ActiveCell.Column - 3), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
:="/", FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1))
Selection.EntireColumn.Delete
ActiveCell.Offset(-1, -3).Range("A1").Select
ActiveCell.FormulaR1C1 = "Ap.Paterno"
ActiveCell.Columns("A:A").EntireColumn.EntireColumn.AutoFit
ActiveCell.Offset(0, 1).Range("A1").Select
ActiveCell.FormulaR1C1 = "Ap.Materno"
ActiveCell.Columns("A:A").EntireColumn.EntireColumn.AutoFit
ActiveCell.Offset(0, 1).Range("A1").Select
ActiveCell.FormulaR1C1 = "Nombre(s)"
ActiveCell.Columns("A:A").EntireColumn.EntireColumn.AutoFit
fin:
End Sub[/code:1:f95b4b0423]
 
«Antes que cambien los reinos, los hombres deberán cambiar» ═╬═
 
Perfil

ByPaco
Teniente Coronel

Mensajes: 2185
Ingresó: Junio 05, 2004
Ubicación:

Conectado

Agregar como amigo

Arriba
11/Jul/05 12:03
Re: DIVIDIR NOMBRES COMPLETOS

Solo le cambié en Space:=False por Space:=true, para que me funcionara ya que no tenia el nombre dividido por la diagonal "/"
 
Perfil

arturo
Soldado

Mensajes: 19
Ingresó: Mayo 18, 2004
Ubicación:

No Conectado

Agregar como amigo

Arriba
11/Jul/05 12:10

Arturo aqui en lo que fallará es en los apellidos de dos o mas silabas, y también en los nombres de igual caracteristicas
 
«Antes que cambien los reinos, los hombres deberán cambiar» ═╬═
 
Perfil

ByPaco
Teniente Coronel

Mensajes: 2185
Ingresó: Junio 05, 2004
Ubicación:

Conectado

Agregar como amigo

Arriba
11/Jul/05 17:00
Re: DIVIDIR NOMBRES COMPLETOS

Muy interesante y útil. Ahora bien, que función debo aplicar para hacer la operación a la inversa, es decir, unir datos (en este caso nombres), alguien me menciono que la función se llama CONCATENAR, pero desconozco como funciona, si alguien me pudiera explicar mucho se lo agradeceré
 
MARLA 'Nadie puede llegar a la cima armado sólo de talento. Dios da el talento; el trabajo transforma el talento en genio', Anna Pavlova. 'Todo lo que claramente imaginamos, ardientemente deseamos, sinceramente creamos y entusiastamente e
 
Perfil

MARLA
Subteniente

Mensajes: 140
Ingresó: Mayo 18, 2004
Ubicación:

No Conectado

Agregar como amigo

Arriba
11/Jul/05 17:23

En este foro hay un tópico de concatenar, checalo
 
«Antes que cambien los reinos, los hombres deberán cambiar» ═╬═
 
Perfil

ByPaco
Teniente Coronel

Mensajes: 2185
Ingresó: Junio 05, 2004
Ubicación:

Conectado

Agregar como amigo

Arriba
11/Jul/05 19:51
Re: DIVIDIR NOMBRES COMPLETOS

Puedes utilizar la funcion =CONCATENAR(CELDA AP PATERNO,CELDA CON UN ESPACIO,CELDA AP MATERNO,CELDA CON UN ESPACIO,CELDA NOMBRE)

O tambien puedes utilizar el simbolo "&" para unir las celdas,

=CELDA AP PATERNO&CELDA CON UN ESPACIO&CELDA AP MATERNO&CELDA CON UN ESPACIO&CELDA NOMBRE

Cualquiera de las dos funciona igual
 
Perfil

arturo
Soldado

Mensajes: 19
Ingresó: Mayo 18, 2004
Ubicación:

No Conectado

Agregar como amigo

Arriba
12/Jul/05 8:29
Re: DIVIDIR NOMBRES COMPLETOS

[quote:861a14c24d="arturo"]Puedes utilizar la funcion =CONCATENAR(CELDA AP PATERNO,CELDA CON UN ESPACIO,CELDA AP MATERNO,CELDA CON UN ESPACIO,CELDA NOMBRE)

O tambien puedes utilizar el simbolo "&" para unir las celdas,

=CELDA AP PATERNO&CELDA CON UN ESPACIO&CELDA AP MATERNO&CELDA CON UN ESPACIO&CELDA NOMBRE

Cualquiera de las dos funciona igual[/quote:861a14c24d]

Estoy de acuerdo, pero en lugar de utilizar una celda que contenga un espacio, yo pondría un espacio entre comillas, o sea:

=CONCATENAR(CELDA AP PATERNO," ",CELDA AP MATERNO," ",CELDA NOMBRE)

o

=CELDA AP PATERNO&" "&CELDA AP MATERNO&" "&CELDA NOMBRE

Funciona igual.

Saludos.
 
Perfil

Silver
Sargento Primero

Mensajes: 128
Ingresó: Mayo 19, 2004
Ubicación:

No Conectado

Agregar como amigo


Página: 1 2