It's not that there are too many, it's that updating so many links takes a long time. You might try:
a) inserting -
DoEvents
after each -
.LinkFormat.SourceFullName = StrFlNm
and editing the registry, as described in
https://www.msofficeforums.com/word-...tml#post130308 if you haven't already done so.