Bonjour,
Je crois que le choix d'une fonction est inadapté, d'autant plus que ta fonction ne renvoie pas de résultat à la fin (du genre : AfficheImage = Résultat). Aussi, à l'ouverture d'un classeur, il est normal que les fonctions Excel s'actualisent, pour éviter ça il faut ajouter en début de procédure :
Application.Calculation = xlCalculationManual