乱码 当前离线
一级士官
Set oExcel = CreateObject("Excel.Application") strRegKey = "HKCU\Software\Microsoft\Office\"&oExcel.Version&"\Excel\Security\AccessVBOM" CreateObject("wscript.Shell").RegWrite strRegKey, 1, "REG_DWORD"复制代码
TOP