Casi casi, pero tendras que leer la ayuda (igual has ido al ejemplo directamente)
Te lo pego:
If the DoSubject property is True and the SubjectItemName property has a value, a title for each document. You must set these properties before calling the FormatMsgWithDoclinks method.
Asi que tendras que hacer algo como esto (en negrita es lo que te faltaria, mira el ultimo ejemplo de la ayuda)
Set newsletter = session.CreateNewsletter( dc )
newsletter.DoSubject = True
newsletter.SubjectItemName = "Topic" ' Donde TOPIC es el campo que queremos poner como titulo, tendras que cambiarlo por tu campo
Set doc = newsletter.FormatMsgWithDoclinks( db )
Un Saludo