Saltar al contenido
View in the app

A better way to browse. Learn more.

Ayuda Excel

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Pasar datos de columna a fila masivamente

publicado

Hola, tengo la siguiente duda, necesito pasar de columna a fila de manera masiva, ejemplo:

Lo que tengo:

4321; A04

4321; A03

4321; A04

8765; A01

8765; A02

8765; A03

Y lo que necesito es:

4321; A03; A03; A04

8765: A01; A02; A03

Son  varios códigos distintos (4321, 8765q), con distintos datos que cambiar de columna a fila, ocupar la función trasponer me ocupara mucho tiempo.

 

 

Featured Replies

publicado

buenos días, los datos son filas diferentes ?

están los datos en una única celda ?

el salto de linea es visual o realmente hay una linea en blanco entre datos ?

Lo mismo con el resultado, acaban en una sola celda , con delimitador ; ? o el delimitador ; se refiere a cambio de celda

 

saludos

 

Editado el por JasallBcn

publicado

Buenas de nuevo, si la opción es los datos están en una misma celda ( ejemplo B3 ) , te dará el resultado en B4 y B5

Sub transformar()

Dim lista() As String
Dim i As Double, x As Double
Range("A4:xfd6") = ""
' los datos estan en la celda B3
lista = Split(Replace(Range("b3"), Chr(10), ";"), ";")

For i = 0 To UBound(lista)
If lista(i) <> "" Then
 Range("b4").Offset(0, x) = lista(i) ' te lista en columnas
 Range("b5") = Range("b5") & lista(i) & ";" ' te lista en una sola celda
 x = x + 1
End If

Next i

End Sub

saludos.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.