coding an anagram function

Hi,

I need to create a VBA function which compares two cells to see if the
contents are anagrams of each other. Result of function would be true /
false.

The cells will only contain letters, and no letter will appear more
than 9 times. Each cell will never have any more than 40 characters in
total. Spaces can be ignored.

The logic I was planning to use was to assign every letter of the
alphabet a numeric value and then add up the numeric values of each
string to give a numeric result.

For this to produce a unique result for any given string, i was
planning to use values like the following:

a=1
b=1.1
c=1.01
d=1.001
e=1.0001
f=1.00001
g=10
h=10.1
i=10.01
j=10.001
k=10.0001
l=10.00001
m=100
n=100.1
o=100.01
p=100.001
q=100.0001
r=100.00001
s=1000
t=1000.1
u=1000.01
v=1000.001
w=1000.0001
x=1000.00001
y=10000
z=10000.1

Given that no letter can appear more than 9 times, I believe this
should return a unique result for every possible string of letters.

So, if the function compares two strings and gets the same addition
based on the above rules, the strings must contain the same letters and
are therefore anagrams of each other.

However, I have no idea how to code this in VBA.

Can anyone either suggest code for this, or another way of comparing
two strings to see if they are anagrams of each other?

Many thanks in advance,

Neil.

.

Relevant Pages

  • Re: coding an anagram function
    ... I took on the task of finding all of the anagrams in an Access table of six ... Function sorted(wd As String) As String ... I need to create a VBA function which compares two cells to see if the ... Can anyone either suggest code for this, or another way of comparing ...
    (microsoft.public.excel.programming)
  • Re: coding an anagram function
    ... Any reason you cannot use the ASCII values of each character? ... contents are anagrams of each other. ... The cells will only contain letters, and no letter will appear more ... For this to produce a unique result for any given string, ...
    (microsoft.public.excel.programming)
  • Re: coding an anagram function
    ... 'Get the sum of the elment values in each ... contents are anagrams of each other. ... The cells will only contain letters, and no letter will appear more ... For this to produce a unique result for any given string, ...
    (microsoft.public.excel.programming)
  • Re: Random Placement whilst fitting constraints
    ... I am newly returned to Excel after a LONG absence, so I am having to relearn everything about Excel from scratch. ... That is, for your stated requirements, put AAAAAAAAAABBBBBBBBCCCCCCCCCD in D1 (the order is unimportant as the RAND function will handle the mixing, but putting them in order makes proofing the string easier). ... and copy it down for a total of as many cells as there are letters in D1. ...
    (microsoft.public.excel.worksheet.functions)
  • Re: coding an anagram function
    ... I need to create a VBA function which compares two cells to see if the ... contents are anagrams of each other. ... The cells will only contain letters, and no letter will appear more ... For this to produce a unique result for any given string, ...
    (microsoft.public.excel.programming)