Combinaison de touches avec SendKeys VBA

Bonjour à tous,
Je cherche à effectuer une routine qui répertorie tous les caractères de la table, pas seulement ASCII de 0 à 256.
Exemple ALT + 1 = ☺
ALT + 0033 = !
ALT + 0393 = ‰

Sous EXCEL 2019 PRO voici le code que j'ai testé :
Sub A()
Sheets("feuil1").Select
Range("C5").Select
SendKeys "{F2}"
SendKeys "%({NUMLOCK}0393)"
End Sub

J'obtiens 393 dans la cellule C5.
Merci de ne pas me demander de détourner ma demande du style tu devrais faire Range("C5").Value = "‰"
Bon courage les amis.