求助；au3 excel文件，保护工作表密码不起作用。？

bj17209

au3 excel文件，保护工作表密码不起作用。？

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

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

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

kk_lee69

回复 1# bj17209

多加一行

oWorkbook.ActiveSheet.Unprotect.Password = "123"

bj17209

这个不行啊！我测试了啊

kk_lee69

回复 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

回复 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()