VBA Crypto solving

[spacker15]

I am trying to solve some simple crypto, that looks something like this;

cells 1,1 has the alphabet and cells 1,2 has the key.
a = z
b = y
c = x

this is my long drawn out code for 1 cell.

Please Login or Register  to view this content.

ect...

is there an easier way? please help.

Thank you,

Sean

[smuzoen]

Depending on how you are going to use it I would create a 2 dimensional array - assume A-Z is in column A and Z-A is in column B

Please Login or Register  to view this content.

The first dimension of the array cryArr(n,1) is column A and the second dimension is cryArr(n,2)
So if you loop through the array to find A

Please Login or Register  to view this content.

In this case the letter you would look for would be a variable so you would not loop through to find A but rather find a string variable. For example

Please Login or Register  to view this content.

Hope that makes sense

[spacker15]

Thank you for the two dimentional array. I think (95%) I understand the code, but to apply it, is where i get fuzzy. Colum A = A-Z Colum B = Z-A. how do I input, say (hvcm = sean). Can I put hvcm in cell c1 or do I need to use a seperate cell for each letter.

Please be patiant with me, I know enough to be dangerous (to myself), I'm still trying to learn VBA/codding in general.

Thanks again for your help!!!!

Sean

[smuzoen]

In your example hvcm would equate to sexm however hvzm would equate to sean.
You could enter the code you want to convert into C1 and use

Please Login or Register  to view this content.

See attached workbook - if you want to ask any questions about the code let me know