国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 辦公 > Excel > 正文

Excel撤銷工作表保護密碼圖文教程介紹

2024-08-23 19:37:35
字體:
來源:轉載
供稿:網(wǎng)友

我們經(jīng)常使用Excel的工作表保護功能,將工作表用密碼保護起來,以防別人操作時進行修改,但是這樣一來有可能會無法進行一些操作(如輸入公式等),時間久了保護的密碼也有可能忘記了,這該怎么辦呢?只要按照以下步驟操作,Excel工作表保護密碼瞬間即破!

1、打開您需要破解保護密碼的Excel文件;

2、依次點擊菜單欄上的工具---宏----錄制新宏,輸入宏名字如:aa;

3、停止錄制(這樣得到一個空宏);

4、依次點擊菜單欄上的工具---宏----宏,選aa,點編輯按鈕;

5、刪除窗口中的所有字符(只有幾個),替換為下面的內容;

從橫線下開始復制-----------------------------

Option Explicit

Public Sub AllInternalPasswords()

' Breaks worksheet and workbook structure passwords. Bob McCormick

' probably originator of base code algorithm modified for coverage

' of workbook structure / windows passwords and for multiple passwords

'

' Norman Harker and JE McGimpsey 27-Dec-2002 (Version 1.1)

' Modified 2003-Apr-04 by JEM: All msgs to constants, and

' eliminate one Exit Sub (Version 1.1.1)

' Reveals hashed passwords NOT original passwords

Const DBLSPACE As String = vbNewLine & vbNewLine

Const AUTHORS As String = DBLSPACE & vbNewLine & _

"Adapted from Bob McCormick base code by" & _

"Norman Harker and JE McGimpsey"

Const HEADER As String = "AllInternalPasswords User Message"

Const VERSION As String = DBLSPACE & "Version 1.1.1 2003-Apr-04"

Const REPBACK As String = DBLSPACE & "Please report failure " & _

"to the microsoft.public.excel.programming newsgroup."

Const ALLCLEAR As String = DBLSPACE & "The workbook should " & _

"now be free of all password protection, so make sure you:" & _

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 崇文区| 凤城市| 龙岩市| 红桥区| 邢台县| 苍山县| 灌阳县| 馆陶县| 芜湖市| 西乌珠穆沁旗| 东宁县| 彭泽县| 嘉善县| 云梦县| 绥芬河市| 水富县| 剑河县| 汝州市| 镶黄旗| 沾益县| 大田县| 松桃| 桂林市| 沂源县| 余庆县| 弥渡县| 永善县| 剑阁县| 南召县| 马尔康县| 宜君县| 徐闻县| 武穴市| 宝山区| 惠水县| 宁河县| 汾西县| 东乡县| 隆回县| 赫章县| 惠东县|