[程序設(shè)計(jì)]關(guān)于給excel加密的程序代碼
印刷廠直印●彩頁1000張只需要69元●名片5元每盒-更多報(bào)價(jià)?聯(lián)系電話：138-1621-1622（微信同號）
Private Sub Worksheet_Activate()
If Application.InputBox(“ 請輸入操作權(quán)限密碼 “) = 123 Then
Range(″A1″).Select
sheets(″機(jī)密文檔″).Cells.Font.ColorIndex = 56
Else
MsgBox ″密碼錯(cuò)誤, 即將退出!″
sheets(″普通文檔″).Select
End If
End Sub
Private Sub Worksheet_Deactivate()
sheets(″機(jī)密文檔″).Cells.Font.ColorIndex = 2
End Sub
我想用這段話給excel加密,可是在工具-宏-vb編輯器中添加代碼運(yùn)行后總出現(xiàn)運(yùn)行錯(cuò)誤“9“下標(biāo)出界或別的錯(cuò)誤,請幫忙看一下,哪里出了錯(cuò).
