bj17209 发表于 2016-4-7 16:32:33

求助;au3 excel文件,保护工作表密码不起作用。?

au3 excel文件,保护工作表密码不起作用。?

设定好密码,为什么不起作用,但是可以保护,但是没有密码,请哪位高手帮帮我啊!!谢谢了啊

$oExcel = ObjCreate("Excel.Application")
$oWorkbook = $oExcel.Workbooks.Open("e:\abc.xlsx")
$oWorkbook.ActiveSheet.Protect.Password = "123"
$oWorkbook.Save
$oExcel.Quit

为什么设置了密码,但是可以撤销啊!!不用输入密码就撤销了保护啊!!

kk_lee69 发表于 2016-4-11 10:34:49

回复 1# bj17209

多加一行

oWorkbook.ActiveSheet.Unprotect.Password = "123"

bj17209 发表于 2016-4-13 15:57:51

这个不行啊!我测试了啊

kk_lee69 发表于 2016-4-13 16:34:24

回复 3# bj17209

實際測試過 保證可行

#include <Excel.au3>
$oExcel = _ExcelBookOpen(@ScriptDir&"\A1.xlsx",1,0) ;打開EXCEL表
$oExcel.ActiveSheet.Protect("123")
_ExcelBookClose($oExcel, 1, 0)

可使用 3.3.8版的 EXCEL.AU3

至於你的方式 原因不知

kk_lee69 发表于 2016-4-13 17:51:17

本帖最后由 kk_lee69 于 2016-4-13 17:54 编辑

回复 3# bj17209
MACGYVER腳印
幫你測試出來了用下面的語法就可以了

        $sFilePath=@ScriptDir&"\A1.xlsx"
       
        Local $oExcel = ObjCreate("Excel.Application")
        $oExcel.WorkBooks.Open($sFilePath)
       
        $oExcel.ActiveSheet.Protect("123")

        $oExcel.ActiveWorkBook.Save()
        $oExcel.Quit()
页: [1]
查看完整版本: 求助;au3 excel文件,保护工作表密码不起作用。?