A - Debugger anwerfen ... der wird Dir wahrscheinlich sagen, dass doc.EmbeddedObjects = Nothing oder Empty ist
B - im zweiten Schritt dann Hilfe bemühen und Unterschiede zwischen .HasEmbedded und .EmbeddedObjects herausfinden.
C - feststellen, dass .HasEmbedded True ist, wenn Attachments im Doc sind
D - merken, dass .EmbeddedObjects genau diese Attachments nicht umfasst.
E - auf RichTextItem.EmbeddedObjects umstellen.
hth
Thomas