Need to perform some checks with letters in text

I need to do the following and I do not seem to get anywhere with my tries, so I thought that maybe some excel magician, may have a solution here!
I thing maybe VB scripting could do the job

Cell A1 contains one word max length 20 chars

Cell A10-A40 I have a list of 30 other words of various lenths (shorter than the word in A1) in alphabetical order.
Cell B1 I need to put there a check (true/false) that checks if the word in A1 consists of different letters. Meaning each letter has to be used only once.
Cell B10-B40 I need the same check for each word of the list, that it consists of different letters (true/false).
Cell C10-C40 I need a second check for each word of the list, that consists only of letters contained in first word (A1) (true/false)
If some "weird" alphabet function will be used, please have in mind that I need to do that in Greek language-characters (24 letters).

Thanks in advance for any response.

First enter the following User Defined Functions (UDFs) in a standard module:

Please Login or Register  to view this content.

Then in B1 enter:
=ChrTest(A1)

In B10 enter:
=ChrTest(A10) and copy down

In C10 enter:
=Within($A$1,B10) and copy


User Defined Functions (UDFs) are very easy to install and use:

1. ALT-F11 brings up the VBE window
2. ALT-I

ALT-M opens a fresh module

3. paste the stuff in and close the VBE window

If you save the workbook, the UDF will be saved with it.

To remove the UDF:

1. bring up the VBE window as above
2. clear the code out
3. close the VBE window



To learn more about macros in general, see:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

or

http://www.cpearson.com/excel/Writin...ionsInVBA.aspx

for specifics on UDFs



B.T.W.

You must enable macros for this method to work. If you see the dreaded #NAME?
either macros are disabled or the UDFs are not in a standard module

My bad, I found what I was doing wrong.
I am very sorry
Thanks again