Bonsoir
J'ai un code à placer dans un module mais je n'arrive pas à l'exécuter, j'me retrouve avec une erreur. On m'a envoyé ça:

J ai pu réaliser ceci sur Excel vba, il te suffira de placer ce code d un module de ton classeur et l 'exécuter.
Avec par exemple f(x) =2x+3[26] x etant le rang de la lettre à coder et f(x), le rang de la lettre une fois codée.

Citation :
Sub codage ()
Mot=inputbox("saisir le mot à coder")
For i=1 to len(Mot)
For j =0 to 25
If chr(j+65)=mid(Mot,i,1) then
Result=Result & chr(((2*j+3)mod 26)+65)
End if
Next
Next
Msgnox Result ' retourne la chaîne codée
End sub

Mais comment l'exécuter ? J'essaye de créer un module puis de coller le code mais j'ai une erreur de compilation:Sub ou Function non définie.