Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Anagrams
My name is not Cradino. Cradino is an anagram of my name "arcindo". Who can help me developing a formula or a macro to make excel generate combinations with all anagrams of my name?????????? Thanks -- cradino ------------------------------------------------------------------------ cradino's Profile: http://www.excelforum.com/member.php...o&userid=18521 View this thread: http://www.excelforum.com/showthread...hreadid=376032 |
#2
|
|||
|
|||
This was subject of discussion months ago. Do a Google newsgroup search to
locate messages. You know that with 7 no-repeating letters you will get 7! = 5040 answers? Did you know 'carthorse' and 'orchestra' are anagrams? -- Bernard V Liengme www.stfx.ca/people/bliengme remove caps from email "cradino" wrote in message ... My name is not Cradino. Cradino is an anagram of my name "arcindo". Who can help me developing a formula or a macro to make excel generate combinations with all anagrams of my name?????????? Thanks -- cradino ------------------------------------------------------------------------ cradino's Profile: http://www.excelforum.com/member.php...o&userid=18521 View this thread: http://www.excelforum.com/showthread...hreadid=376032 |
#3
|
|||
|
|||
arcindo
User defined function for you.... Function SCRAMBLE(text, Optional recalc) ' Scrambles its single-cell argument ' If second argument is 1, then recalc it each time sheet is calculated Dim Num As Integer, i As Integer, rpos As Integer Dim temp As String, text2 As String If IsMissing(recalc) Then recalc = 0 If recalc Then Application.Volatile If IsArray(text) Then text2 = text(1) Else text2 = text Num = Len(text2) For i = 1 To Num temp = Mid(text2, i, 1) rpos = Int((Num - 1 + 1) * Rnd + 1) Mid(text2, i, 1) = Mid(text2, rpos, 1) Mid(text2, rpos, 1) = temp Next i SCRAMBLE = text2 End Function Usage is =SCRAMBLE(cellref) or =SCRAMBLE(acrindo) If you want result to be re-scrambled each time the sheet calculates.... =SCRAMBLE(arcindo,1) Another method is by macro.........See John Walkenbach's site for code or a downloadable workbook. http://j-walk.com/ss/excel/tips/tip46.htm Gord Dibben Excel MVP On Thu, 2 Jun 2005 11:28:01 -0500, cradino wrote: My name is not Cradino. Cradino is an anagram of my name "arcindo". Who can help me developing a formula or a macro to make excel generate combinations with all anagrams of my name?????????? Thanks |
#4
|
|||
|
|||
Does it have to be excel?
http://www.wordsmith.org/anagram/ cradino wrote: My name is not Cradino. Cradino is an anagram of my name "arcindo". Who can help me developing a formula or a macro to make excel generate combinations with all anagrams of my name?????????? Thanks -- cradino ------------------------------------------------------------------------ cradino's Profile: http://www.excelforum.com/member.php...o&userid=18521 View this thread: http://www.excelforum.com/showthread...hreadid=376032 -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|