Buccle para transponer series en excel
Se puede hacer un buccle en excel, el tema es que tengo un archivo con 250 series que pego en la columna A.
Lo que hago manualmente es un pegado especial y transponer series de 10 en 10 como se muestra en la foto. Se podría hacer con la grabadora, pero quisiera saber si se puede hacer mas funcional con buccles. Ya que en la columna "A", las series pueden ser de 250 a menos. El tope si es 250
A la espera de su ayuda.
1 respuesta
Respuesta de Dante Amor
1
H o l a:
En tu explicación comentas que son series de 10 por fila, pero en la imagen se ven 11 por fila.
Te anexo la macro, cambia el valor serie = 10 por el número de series que quieras por fila.
Sub CopiarSeries()
'Por.Dante Amor
ActiveSheet.UsedRange.Offset(0, 7).ClearContents
serie = 10
j = 1
For i = 1 To Range("A" & Rows.Count).End(xlUp).Row Step serie
Range(Cells(i, "A"), Cells(i + serie - 1, "A")).Copy
Cells(j, "K").PasteSpecial Transpose:=True
j = j + 1
Next
MsgBox "Fin"
End Sub