Tech said:
how to create a simple macro within Microsoft Excel, and then how to use
that macro to calculate a single cell value:
http://sysudi.blogspot.com/2009/06/use-vba-macro-inside-excel-cell.html
Ok, this a reasonably good explanation of the method at hand, but let's
talk about your choice of content.
It is intriguing, but what is the "encryption" good for? It's not
reversible, so I can't decrypt my own message.
Also, you have a bug:
For cnt = 0 To Len(TextToEncrypt)
tmp = tmp & Asc(Mid(TextToEncrypt, cnt, 1))
Assignment to tmp fails on the first pass since the index to Mid is zero.
Keep blogging though, good tutorials are a good thing!