Saltar al contenido

Macro para cambiar estructura de datos horizontal a vertical


Recommended Posts

Macro para: 1. Cuatruplicar datos, 2. Cambio horizontal a vertical condicional

Hola a todos,

Espero que podaís echarme, con vuestros conocimientos, una mano en una árdua tarea. Poseo una base de datos con 512 observaciones y necesito cambiar la estructura de los mismo. Se trata de un ejercicio donde, en primer lugar, se recogen las características de los individuos y, en segundo lugar, se le indica que ordenen cuatro fotografias (asignando un 1 a la que menos les gusta y una 4 a la que más) extraídas de forma aleatoria de 32 posibles. Estos datos están en forma horizontal y necesito crear una nueva variables que se llame ELE para ordenar en vertical las puntuaciones de 1 a 4 y crear asimismo una nueva columna denominada foto que asigne la foto a la que pertenece la preferencia. Asimismo, habría que cuatruplicar los datos relativos a las características del sujeto. Adjunto un ejemplo descriptivo ya que es complicado ocn palabras describir el proceso.

Gracias de antemano

Enhorabuena a todos por la estupenda comunidad

ej_fotos.zip

Enlace a comentario
Compartir con otras webs

Re: Macro para: 1. Cuatruplicar datos, 2. Cambio horizontal a vertical condicional

Buenas, Olearus

Lo que quieres es que, por ejemplo, ¿con los datos de las 6 primeras líneas de tu hoja 1 se pueda crear en la Hoja2 lo que tienes a partir de la fila 8?

Si es así, creo que algo podremos hacer.....:peaceful:

Un saludo,

Tese

- - - - - Mensaje combinado - - - - -

Bueno, pues sin esperar tu respuesta, creo que he creado una pequeña "maravilla"......jejeje

El resultado lo incluye en la Hoja2........que solo tiene la cabecera (y el resultado esperado según tu archivo original.....

Prueba y mira a ver si es eso lo que necesitas.....

Un saludo,

Tese

ejemplo_Tesev1.rar

Enlace a comentario
Compartir con otras webs

Re: Macro para: 1. Cuatruplicar datos, 2. Cambio horizontal a vertical condicional

Buenas, Olearus

Lo que quieres es que, por ejemplo, ¿con los datos de las 6 primeras líneas de tu hoja 1 se pueda crear en la Hoja2 lo que tienes a partir de la fila 8?

Si es así, creo que algo podremos hacer.....:peaceful:

Un saludo,

Tese

- - - - - Mensaje combinado - - - - -

Bueno, pues sin esperar tu respuesta, creo que he creado una pequeña "maravilla"......jejeje

El resultado lo incluye en la Hoja2........que solo tiene la cabecera (y el resultado esperado según tu archivo original.....

Prueba y mira a ver si es eso lo que necesitas.....

Un saludo,

Tese

Tese 1969... muchísimas gracias... lo has captado a la primera... que nivel tienes programando...

Estupenda comunidad no me cansaré de decirlo....

Tese mil gracias de nuevo

Disfruta del fin de semana :encouragement:

- - - - - Mensaje combinado - - - - -

Tema Solucionado

Enlace a comentario
Compartir con otras webs

Archivado

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

  • 96 ¿Te parecen útiles los tips de las funciones? (ver tema completo)

    1. 1. ¿Te parecen útiles los tips de las funciones?


      • No
      • Ni me he fijado en ellos

  • Current Donation Goals

    • Raised 0.00 EUR of 130.00 EUR target
  • Archivos

  • Estadísticas de descargas

    • Archivos
      177
    • Comentarios
      90
    • Revisiones
      27

  • Crear macros Excel

  • Mensajes

    • Buenas noches quisiera hacer esta formula auto incremental    =SI(INDIRECTO("'Casos de Prueba'!I1")="Resultados Ciclo 1"; SI(CONTAR.SI(INDIRECTO("'Casos de Prueba'!I:I"); "OK")=0; 0; CONTAR.SI(INDIRECTO("'Casos de Prueba'!I:I"); "OK")); 0)      para que cada vez que copiase y pegase la celda con la formula  se incrementara la letra en este caso la I pasara a J ,como el numero perteneciente a Resultados Ciclo pasando en este caso del 1 al 2.   Tengo también esta formula =CONCATENAR("CP";TEXTO(MAX((SI((ESNUMERO(HALLAR("CP";A$1:A1)))*(A$1:A1<>"");VALOR(EXTRAE(A$1:A1;3;3));0))+1);"000")&" - "&B2) quisiera que no tuviera los 3 ceros si no que fuera por ejemplo CP1 y se fuera incrementando. Gracias un saludo.
    • Con el diseño así como lo tiene en su libro, una fórmula de BUSCARV con COINCIDIR debería ser de utilidad =C5*BUSCARV($C$1,Tabla1[#Todo],COINCIDIR($D5,Tabla1[#Encabezados],0)) Es con lo que participaría en su consulta. Lo que resta es definir que hacer si no encuentra la OT porque así como esta le devolvería error en ese caso, o si tiene condiciones que haya podido omitir también le afectarían el resultado.
    • He cambiado mi macro a este: Sub repetir() Set a = Sheets(ActiveSheet.Name) uf = a.Range("C" & Rows.Count).End(xlUp).Row 'ultima fila con datos ActiveCell.Select ActiveCell.Offset(1, 0).Select   'Application.OnTime Now + TimeValue("00:00:10"), "repetir", , True End If End Sub   Lo que no se es como detenerlo al llegar a la ultima fila con datos de la columna C. Muchas gracias
    • Buenas tardes a todos. Tengo un problema que preciso de vuestra ayuda.  Tengo que controlar los gastos de la oficina que trabajo y he de repartir unos gastos a % según una OT y unos tipos de gastos. Envío un archivo adjunto. Lo que necesito es que lo que aparece en la columna en amarillo lo haga automáticamente, teniendo en cuenta los datos de la tabla a la derecha. Por ejemplo, el primer gasto tiene una cuota de 1477 euros y teniendo en cuenta que es un gasto de tipo Común y que la OT es la 12810234, le corresponde un gasto de 605,57 euros ya que según la tabla de la derecha su % a imputar es de un 41%. ¿alguien me puede ayudar con la formula? He de añadir muchas más líneas y más hojas con el resto de OT y en el futuro cambiar más datos, así que necesito automatizarlo con una formula Excel. Gracias. Control de gastos.xlsx
    • Hola buenas tardes: Por favor me pueden ayudar a realizar lo siguiente. ejecutar una macro después de un tiempo, que recorra una columna a partir de la celda activa hacia abajo. Es una lista extensa, que filtro desde la columna B. y solo me muestra las filas que me interesan. ejemplo: Si mi celda activa es la C23 ejecutar la macro y baje una celda y repite la macro después de 20 segundos y lo vuelve hacer(Simpre bajando una celda), y que este se detenga hasta la ultima fila que este visible en el filtro. Ya que puedo tener muchos datos mas.   Gracias   Prueba filtro y avance.xlsm
  • Visualizado recientemente

    • No hay usuarios registrado para ver esta página.
×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.