VBA安全公告-“数据连接已被阻止”

Question

我正在尝试确定与.xlam文件关联的“ Microsoft Excel安全公告”的原因。特别是，我很好奇VBA代码中是否存在某些导致此类安全通知的属性或方法？我们还有另一个.xlam作为外接程序安装，它从未引起类似的通知，因此使我相信使用某种特定的属性或方法来导致此问题。我已经注释了许多行，以查看我是否可以自己隔离犯罪者，但到目前为止还没有运气。

注释掉的代码示例；

pathToCSV = ActiveWorkbook.Path
HostName = ActiveWorkbook.Name
Set Globe = CreateObject("Scripting.FileSystemObject")
Set place = Globe.GetFolder(pathToCSV)
Set Destination = Application.Workbooks.Add

任何想法都会受到赞赏。

Answer 1

Excel加载项只是一种特殊的Workbook项目，它在Excel启动时加载。作为Workbook对象，它具有Connections集合。

我不知道您的代码是否需要在ThisWorkbook中进行连接，但是加载具有数据连接的Excel加载项似乎是一个安全问题-因此，如果您 do 需要他们，考虑研究替代方法。

要删除它们，请在立即窗格（Ctrl + G）中进行操作-确保外接工作簿项目在VBA编辑器中处于活动状态。

for i = 1 to thisworkbook.connections.count : thisworkbook.connections(1).delete : next

那应该删除所有的。保存加载项项目，关闭Excel，重新打开，看看是否仍然收到警告。

Answer 2

@Mathieu Guindon

我认为代码应该是

for i = 1 to thisworkbook.connections.count : thisworkbook.connections(i).delete : next

不是

for i = 1 to thisworkbook.connections.count : thisworkbook.connections(1).delete : next

你同意吗？