J'ai oublié de mettre un s à sites la dernière fois que j'ai codé, j'ai corrigé les bugs de la fonction createTableau, elle est fonctionnelle maintenant.
C'est une cellule que tu dois définir dans ton fichier pour garder la dernière date d'envoi, tu peux remplacer ça par ce que tu souhaites, je te conseille de préciser la feuille du Range en utilisant Sheets("nomDeLaFeuille").Range("A1")