kriptografi sederhana teks ke bilangan dengan macro VBA Word

Bismillah..
Hi semua, pagi ini aku membaca buku yang canggih! Elementary Number Theory tulisan Pakdhe Burton. Ada satu bab tentang kriptografi. Hebatnya, Pakdhe Burton ini mampu membuat panas semangatku yang semakin membara. Seakan-akan harus dan harus kuterima tantangannya. Aku pun membuat sebuah aplikasi macro Ms. Word yang bisa ngonvert teks ke kode. Yang aku buat masih sangat sederhana, dan sangat mudah untuk dipecahkan.. hanya ngganti huruf ke bilangan saja. Mudah sekali. Filenya bisa kita unduh di google drive ini:
https://docs.google.com/file/d/0B-WmUMQtTTUYRngyRkhldC1sbVE/edit?usp=sharing
Untuk menggunakannya cukup mudah.
1. Enable-kan macronya
2. Kemudian kita tulis apa saja yang mau kita tulis
3. Blok tulisan yang mau dikodekan, klik Enkripsi

4. Langsung muncul tuh kode angka-angka yang panjang
Kita bisa main pesan rahasia-rahasiaan dengan teman kita
Lha terus kalau mau ngartikan gimana?
Tenang, kita blok yang mau diartikan, kemudian kita klik tombol dekripsi di form Teks ke Bilangan.

NB:
Bagi yang suka ngoding, boleh sekali melihat kode programnya dengan nekan tombol Alt + F11 di keyboard. Mau ngembangin jadi lebih canggih? Boleh saja, monggo..

Semoga bermanfaat..
Assalaamu'alaikum
:)