找回密码
 加入
搜索
查看: 2060|回复: 4

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

[复制链接]
发表于 2016-4-7 16:32:33 | 显示全部楼层 |阅读模式
au3 excel文件,保护工作表密码不起作用。?

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

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

为什么设置了密码,但是可以撤销啊!!不用输入密码就撤销了保护啊!!
发表于 2016-4-11 10:34:49 | 显示全部楼层
回复 1# bj17209

多加一行

oWorkbook.ActiveSheet.Unprotect.Password = "123"
 楼主| 发表于 2016-4-13 15:57:51 | 显示全部楼层
这个不行啊!我测试了啊
发表于 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

至於你的方式 原因不知
发表于 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()
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-25 13:20 , Processed in 0.216406 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表