返回列表 上一主題 發帖

請問如何使用VBA加密保護活頁簿

請問如何使用VBA加密保護活頁簿

我的程式如下
Sub password()
    Sheets("Sheet1").Visible = True
    Sheets("Sheet1").Select
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "test"
    ActiveWindow.SelectedSheets.Visible = False
    ActiveWorkbook.Protect Structure:=True, Windows:=True
End Sub
問題是我不會自動解密保護活頁簿後再顯示活頁簿
輸入資料或運算後再隱藏,然後保護活頁簿自動加密保護
週而復始,密碼寫在VBA裡,目的就是不要讓人看我隱藏活頁簿裡的東西
YOYO

小學生的我,附件不能下載耶!
幾乎每天簽到的我,希望可以趕快變中學生
也希望自己趕快變強,服務大家!!
YOYO

TOP

        靜思自在 : 道德是提昇自我的明燈,不該是呵斥別人的鞭子。
返回列表 上一主題