Das ist mit minimalem Aufwand genau der professionelle Einsatz im eigenen Code, wie er hier gebraucht wird. Ergänzen Sie also am Anfang des Excel-Moduls diese Enumeration:

Enum enmBuiltInDocProps
	Titel = 1
	Thema
	Autor
	Keyword
	'...und so weiter
End Enum

Sie können wie für Titel eine Zahl vorgeben, ansonsten wird einfach weitergezählt. Die 1 ist ja notwendig, weil die BuiltinDocumentProperties-Auflistung ausnahmsweise nicht mit 0 beginnt. Die selbstgeschriebenen Properties für Excel sind dank der Enumeration nun fast identisch mit denjenigen aus Word: