|
我在ppt里面添加了一些控件,但每次打开ppt,
。。”
我采用了
Sub ControlAx()
Dim WshShell As Object
Set WshShell = CreateObject("Wscript.Shell")
WshShell.RegWrite "HKCUSoftwareMicrosoftVBASecurityLoadControlsInForms", 1, "REG_DWORD"
Set WshShell = Nothing
End Sub
也没有见什么效果
请问该怎么办,才能不弹出这个 |
|