WPS运行VBA代码Shell函数报[运行时错误'5']或[运行时错误'70']的解决方法

最近一段时间收到很多客户的反馈，在重启电脑或重启WPS后，之前一直正常运行的程序会报错，报错代码为[运行时错误'5']或[运行时错误'70']，如下图所示。

远程调试程序发现报错的是Shell函数，代码片段如下。

Sub kkkk()

file = ThisWorkbook.Path & "\data.exe"

Shell file

End Sub

Sub kkkk02()

Set wsh = CreateObject("WScript.Shell")

file = ThisWorkbook.Path & "\data.exe"

wsh.Run file

End Sub

问题原因：WPS在新版本新增【沙箱保护】功能，并且默认为开启状态，当用户主动更新或自动升级到新版本时，沙箱保护功能会导致VBA代码中的Shell函数没有权限运行。

解决方法：依次点击【WPS 表格】→【三】→【设置】，关闭【沙箱保护】功能，然后重启WPS即可解决。