Application.Name (Word)

Renvoie le nom de l'objet spécifié.

Dim strName As String
strName = Name