I am trying to use VBA to encode the letters of given words into numbers and then use them in algebra.
For example, given that A = 11, E = 17, G = 2, N = 41, O = 37, T = 13, AGE = 11 * 2 * 17 and TO+N = 13 * 37 + 41.
I can get the Nth individual letter using Mid(Word, N, 1) but how do I then convert it to its numerical equivalent? All letters of the alphabet have numerical equivalents.
Last edited by Bananabean; 05-07-2019 at 02:23 PM.
Use an array from 1 to 26 to associate to each index its value or just a VBA Collection, whatever …
Marc L,
Please explain (perhaps with a line of code) how I would do this ... I am a beginner
Without seeing your code …
But the explanation for a Collection is yet within the VBA inner help …
Another way at very beginner level : instead of using an If … Then … ElseIf … Else … End If block statement
you could use a Select Case block statement, to see too in VBA inner help.
Marc L,
Please be so kind as to write an example of some VBA that would answer my original question:
Given that A = 11, E = 17, G = 2, N = 41, O = 37, T = 13,
AGE = 11 * 2 * 17 and TO+N = 13 * 37 + 41.
Select Case sample in this thread …
Many others within this forum (just perform a search) and see also the VBA inner help as all is yet inthere !
I am sorry to be so useless but I don't understand Marc L.
Is there anyone else who can answer my original question with VBA code, please?
A*G*E B2: =BB(A2) T*O+N A^G
Please Login or Register to view this content.
Last edited by shg; 05-07-2019 at 12:23 PM.
Entia non sunt multiplicanda sine necessitate
Thank you very much shg. I now see how a collection works. Excellent.
You're welcome.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks