在使用VBA时，如果出现“不信任到Visual Basic Project的程序连接”的错误提示，

解决办法：选择宏安全性中的“信任对于"Visual Basic 项目"的访问”项
操作步骤：EXCEL菜单：工具－宏－安全性－可靠发行商－选中‘信任“Visual Basic 项目”的访问’
VBA编程实现：

Sub sets()
     Dim strPw
      strPw = "mst"
      With Application
          .Windows.Application.CommandBars(1).Controls(6).Execute   '打开EXCEL的“工具”菜单
          .SendKeys strPw       '顺序按下三个键：mst
          .SendKeys ("%v")      '按下组合键：ALT+V
          .SendKeys "{ENTER}"   '按回车键
      End With
      DoEvents
End Sub

在需要“信任对于"Visual Basic 项目"的访问”权限的语句前面调用　sets()，

执行相应语句后，为了系统的安全再调用一次sets()取消选择“信任对于"Visual Basic 项目"的访问”。