Si vous voulez envoyer une valeur dans une cellule, il faut déterminer en fonction de quoi A8 est complétée.
Je ne sais pas aller dire à VBA de mettre 6 ou Bye bye dans une cellule si on ne sait en fonction de quoi on met ces valeurs
Edit :
Dans le module, mettez ceci juste en dessous d'option explicit
Option Explicit
Dim a
Function test(a)
test = "Bye Bye"
End Function
En A8 ajoutez --> =test(a)
A voir si c'est ce que vous voulez