Columnas, filas y datos

2 envíos / 0 nuevos
Último envío
GMF
Imagen de GMF
Offline
última acción: Hace 7 años 6 meses
alta: 24/03/2015 - 12:12
Puntos: 25
Columnas, filas y datos

Estimados Colegas;

Necesitaría una Macro que leyese los valores de una columna y que cuando el valor sea menor que un determinado valor, recoja el valor de esa fila pero de otra columna para colocarlo en otro sitio.

Se puede hacer con condicionales pero el trabajo es duro y gracias a un curso de macros que hice en el CICCP, creo que por medio de una macro sería bastante simple por medio de un bucle y poco más. El problema es que hace tiempo que realice dicho curso y salvo en líneas generales me acuerdo de bastante poco.

Espero me puedan ayudar.

Un saludo.

Gracias.

 

Cron
Imagen de Cron
Offline
última acción: Hace 1 mes 6 días
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntos
alta: 23/06/2010 - 12:30
Puntos: 12735
HolaEn el curso conocerías al

Hola

En el curso conocerías al gurú de Excel, conocedor de todos sus entresijos, que lo sabe todo sobre Excel (y lo que no, lo inventa ;) ) y que es el creador de este foro, Paco.

Bueno, lo que pides es relarivamente sencillo. Si el número de filas es limitado y siempre el mismo, puedes hacer un bucle FOR que mueva una variable entera desde 1 (o la fila donde empiecen los datos) hasta la última fila. Si la columna siempre tiene datos, puedes hacer un bucle WHILE que ponga como condición de corte que el valor de la celda sea "" (o sea, vacío). Como no nos dices cómo son tus datos, no sé cuál será la mejor opción. Te pongo un ejemplo con FOR.

dim i as integer

for i = 5 to 45000    'suponiendo que las 4 primeras filas son de encabezados y que tienes datos hasta la fila 45000

if cells(i,1) < VALORDETERMINADO then       'suponiendo que la comprobación es en la columna A

cells(OTRAFILA,OTRACOLUMNA).value = cells(i,8).value        'suponiendo que el valor a tomar está en la columna H

end if

next

 

 

Espero que te sirva.

Un saludo