UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

EGH74


Buenas tardes compañeros

Me pueden apoyar por favor con una formula.

Mi caso es el siguiente:
En la tabla que adjunto quiero que en una hoja nueva me concatene toda la información que encuentre con código 20601 y quede en una sola celda toda la información que esta en esta tercer columna.

Deseo quede de la siguiente forma:

20601 PALITO DE POLLO PREMIUM, MINI CORDON BLEU JAMON, BAMBONET JAMON ETC.

Observación no todos los códigos tienen la misma cantidad de productos. Pueden tener uno solo hasta 10 productos

Les agradeceré su apoyo

Estoy a sus ordenes

Saludos

206012720-PRMPALITO DE POLLO PREMIUM
206012735-AVMINI CORDON BLEU JAMON
206012730-AVBOMBONETE JAMON
206012730-JBOMBONETE JALAPEÑO
206012734-AVCORDON BLEU JAMON
206019942POLLO EMPANIZADO
206012731-PRMHAMBURGUESA PREMIUM
206012730-PRMNUGGET PREMIUM

tyno


Hola EGH74, bien venido al foro
Te paso un archivo con una macro que concatena los datos como lo has solicitado ya que se me ocurre que con una formula no se si puede hacer.
Los resultados se ven en la Hoja RESULTADO. Saludos
Archivos
Concatenar.zip
No tienes los permisos para descargar los archivos.
(19 KB)

EGH74


Gracias

La pregunta es esta macro la puedo aplicar a un archivo de 3,000 filas.

En el resultado aparecen dos filas, que debo hacer para que aparezcan en una sola.

tyno


Si, hasta 65536 filas.
La hice considerando Excel 2003, pero si vas utilizar 3000 o un poco entonces creo que no deberías tener problemas.

EGH74


GRACIAS



La información que tengo, es una relación de facturas pero están por filas la información facturada el resumen que yo quiero es que por cada factura concatene los artículos que se facturaron, en total tengo 1025 facturas, y filas tengo 3100, lo que hice es en una hoja nueva copiar el registro único "Folio FAC" y ahí debo ejecutar la macro que me enviaste, como puedo corregirlo para aplicarlo a mi archivo.

En una columna debe quedar "Folio FAC" y en otra el resultado de que se concateno

Saludos

Folio FACClave del cliente Nombre del cliente R.F.C. Folio FACClave de artículo Descripción del artículo Total por partida Fecha de elaboración 
21067       101MA. GUADALUPE NAVA RAMIREZXAXX10101000210672731-PRMHAMBURGUESA PREMIUM69.0015/08/2013
20595       998MARIA ELENA GARCIA CORTEZXAXX10101000205952730-PRMNUGGET PREMIUM468.0001/08/2013
20596      1477KENNY JOSE MARIA GUTIERREZ GUTIERREZGUGK-890603-GQ4205962730-PONUGGET ECONOMICO900.0001/08/2013
20597      3147ISMAEL PEREZ ARROYOXAXX10101000205972720-PRMPALITO DE POLLO PREMIUM69.0001/08/2013
20597      3147ISMAEL PEREZ ARROYOXAXX10101000205973175ALA ADOBADA102.0001/08/2013
20597      3147ISMAEL PEREZ ARROYOXAXX10101000205972730-JBOMBONETE JALAPEÑO212.0001/08/2013
20598      2783PROPIUM SAPOREM,SA DE CVPSA-101203-EG520598591PECHUGA MARIPOSA GRAMAJE ESPECIAL FRESCO1,800.0001/08/2013
20599      2783PROPIUM SAPOREM,SA DE CVPSA-101203-EG520599591PECHUGA MARIPOSA GRAMAJE ESPECIAL FRESCO1,800.0001/08/2013
20600      2711GABRIEL ROSALESXAXX10101000206002730-PRMNUGGET PREMIUM207.0001/08/2013
20600      2711GABRIEL ROSALESXAXX10101000206002730-SPRMNUGGETSAURIO PREMIUM207.0001/08/2013
20601      2203RUTA 11 (SALVADOR GUTIERREZ HARO)XAXX10101000206012720-PRMPALITO DE POLLO PREMIUM69.0001/08/2013
20601      2203RUTA 11 (SALVADOR GUTIERREZ HARO)XAXX10101000206012735-AVMINI CORDON BLEU JAMON106.0001/08/2013
20601      2203RUTA 11 (SALVADOR GUTIERREZ HARO)XAXX10101000206012730-AVBOMBONETE JAMON106.0001/08/2013
20601      2203RUTA 11 (SALVADOR GUTIERREZ HARO)XAXX10101000206012730-JBOMBONETE JALAPEÑO106.0001/08/2013
20601      2203RUTA 11 (SALVADOR GUTIERREZ HARO)XAXX10101000206012734-AVCORDON BLEU JAMON106.0001/08/2013
20601      2203RUTA 11 (SALVADOR GUTIERREZ HARO)XAXX10101000206019942POLLO EMPANIZADO128.0001/08/2013
20601      2203RUTA 11 (SALVADOR GUTIERREZ HARO)XAXX10101000206012731-PRMHAMBURGUESA PREMIUM207.0001/08/2013
20601      2203RUTA 11 (SALVADOR GUTIERREZ HARO)XAXX10101000206012730-PRMNUGGET PREMIUM897.0001/08/2013
20602      3155RESTAURANT ZAGUAN LAMBARRIXAXX1010100020602585PECHUGA MARIPOSA BCA LIBRE GRAMAJE FRESC750.0001/08/2013

