❶ 解除excel加密的方法步驟詳解
在 Excel 中經常碰到一些加密了的文檔,如果覺得每次打開都嫌麻煩就需要把密碼給撤銷了。下面是由我分享的如何解除excel加密的 方法 ,希望對你有用。
解除excel加密的方法解除加密步驟1:在excel里點擊文件,另存為命令。
解除加密步驟2:為文件指定保存地址。
解除加密步驟3:指定好保存地址和文件名後,點擊工具常規選項。
解除excel加密的方法圖1
解除加密步驟4:將打開許可權密碼或者修改許可權密碼刪除,確定,然後保存即可。
解除excel加密的方法圖2
EXCEL中求某一區域內不重復的數據個數
例如求A1:A100范圍內不重復數據的個數,某個數重復多次出現只算一個。有兩種計算方法:
一是利用數組公式:
=SUM(1/COUNTIF(A1:A100,A1:A100))
輸入完公式後按Ctrl+Shift+Enter鍵,讓它自動加上數組公式符號"{}"。
二是利用乘積求和函數:
=SUMPRODUCT(1/COUNTIF(A1:A100,A1:A100))
excel在已有的單元格中批量加入一段固定字元的方法
例如:在單位的人事資料,在excel中輸入後,由於上級要求在原來的職稱證書的號碼全部再加兩位,即要在每個人的證書號碼前再添上兩位數13,如果一個一個改的話實在太麻煩了,那麼我們可以用下面的辦法,省時又省力:
1)假設證書號在A列,在A列後點擊滑鼠右鍵,插入一列,為B列;
2)在B2單元格寫入: ="13" & A2 後回車;
❷ excel怎麼取消密碼
首先打開一個加密的Excel文檔。進入Excel首頁後點擊左上角的文件。接著在信息界面點擊保護演示稿。然後在彈出的菜單點擊用密碼加密。最後按刪除原來設置的密碼,點擊確定即可取消密碼,如果不想取消密碼也可以更換密碼即可,詳細步驟:
1、首先打開一個加密的Excel文檔。
❸ excel表格如何取消密碼
excel中,點擊左上角「文件」——「信息」。點擊「保護工作簿」——「用密碼進行加密」,把原來設置的密碼刪除後,文本框放空,點擊「確定」即可。
1、excel中,點擊左上角「文件」。
❹ excel文檔加密怎麼解除
1.我們打開已加密的文件,這時會提示我們要輸入密碼才能打開文件,那我們就輸入密碼打開文件。
❺ excel怎麼取消密碼
首先打開一個加密的Excel文檔。進入Excel首頁後點擊左上角的文件。接著在信息界面點擊保護演示稿。然後在彈出的菜單點擊用密碼加密。最後按刪除原來設置的密碼,點擊確定即可取消密碼,如果不想取消密碼也可以更換密碼即可,詳細步驟:
1、首先打開一個加密的Excel文檔。
❻ 怎麼樣取消excel表格的密碼
具體如下:
1. 第一步,我們先打開加密後的Excel表格,打開時需要輸入密碼;
2. 接下來,我們點擊頂部菜單欄的 文件,然後在下拉選項中點擊 另存為;
3. 在彈出的保存窗口中,我們點擊如下圖的工具,然後選擇常規選項;
❼ excel2007取消加密保護的教程
在 Excel 中有很多重要的數據前期需要加上密碼保護,但到後期卻已經不再重要需要取消加密保護,下面是我帶來的關於excel 2007取消加密保護的教程的內容,歡迎閱讀!
excel 2007取消加密保護的教程
1、打開 Excel表格 中的Excel選項,選擇自定義,得到如下畫面:
excel2007撤銷保護密碼的 方法 圖1
2、然後在左邊側框欄中選擇「查看宏」
之後雙擊或者選擇添加按鈕,則可以看到右邊欄中有了查看宏按鈕,之後點擊右下角的確定。
3、大家可以在下面這個窗口處看到箭頭所指的按鈕:
點擊按鈕,之後彈出窗口:
excel2007撤銷保護密碼的方法圖2
excel2007撤銷保護密碼的方法圖3
4、在宏名處填寫一個名字(可隨意),然後點擊創建,彈出以下窗口:
excel2007撤銷保護密碼的方法圖4
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:"?&?_
DBLSPACE?&?"SAVE?IT?NOW!"?&?DBLSPACE?&?"and?also"?&?_
DBLSPACE?&?"BACKUP!,?BACKUP!!,?BACKUP!!!"?&?_
DBLSPACE?&?"Also,?remember?that?the?password?was?"?&?_
"put?there?for?a?reason.?Don't?stuff?up?crucial?formulas?"?&?_
"or?data."?&?DBLSPACE?&?"Access?and?use?of?some?data?"?&?_
"may?be?an?offense.?If?in?doubt,?don't."
Const?MSGNOPWORDS1?As?String?=?"There?were?no?passwords?on?"?&?_
"sheets,?or?workbook?structure?or?windows."?&?AUTHORS?&?VERSION
Const?MSGNOPWORDS2?As?String?=?"There?was?no?protection?to?"?&?_
"workbook?structure?or?windows."?&?DBLSPACE?&?_
"Proceeding?to?unprotect?sheets."?&?AUTHORS?&?VERSION
Const?MSGTAKETIME?As?String?=?"After?pressing?OK?button?this?"?&?_
"will?take?some?time."?&?DBLSPACE?&?"Amount?of?time?"?&?_
"depends?on?how?many?different?passwords,?the?"?&?_
"passwords,?and?your?computer's?specification."?&?DBLSPACE?&?_
"Just?be?patient!?Make?me?a?coffee!"?&?AUTHORS?&?VERSION
Const?MSGPWORDFOUND1?As?String?=?"You?had?a?Worksheet?"?&?_
"Structure?or?Windows?Password?set."?&?DBLSPACE?&?_
"The?password?found?was:?"?&?DBLSPACE?&?"$$"?&?DBLSPACE?&?_
"Note?it?down?for?potential?future?use?in?other?workbooks?by?"?&?_
"the?same?person?who?set?this?password."?&?DBLSPACE?&?_
"Now?to?check?and?clear?other?passwords."?&?AUTHORS?&?VERSION
Const?MSGPWORDFOUND2?As?String?=?"You?had?a?Worksheet?"?&?_
"password?set."?&?DBLSPACE?&?"The?password?found?was:?"?&?_
DBLSPACE?&?"$$"?&?DBLSPACE?&?"Note?it?down?for?potential?"?&?_
"future?use?in?other?workbooks?by?same?person?who?"?&?_
"set?this?password."?&?DBLSPACE?&?"Now?to?check?and?clear?"?&?_
"other?passwords."?&?AUTHORS?&?VERSION
Const?MSGONLYONE?As?String?=?"Only?structure?/?windows?"?&?_
"protected?with?the?password?that?was?just?found."?&?_
ALLCLEAR?&?AUTHORS?&?VERSION?&?REPBACK
Dim?w1?As?Worksheet,?w2?As?Worksheet
Dim?i?As?Integer,?j?As?Integer,?k?As?Integer,?l?As?Integer
Dim?m?As?Integer,?n?As?Integer,?i1?As?Integer,?i2?As?Integer
Dim?i3?As?Integer,?i4?As?Integer,?i5?As?Integer,?i6?As?Integer
Dim?PWord1?As?String
Dim?ShTag?As?Boolean,?WinTag?As?Boolean
Application.ScreenUpdating?=?False
With?ActiveWorkbook
WinTag?=?.ProtectStructure?Or?.ProtectWindows
End?With
ShTag?=?False
For?Each?w1?In?Worksheets
ShTag?=?ShTag?Or?w1.ProtectContents
Next?w1
If?Not?ShTag?And?Not?WinTag?Then
MsgBox?MSGNOPWORDS1,?vbInformation,?HEADER
Exit?Sub
End?If
MsgBox?MSGTAKETIME,?vbInformation,?HEADER
If?Not?WinTag?Then
MsgBox?MSGNOPWORDS2,?vbInformation,?HEADER
Else
On?Error?Resume?Next
Do?'mmy?do?loop
For?i?=?65?To?66:?For?j?=?65?To?66:?For?k?=?65?To?66
For?l?=?65?To?66:?For?m?=?65?To?66:?For?i1?=?65?To?66
For?i2?=?65?To?66:?For?i3?=?65?To?66:?For?i4?=?65?To?66
For?i5?=?65?To?66:?For?i6?=?65?To?66:?For?n?=?32?To?126
With?ActiveWorkbook
.Unprotect?Chr(i)?&?Chr(j)?&?Chr(k)?&?_
Chr(l)?&?Chr(m)?&?Chr(i1)?&?Chr(i2)?&?_
Chr(i3)?&?Chr(i4)?&?Chr(i5)?&?Chr(i6)?&?Chr(n)
If?.ProtectStructure?=?False?And?_
.ProtectWindows?=?False?Then
PWord1?=?Chr(i)?&?Chr(j)?&?Chr(k)?&?Chr(l)?&?_
Chr(m)?&?Chr(i1)?&?Chr(i2)?&?Chr(i3)?&?_
Chr(i4)?&?Chr(i5)?&?Chr(i6)?&?Chr(n)
MsgBox?Application.Substitute(MSGPWORDFOUND1,?_
"$$",?PWord1),?vbInformation,?HEADER
Exit?Do?'Bypass?all?for...nexts
End?If
End?With
Next:?Next:?Next:?Next:?Next:?Next
Next:?Next:?Next:?Next:?Next:?Next
Loop?Until?True
On?Error?GoTo?0
End?If
If?WinTag?And?Not?ShTag?Then
MsgBox?MSGONLYONE,?vbInformation,?HEADER
Exit?Sub
End?If
On?Error?Resume?Next
For?Each?w1?In?Worksheets
'Attempt?clearance?with?PWord1
w1.Unprotect?PWord1
Next?w1
On?Error?GoTo?0
ShTag?=?False
For?Each?w1?In?Worksheets
'Checks?for?all?clear?ShTag?triggered?to?1?if?not.
ShTag?=?ShTag?Or?w1.ProtectContents
Next?w1
If?ShTag?Then
For?Each?w1?In?Worksheets
With?w1
If?.ProtectContents?Then
On?Error?Resume?Next
Do?'Dummy?do?loop
For?i?=?65?To?66:?For?j?=?65?To?66:?For?k?=?65?To?66
For?l?=?65?To?66:?For?m?=?65?To?66:?For?i1?=?65?To?66
For?i2?=?65?To?66:?For?i3?=?65?To?66:?For?i4?=?65?To?66
For?i5?=?65?To?66:?For?i6?=?65?To?66:?For?n?=?32?To?126
.Unprotect?Chr(i)?&?Chr(j)?&?Chr(k)?&?_
Chr(l)?&?Chr(m)?&?Chr(i1)?&?Chr(i2)?&?Chr(i3)?&?_
Chr(i4)?&?Chr(i5)?&?Chr(i6)?&?Chr(n)
If?Not?.ProtectContents?Then
PWord1?=?Chr(i)?&?Chr(j)?&?Chr(k)?&?Chr(l)?&?_
Chr(m)?&?Chr(i1)?&?Chr(i2)?&?Chr(i3)?&?_
Chr(i4)?&?Chr(i5)?&?Chr(i6)?&?Chr(n)
MsgBox?Application.Substitute(MSGPWORDFOUND2,?_
"$$",?PWord1),?vbInformation,?HEADER
'leverage?finding?Pword?by?trying?on?other?sheets
For?Each?w2?In?Worksheets
w2.Unprotect?PWord1
Next?w2
Exit?Do?'Bypass?all?for...nexts
End?If
Next:?Next:?Next:?Next:?Next:?Next
Next:?Next:?Next:?Next:?Next:?Next
Loop?Until?True
On?Error?GoTo?0
End?If
End?With
Next?w1
End?If
MsgBox?ALLCLEAR?&?AUTHORS?&?VERSION?&?REPBACK,?vbInformation,?HEADER
End?Sub
-----------------------------------------------------------------------------------------
復制到橫線以上
得到情況如下圖表示
excel2007撤銷保護密碼的方法圖5
6、關閉編輯窗口;
7、依次點擊菜單欄上的工具---宏-----宏,選AllInternalPasswords,運行,確定兩次;
等一會,就會出現以下對話框:這就是Excel密碼對應的原始密碼(此密碼和原先設置的密碼都能打開此文檔。如果是別人的文檔,你又想恢復密碼設置,就可以用此密碼進行保護,他就能用他設置的密碼打開,你可以試試,很有趣的。字母一定要大寫):
再點擊確定。Excel的原始密碼就被清除了!!
excel2007撤銷保護密碼的方法圖6
8、最後記得關閉EXCEL文檔時要保存,否則下回打開,文檔仍舊處於只讀狀態而無法修改。
excel2007取消加密保護的教程相關 文章 :
★ excel2007取消加密保護的教程
★ excel07取消加密的教程
★ excel2007撤銷保護密碼的方法步驟
★ 怎麼取消excel2007密碼保護
★ excel表格取消加密的教程
★ excel2007撤銷保護的教程
★ excel2007取消密碼保護教程
★ Excel中2007版本進行撤銷工作表保護密碼的操作方法
var _hmt = _hmt || []; (function() { var hm = document.createElement("script"); hm.src = "https://hm..com/hm.js?"; var s = document.getElementsByTagName("script")[0]; s.parentNode.insertBefore(hm, s); })();❽ Excel加密了怎麼解除
請嘗試以下方法:
1、點擊「文件」-「選項」
❾ Excel設的密碼怎樣解除
excel設置了保護工作簿,想要使用默認密碼撤銷工作表保護,解決方法如下。
1、首先在電腦中打開excel表格,點擊「審閱」,如下圖所示。
❿ excel設置密碼怎麼解除
excel表格在審閱頁面下點擊撤銷工作表保護,輸入密碼就可以了。
1、首先在excel表格中點擊審閱,如下圖所示。