怎样设置才能使MS Office 365/2021 LTSC不弹出如图的选项卡？

ssq1109

　　附件中的文档是我通过VBA将一目录中的TIF图通过INCLUDEPICTURE域批量插入Word文档中的，以前我用MS Office 2003～2016时，这种方法很有效，但用MS Office 365/2021 LTSC时发现在VBA运行到批量插入TIF插图时，就会出现下左图的选项卡，只有按或点“Y”才能继续运行并将TIF插入文档中，将文档保存后，再打开文档，插图处就变成品红色块，如果TIF插图文件仍和此文档在同一目录下，只有再全选文档，按F9更新域，又弹出下左图选项卡，再按或点“Y”插图才显示正确，品红色块消失，不过保存后，再打开此文档，插图处又变成品红色块。
　　该如何设置像MS Office 2003～2016一样不弹出如左图的选项卡？
      

青玉1989

试试把程序弹窗警告关闭试试看，代码是：Application.DisplayAlerts = False。最后记得重新设回True。

ssq1109

青玉1989 发表于 2022-5-23 02:14
试试把程序弹窗警告关闭试试看，代码是：Application.DisplayAlerts = False。最后记得重新设回True。

没作用。且针对插图有图片域链接，我运行下列代码，确实可删除INCLUDEPICTURE域链接，品红色也消失了，插图也正常了，再保存退出，但重新打开，插图还是有品红色底纹，不过INCLUDEPICTURE域链接是没有了，但想再消除品红色已没办法了。

Sub Fields_Unlink()
    Selection.WholeStory
    Selection.Fields.Update
    Selection.Fields.Unlink
End Sub

sylun

估计是默认安全设置所致。可试试在WORD选项设置的信任中心设置中将目标文件夹添加至受信任位置列表中

thunor

INCLUDEPICTURE域代码是怎么写的？你能不能写出来？附件的图片全是品红色，看不见代码。

thunor

另外，你可以用“INCLUDETEXT”试试，或许它能办到。