æä½ çææ¡£åè¿æ¥å§
æè
ç¨ä¸é¢çå®æ¥å
XXXèªå·±å®ä¹
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
Cancel = True
End Sub
Private Sub Workbook_Open()
ActiveWorkbook.Protect Structure:=True, Windows:=False, Password:="XXX"
End Sub
温馨提示:内容为网友见解,仅供参考