The data is alphanumeric like "tytin001cm9". This format is standard and
only the "cm" is constant. Yes I would like a non-VBA solution. This is not
my form or it would be full of code by now. I also would not have designed a
3x7 matrix for a user input list. This is an official company form for wide
distribution. Macros are forbidden. I have done several projects for them in
the past, so they approached me to put the finishing touch on this form.
This was my last hurdle.
Mike F
> Using a non-VBA method is somewhat complicated and will take a few steps.
>
[quoted text clipped - 28 lines]
>>
>> Mike F
> The data is alphanumeric like "tytin001cm9".
Ok, alphanumeric = TEXT.
This method is based on *all* user input being TEXT.
Create a 1 dimensional array from your table that's in the range G15:I21.
Enter this formula in K15 and copy down to K35 (21 rows total):
=OFFSET(G$15,INT((ROWS(G$15:G15)-1)/3),MOD(ROWS(G$15:G15)-1,3))
I've also given this range a name:
K15:K35 = Array1
Any empty cells in the user input range G15:I21 will show up as 0 in Array1.
Create a second array from Array1 sorted ascending.
Enter this array formula** in L15 and copy down to L35:
=INDEX(Array1,MATCH(SMALL(IF(Array1<>0,COUNTIF(Array1,"<"&Array1)),ROWS(L$15:L15)),IF(Array1<>0,COUNTIF(Array1,"<"&Array1)),0))
I've also given this range a name:
L15:L35 = Array2
Any empty cells in the user input range G15:I21 will show up as #NUM! errors
in Array2
Set up your data validation list(s). You said you want to use this list on
other sheets so you'll have to give the source a defined name.
Goto Insert>Name>Define
Name: List1
Refers to: =OFFSET(Sheet1!$L$15,,,COUNT(SEARCH("*",array2)))
OK
As the source for the validation list(s) use: =List1
Of course you can hide Array1 and Array2 so no one can see them.
** array formulas need to be entered using the key combination of
CTRL,SHIFT,ENTER (not just ENTER)

Signature
Biff
Microsoft Excel MVP
> The data is alphanumeric like "tytin001cm9". This format is standard and
> only the "cm" is constant. Yes I would like a non-VBA solution. This is
[quoted text clipped - 38 lines]
>>>
>>> Mike F
Mike Fogleman - 24 Sep 2007 12:01 GMT
A brilliant piece of work!! Thanks for the effort.
Mike F
>> The data is alphanumeric like "tytin001cm9".
>
[quoted text clipped - 86 lines]
>>>>
>>>> Mike F
T. Valko - 24 Sep 2007 18:24 GMT
You're welcome. Thanks for the feedback!

Signature
Biff
Microsoft Excel MVP
>A brilliant piece of work!! Thanks for the effort.
>
[quoted text clipped - 90 lines]
>>>>>
>>>>> Mike F