Problema de Vba: el rango ("A 1: IV 1") tiene números desordenados (no ordenados por tamaño). Escribe un vba para poner estos números.
arr? =?Range("A1:IV1)?Asignar un rango de celdas al array arr
n?=?256?El número de elementos conocidos
¿Para qué? ¿Yo?= ?1?¿Dónde? -?1?Número de bucles externos
¿Para? =?1?Número de bucles internos
¿Y si arr(1,j)? si es más grande que el siguiente? =?Arr(? 1,j)'Almacenamiento temporal
arr(1,j)? =?arr(1,j?+?1)'Mover 1 columna a esta columna
arr(. 1, j? +?1)?=?' t 'Asignado temporalmente a la 1 columna inferior
Fin si se juzga
p>Salir cuando el bucle interno alcance el número predeterminado de veces
Salir cuando el bucle externo alcance el número predeterminado de veces
Rango("A1:IV1)? "=arr" se ha ordenado y asignado nuevamente al rango de celdas original.
Por supuesto, también puedes asignar valores a otros rangos de celdas.
¿Fin? El Sub anterior es un código VBA y la fórmula es realmente muy simple:
=SMALL($A1:$IV1, COLUMN(A1))
La fórmula se coloca en la celda A2 y llenar a la derecha de la celda IV1.