Fonction VBA : base64Encode

La fonction VBA base64Encode pour Excel convertit une chaîne de caractères en base 64.

Utilisation :

base64Encode(texte)


Exemple d'utilisation

Encodage en base 64 d'un texte simple base64Encode("Mon super texte") :

Sub exemple()
    
    texte = "Mon super texte"
    
    MsgBox base64Encode(texte) 'Renvoie : 77u/TW9uIHN1cGVyIHRleHRl
    
End Sub

Encodage en base 64 de données au format JSON et ajout de ces données dans une URL :

Sub exemple()
    
    donnees = "{""p"":{""login"":""NOM"",""password"":""MDP""}}"
    adresse = "https://api.exemple.com?d="
    
    MsgBox adresse & base64Encode(donnees) 'Renvoie : https://api.exemple.com?d=77u/eyJwIjp7ImxvZ2luIjoiTk9NIiwicGFzc3dvcmQiOiJNRFAifX0=
    
End Sub
La fonction inverse (base64Decode) est également disponible dans ce pack de fonctions.

Remarque : cette fonction nécessite l'installation du pack de fonctions XLP (un add-in gratuit pour Excel qui ajoute 96 nouvelles fonctions).