Foros del Web » Soporte técnico » Ofimática »

dividir columnas <br> con excel

Estas en el tema de dividir columnas <br> con excel en el foro de Ofimática en Foros del Web. Hola, mi proveedor me ha pasado una tabla con excel con la siguiente forma: Lo que quiero es dividir la 4ª columna en muchas. Es ...
  #1 (permalink)  
Antiguo 17/02/2012, 04:47
 
Fecha de Ingreso: enero-2012
Ubicación: Alzira, Valencia
Mensajes: 90
Antigüedad: 12 años, 2 meses
Puntos: 5
dividir columnas <br> con excel

Hola, mi proveedor me ha pasado una tabla con excel con la siguiente forma:



Lo que quiero es dividir la 4ª columna en muchas. Es decir cada vez que aparezca "<br>" que cree una columna.

¿Alguien tiene idea de algo?
  #2 (permalink)  
Antiguo 17/02/2012, 04:47
 
Fecha de Ingreso: enero-2012
Ubicación: Alzira, Valencia
Mensajes: 90
Antigüedad: 12 años, 2 meses
Puntos: 5
Respuesta: dividir columnas <br> con excel

Creo que no me he explicado correctamente. La idea es esta:

tabla ahora:

columna1
x<br>y<br>z<br>

Quiero conseguir:

columna1 columna2 columna3
x y z
  #3 (permalink)  
Antiguo 17/02/2012, 18:41
 
Fecha de Ingreso: abril-2011
Mensajes: 1.342
Antigüedad: 12 años, 10 meses
Puntos: 344
Respuesta: dividir columnas <br> con excel

Te paso una macro que he creado en un momento que te puede ayudar:

Código vb:
Ver original
  1. Sub separarEnColumnas(separador As String)
  2.  
  3.  Dim cadena
  4.  Dim tokens
  5.  Dim i
  6.  If (Selection.Cells.Columns.Count = 1) Then
  7.  For Each fila In Selection.Cells.Rows
  8.   cadena = fila.Cells(1, 1).Value
  9.   tokens = Split(cadena, separador)
  10.   For i = 0 To UBound(tokens)
  11.    fila.Cells(1, i + 1).Value = tokens(i)
  12.   Next i
  13.  Next
  14.  End If
  15.  
  16. End Sub
  17.  
  18. Private Sub CommandButton1_Click()
  19.  separarEnColumnas ("<br>")
  20. End Sub

Luego tienes que crear un botón ActiveX en la hoja excel para llamar a la macro y crear el evento asociado al botón que en mi caso es CommandButton1_Click y en el tuyo dependerá del nombre del botón. Dentro del método metes la llamada al procedimiento y seleccionas la columna que deseas separar en varias y das click al botón y deberías tener separada la columna en tantas como <br> tengas.

Eso sí, tienes que dejar espacio a la derecha en caso de que tengas datos a la derecha de esa columna si no quieres que se sobreescriban, porque no he hecho que se creen nuevas columnas, sólo que escriba en las columnas de la derecha.

Espero que te sirva y saludos.
  #4 (permalink)  
Antiguo 18/02/2012, 10:39
 
Fecha de Ingreso: enero-2012
Ubicación: Alzira, Valencia
Mensajes: 90
Antigüedad: 12 años, 2 meses
Puntos: 5
Respuesta: dividir columnas <br> con excel

Muchas gracias, voy a probar...
  #5 (permalink)  
Antiguo 19/02/2012, 12:06
Avatar de mrocf  
Fecha de Ingreso: marzo-2007
Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años
Puntos: 88
De acuerdo dividir columnas <br> con excel

Hola! carabassa (y Alexg)
La siguiente variante puede implementarse manualmente pues son -tan sólo- dos acciones, o puede implementarse mediante una macro.
Ella es:

Código PHP:
Sub TextoEnColumnas()
With Range([d1], Cells(Rows.Count"d").End(xlUp))
  .
Replace What:="<br>"Replacement:="@"LookAt:=xlPartSearchFormat:=False
  
.TextToColumns Destination:=[d1], DataType:=xlDelimitedTextQualifier:=xlDoubleQuote_
    ConsecutiveDelimiter
:=TrueTab:=FalseSemicolon:=FalseComma:=FalseSpace:=False_
    Other
:=TrueOtherChar:="@"FieldInfo:=Array(Array(11), Array(21), Array(31))
End With
End Sub 
Saludos, Cacho R.
  #6 (permalink)  
Antiguo 19/02/2012, 16:34
 
Fecha de Ingreso: enero-2012
Ubicación: Alzira, Valencia
Mensajes: 90
Antigüedad: 12 años, 2 meses
Puntos: 5
Respuesta: dividir columnas <br> con excel

Estáis hechos unas maquinas, muchas gracias!!!
  #7 (permalink)  
Antiguo 19/02/2012, 16:57
Avatar de mrocf  
Fecha de Ingreso: marzo-2007
Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años
Puntos: 88
dividir columnas <br> con excel

Cita:
Iniciado por carabassa Ver Mensaje
Estáis hechos unas maquinas, muchas gracias!!!
Es eso o la grabadora de macros está funcionando de lo más bien...

Gracias por la devolución.
Cacho R.

Etiquetas: columnas, dividir, excel
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 04:23.