> 仕方なくFontFamilyのNameを取り出す過程（下記）で

FontFamilyName を得るために、VBA から PrivateFontCollection を呼び出したいという事でよろしいでしょうか。

ライブラリを作るという方針からは外れますが、とりあえず直訳的にはこんな感じになります。
https://gist.github.com/Benshi/abc4bc939306603416ff6d82041bd0af

# すみません。投稿した後で何度か間違いを見つけて再投稿していましたが、
# 削除を繰り返すのも迷惑なので、コード本体は GitHub Gist に置くようにしました。