Constantes de la propriété International

Bonjour,
je cherche à récupérer(par VB) dans une feuille la liste des constantes de la propriété international() de l'objet Application.
Une liste de ce type :
1 xlCountryCode 33
17 xlDateSeparator /
3 xlDecimalSeparator ,
Voici la macro qui me permet de récupérer la premiere et la troisième informations, mais je n'arrive pas à récupérer la deuxième information cad le texte correspondant à la constante.
Si quelqu'un a une solution, merci d'avance.
Francis
Sub test()
Indx = 1
Do
On Error Resume Next
Cells(Indx, 1) = Indx
Cells(Indx, 2) = Application.International(Indx)
Indx = Indx + 1
Loop Until Application.International(Indx) = ""
End Sub