tag:blogger.com,1999:blog-4623278671508370136.post6412908031576131303..comments2023-08-01T13:39:53.991+02:00Comments on EXCEL FORO: Un blog de Excel: VBA: Cómo transponer datos según cambio de criterio.Excelforo - Ismael Romerohttp://www.blogger.com/profile/17680553534095355222noreply@blogger.comBlogger18125tag:blogger.com,1999:blog-4623278671508370136.post-19787007402787467082019-06-19T09:18:48.022+02:002019-06-19T09:18:48.022+02:00Hola Remedios
quizá, sin macros, con alguno de est...Hola Remedios<br />quizá, sin macros, con alguno de estos ejemplos encuentres la solución:<br />https://excelforo.blogspot.com/2019/04/reordenar-columnas-por-filas.html<br />https://excelforo.blogspot.com/2018/12/power-query-desapilando-columnas-datos.html<br />https://excelforo.blogspot.com/2018/12/desapilando-columnas-datos-excel.html<br /><br />Espero te sirvan<br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-85515226508851492412019-06-19T00:06:24.088+02:002019-06-19T00:06:24.088+02:00Hola Ismael, en mi caso tengo un grupo de 6 filas ...Hola Ismael, en mi caso tengo un grupo de 6 filas que corresponden a 6 parámetros, este grupo es un tipo de equipo, pero después tengo otro equipo con otras 6 filas que son los mismos parámetros del otro modelo, como puedo modificar tu macro? pq ya he intentado de varias formas y no me sale lo que quiero remedioshttps://www.blogger.com/profile/00810849402142074843noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-61928002830088570372019-03-21T09:40:59.113+01:002019-03-21T09:40:59.113+01:00Hola
te he contestado por email...
SaludosHola<br />te he contestado por email...<br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-13758816237535121132019-03-20T22:26:59.346+01:002019-03-20T22:26:59.346+01:00Hola Ismael, te he enviado un correo con un archiv...Hola Ismael, te he enviado un correo con un archivo para ver si puedes ayudarme con un caso de transponer datos tomando en cuenta un texto especifico.<br /><br />Saludos.Anonymoushttps://www.blogger.com/profile/16060250271722906285noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-20462634170600635222019-03-20T09:33:36.679+01:002019-03-20T09:33:36.679+01:00Hola Rodolfo,
quizá este otro post te de la pista
...Hola Rodolfo,<br />quizá este otro post te de la pista<br /><a href="https://excelforo.blogspot.com/2011/09/vba-como-insertar-filas-el-metod-insert.html" rel="nofollow">https://excelforo.blogspot.com/2011/09/vba-como-insertar-filas-el-metod-insert.html</a><br /><br />básicamente consistirá en desarrollar una macro con un bucle que recorra las N filas, empezando desde abajo, añadiendo el número de filas (X) que correspondan según esos criterios que mencionas...<br /><br />Espero te oriente<br />SldsExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-20203963132886301252019-03-19T22:30:57.919+01:002019-03-19T22:30:57.919+01:00Hola!
Tengo una Hoja que posee 11 columnas con N f...Hola!<br />Tengo una Hoja que posee 11 columnas con N filas, éstas poseen en común el dato en la columna 1; se requiere dejar X filas según los distintos criterios de la columna 1, y el resto de las filas deben colocarse en secuencia (de 10 en 10) en columnas. Cómo lo hago?<br />Saludos y gracias!Rodolfo Ugalde Bindahttps://www.blogger.com/profile/05969131869654255266noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-76956327831628875552018-10-11T00:28:26.215+02:002018-10-11T00:28:26.215+02:00Hola,
asegúrate existe la hoja con el nombre que e...Hola,<br />asegúrate existe la hoja con el nombre que estás empleando...<br /><br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-15267725131633853792018-10-08T16:31:04.362+02:002018-10-08T16:31:04.362+02:00Hola me aparece error 9 que debo hacerHola me aparece error 9 que debo hacerAnonymousnoreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-33816281830836075982018-01-08T09:09:25.747+01:002018-01-08T09:09:25.747+01:00;-)
gracias!;-)<br />gracias!Excelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-77816458300528257282018-01-08T07:45:04.437+01:002018-01-08T07:45:04.437+01:00Me sirvió muchísimo....muchas gracias!!!!Me sirvió muchísimo....muchas gracias!!!!Emevichttps://www.blogger.com/profile/05447159396878500115noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-33698944906123547222017-10-16T11:30:00.344+02:002017-10-16T11:30:00.344+02:00Hola,
solo adapta tus columnas a lo expuesto en el...Hola,<br />solo adapta tus columnas a lo expuesto en el post... creo te valdría exactamente tal cual, ya que el código se basa en la comparativa de un campo (en tu caso el Nombre) para extenderlo horizontalmente...<br />¿cuál es la duda concreta que tienes entonces?<br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-53176000892732895442017-10-13T03:41:54.405+02:002017-10-13T03:41:54.405+02:00Hola, no entiendo bien la programacion por lo que ...Hola, no entiendo bien la programacion por lo que no puedo adaptarlo a mi necesidad.<br /><br />Tengo lo siguiente:<br /><br />Nombre de la persona // Descripcion <br />LEONARDO HOLA123<br />LEONARDO CHAU123<br />MATIAS XXX<br />LAURA YYY<br />LAURA ZZZ<br /><br />y quiero que por cada nombre me transponga las descripciones<br /><br />o sea<br />LEONARDO HOLA123 CHAU 123<br />MATIAS XXX<br />LAURA YYY ZZZ<br /><br />Chul Ghttps://www.blogger.com/profile/16361593731866138614noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-58462738914141803662016-10-29T10:13:20.754+02:002016-10-29T10:13:20.754+02:00Hola,
te has asegurado que existe una hoja que se ...Hola,<br />te has asegurado que existe una hoja que se llama exactamente 'Hoja4' ??<br /><br />SldsExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-68702152880487802142016-10-28T20:31:58.234+02:002016-10-28T20:31:58.234+02:00Me sale este error
"Se ha producido el erro...Me sale este error <br /><br />"Se ha producido el error '424' en tiempo de ejecución:<br /><br />Se requiere un objeto"<br /><br />DANIELhttps://www.blogger.com/profile/17344174636338604815noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-32694635353977659652016-10-28T20:13:25.711+02:002016-10-28T20:13:25.711+02:00La "Hoja4" es donde se quiere ubicar la ...La "Hoja4" es donde se quiere ubicar la nueva tabla?DANIELhttps://www.blogger.com/profile/17344174636338604815noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-37498149043215294942016-02-22T18:08:47.911+01:002016-02-22T18:08:47.911+01:00Hola Álvaro,
qué no te funciona??
Parece que el có...Hola Álvaro,<br />qué no te funciona??<br />Parece que el código es el mismo que el del post???<br /><br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-55499603004275725812016-02-22T18:00:01.078+01:002016-02-22T18:00:01.078+01:00Este es el código para Excel 2013 en adelante.
...Este es el código para Excel 2013 en adelante. <br /><br /><br />Sub Macro1()<br /><br />Dim fila As Long, filaN As Long, columna As Long<br />'seleccionamos la hoja con el orgien de datos<br />Sheets("hoja2").Select<br />Set miRango = Sheets("Hoja2").Range("B2:B41")<br />A = Application.WorksheetFunction.CountA(miRango)<br /> <br />fila = 1<br />'CÓDIGO<br />Worksheets("Hoja4").Range("A1").Value = Worksheets("Hoja2").Range("B1").Value<br />'CLIENTE<br />Worksheets("Hoja4").Range("B1").Value = Worksheets("Hoja2").Range("C1").Value<br />'DETALLE<br />Worksheets("Hoja4").Range("C1").Value = Worksheets("Hoja2").Range("D1").Value<br /> <br />'definimos punto de partida para recorrer celdas<br />filaN = 1: columna = 2<br />'hacemos un loop para pasar por todos los registros<br />For i = 1 To A<br /> fila = fila + 1<br /> 'cuando el Código sea el mismo que el anterior<br /> If Worksheets("Hoja2").Range("B" & fila) = Worksheets("Hoja2").Range("B" & fila - 1) Then<br /> 'nos desplazamos una columna a la izquierda<br /> columna = columna + 1<br /> Worksheets("Hoja4").Cells(filaN, columna).Offset(0, 1).Value = Worksheets("Hoja2").Cells(fila, 4).Value<br /> Else<br /> 'si no es el mismo, plasmamos los valores correspondientes<br /> filaN = filaN + 1<br /> Worksheets("Hoja4").Cells(filaN, 1).Value = Worksheets("Hoja2").Cells(fila, 2)<br /> Worksheets("Hoja4").Cells(filaN, 2).Value = Worksheets("Hoja2").Cells(fila, 3)<br /> Worksheets("Hoja4").Cells(filaN, 3).Value = Worksheets("Hoja2").Cells(fila, 4)<br /> 'fijamos de nuevo para la comparativa a la columna B<br /> columna = 2<br /> End If<br />Next i<br />'liberamos la variable<br />Set miRango = Nothing<br /><br />End Sub<br />Anonymousnoreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-47669409201501851832016-02-22T17:24:16.294+01:002016-02-22T17:24:16.294+01:00No me sirve el codigo, me puede ayudar por favor. ...No me sirve el codigo, me puede ayudar por favor. Anonymousnoreply@blogger.com