Используем шрифт WordExpert (шутка)

Предупреждаю сразу, что это шутка.
Недавно я узнал о такой любопытной особенности программы Word.
В знак признания заслуг портала WordExpert.ru перед Интернет-сообществом компания Microsoft разработала специальный шрифт WordExpert.
Выделите в Word некоторый текст и выполните следующий небольшой макрос:

Sub Макрос1()
'
' Используем стиль WordExpert
'
    Selection.Font.Name = "WordExpert"
End Sub

На самом деле, конечно, такого шрифта нет. Однако Word беспрекословно «подчиняется» VBA и после исполнения макроса указывает такой шрифт как существующий. При этом используется тот шрифт, который Word «считает» наиболее близким к указанному в макросе.