tyno


Podrias subir un archivo similar al que estas utilizando en realidad, con todas sus columnas, nos es necesario que me pases las 3000 filas sino algunas cuantas como para probar, a todo esto indicarme en donde tiene que darse el resultado y como debería quedar dicho resultado. Saludos

EGH74


Gracias

Te adjunto el archivo, los "folios de Fac" que están en color amarillo tienen varios artículos eso debo concatenar.

El resto del archivo esta igual.

Pero me gustaría que me apoyaras para que se aplique a todos los folios que se encuentran en la hoja de resultados.

Tenia la idea hacerlo con buscarv y concatenar pero sinceramente ya no pude hacerlo.

Saludos
Archivos
Ejemplo de Concatenar.xlsx
No tienes los permisos para descargar los archivos.
(18 KB)

tyno


Ok, acabo de ver el archivo.
Lo que te tipo, ojalá puedas esperar un poco, no se como estamos con los usos horarios pero aqui por esta latitud ya estamos a las 1:00 AM, asi que mañana trato de resolver tu archivo, desde luego que si consigues una solucion en antes no hay problemas, de todas formas voy a resolverlo. Estamos en contacto. Saludos

EGH74


ok

Te agradezco tu apoyo aquí en Guadalajara, México son las 10:00 PM si mañana debo presentar este trabajo a las 9:00 AM, ahorita sigo intentando una solución pero se que la tuya también será de mucha ayuda.

Que literatura me recomiendas para aprender macros?

Saludos

tyno


Hola EGH74.
Gracias por tu paciencia. Te paso el archivo con la macro adaptada al archivo que has subido. 
Si te sirve la macro puedes cambiar el nombre del archivo pero no el nombre de las Hojas y las columnas deben estar en la misma posición. El archivo esta en Excel 2003 por lo cual trabaja con 655536 filas, que creo te sobran, luego guardas el archivo como Libro habilitado para macros.

Con respecto a aprender macros no te sabría indicar un manual puntualmente, pero en Internet hay un montón de manuales y/o sitios donde se enseñan los conceptos para hacer macros, lo demás es mucha practica. Algo que sirve personalmente para aprender es que cada archivo Excel que tengas te plantees hacerlo con una macro, así sea solo cambiar el color de una fuente o sumar dos celdas, entonces con esto tienes un punto de partida lo cual te lleva a investigar  sobre el asunto y así se practica y se aprende. Saludos
Archivos
Ejemplo de Concatenar.zip
No tienes los permisos para descargar los archivos.
(122 KB)

EGH74


Tyno

Muchas gracias ha sido de gran utilidad el archivo.

Buscare en internet para iniciar a hacer macros, los comandos esos dentro de macros te salen o tienes tu una lista de ellos?

Saludos

tyno


Los metodos u objetos For Next, Find, On Error, Cells, etc.,  son justamente las cosas que se aprenden y luego se disponen en el código para que este cumpla una determinada tarea.
 
Por esto cuando quieras aplicar una macro a algo en particular en tu archivo tendrías que buscar el método mas apropiado.
 
Un ejemplo sencillo.
Creas un botón control activex (como el que hice en tu archivo), en modo de diseño le haces doble click a dicho botón lo cual te lleva al editor de macros:
 
Private Sub CommandButton1_Click()
 
End Sub
 
Entonces agregas el siguiente código:
 
For a = 1 To 50
Cells(a, 1) = a
Next a
 
De manera que te quede así:
 
Private Sub CommandButton1_Click()
For a = 1 To 50
Cells(a, 1) = a
Next a
End Sub
 
Esto es un bucle For Next, al cual se le asigna una cantidad de ciclos, en este ejemplo desde 1 hasta 50( For a=1 To 50), quiere decir que el bucle se va a repetir o accionar 50 veces, a su vez he determinado que en la celda (Cells) cuyo fila es igual al valor de  “ a” y cuya columna es 1 (o sea la columna A) se rellene con el mismo valor de “a”.
El objeto Cells (celda) hace referencia a una celda por coordenadas de fila y columna: Cells(Row,Column), por ejemplo Cells(3,2) es la celda B3.
Como en el ejemplo, la referencia a la fila esta determinada por la variable “a” (Cells(a,1)) esta se va a modificar conforme según valor que esta variable vaya tomando con el correr del Bucle For Next.
 

Bueno, esto es un ejemplo simple de cómo establecer una de tantas instrucciones que hay para hacer una macro, pero es todo un tema por lo que no da para desarrollar un curso en este foro. Hay que investigar y practicar. 


Por otro lado si ya esta solucionado el tema entonces debería darlo por resuelto.


Saludos

EGH74


Gracias Tyno

Tus comentarios me ayudaran en mucho.

Seguiré investigando y solicitando tu apoyo, se que eres muy bueno, he visto tus desarrollos ya por mucho tiempo desde la pagina de mundo Excel.

Saludos

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.