Ya puse una entrada con un script en python para cifrar y descifrar utilizando el cifrado de Polibio . Y ahora, en este post incluyo el cifrado y descifrado utilizando este mismo criptosistema en Excel . Antes de poner el correspondiente código Visual Basic para aplicaciones (VBA), recordar que este cifrado se basa en una tabla de 5 filas y 5 columnas cuyas celdas se completan con las letras del alfabeto (la "I" y la "J" comparten celda, y "Ñ" excluida). Para cifrar se sustituía cada carácter del texto en claro por el dígito de la fila y el dígito de la columna en cuya intersección se encontraba éste. E l código es el siguiente : ' CIFRADO DE POLIBIO: ' ' Cifra y descifra textos en claro y criptogramas, respectivamente, ' utilizando el cifrado de Polibio. ' ' http://mikelgarcialarragan.blogspot.com/ Option Explicit Public TEXTO_CLARO As Range Public CRIPTOGRAMA As Range Public Sub Cifrar() Dim Caracter As Integer ...