當前位置:首页 > 趣味生活

excel表格鎖定怎麼解鎖

Q1:excel表格被鎖定了怎麼解鎖

鎖定是怕別人修改,跟作者找密碼,點工具-保護-撤消單元格保護

Q2:EXCEL表格怎麼自動求和?

搞定Excel自動求和,學這一篇就完全足夠了。如果學了這篇還不會自動求和的,隨時可以在評論區留言懟我。

要對Excel的表格資料進行自動求和,極其簡單,簡單到只需要掌握一個快捷鍵(Alt+=組合鍵)就可以搞定了。下面我就來簡單介紹這個快捷鍵的具體用法。

1.一鍵批量搞定部分資料區域的匯總

選擇求和結果存放區(I2:I7),按下組合鍵Alt+=組合鍵即可完成。

2.一鍵批量搞定不連續資料區域的自動求和

不管資料區域是否連續,Excel都可以自動辨識並給出我們想要的自動求和結果。如下圖所示,我們需要求出每個班級、每個人的總分。只需要按住Ctrl鍵選擇自動求和結果存放區域,然後按下Alt+=組合鍵即可。

3.一鍵批量同時搞定每一行每一列資料的總計

Alt+=組合鍵不但可以輕輕松松地對每一行的資料進行統計,而且還可以一鍵同時搞定每一列、每一列資料的統計,如下圖所示,求每個班每個月的總金額。老規矩,按著Ctrl鍵,然後用滑鼠選中要存放結果的區域,然後按下Alt+=組合鍵即可。

4.一鍵搞定每個人的月平均金額統計

或許很多人知道sum函數可以用這個Alt+=組合鍵或者單擊公式--自動求和--求和進行輸入,然而,很多人卻不知道,其實平均值函數也可以用快捷鍵進行輸入。輸入Average函數的快捷鍵為:Alt+M+UA。如下圖所示:

這個地方要特別注意一個問題,當然我們輸入平均值函數後,其自動選擇的區域會有將總分選進去,因此可以在編輯欄改一下,然後按下Ctrl+Enter,批量完成公式的修改即可。

更多精彩內容,歡迎

Q3:請問如何將鎖定無法復制修改的Excel表格解鎖

工具---保護--取消保護就好。當然如果先前有設定密碼,需要有解鎖密碼

Q4:excel表格鎖定了,不記得密碼怎麼解鎖?

excel表格鎖定了,不記得密碼了,可以按照下面的方法進行解鎖:

1.首先打開設置了工作表保護的表格,可以看到,當我們試圖編輯時,會彈出這樣的對話框。

2.單擊文件——選項——客製化功能區——在“開發工具”前打勾——確定。

3.單擊工具欄——開發工具——宏,新建宏。然後保存。

4.保存之後,執行該宏,即可彈出顯示密碼的窗口。單擊確定,然後輸入密碼即可實作解鎖。

Q5:Excel中 被鎖定的單元格如何解鎖?

方法一:
1.首先,利用Excel快捷鍵"Ctrl + A"全選所以的單元格,然後,右鍵選擇“設置單元格格式”。
2.在彈出的“單元格格式”中選擇“保護”,取消“鎖定”前面的鉤去掉。
方法二:
1.打開文件。
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:" & _
DBLSPACE & "SAVE IT NOW!" & DBLSPACE & "and also" & _
DBLSPACE & "BACKUP!, BACKUP!!, BACKUP!!!" & _
DBLSPACE & "Also, remember that the password was " & _
"put there for a reason. Dont stuff up crucial formulas " & _
"or data." & DBLSPACE & "Access and use of some data " & _
"may be an offense. If in doubt, dont."
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 computers 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 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、
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
6.關閉編輯窗口。
7.工具---宏-----宏,選AllInternalPasswords,執行,確定兩次,等2分鍾,再確定即可完成操作。

Q6:Excel表格怎麼關聯?

做好基礎對照表,然後使用簡單的查詢函數公式就好了,如VLOOKUP或INDEX+MATCH或INDEX+SMALL+IF+ROW等,視一對一查找或一對多查找及具體資料情況,使用不同的函數或函數組合即可。

一、你使用兩款程式打開了同一個表格,或打開速度過快導致打開兩個進程,就會出現以下情況:

出現這種情況的提示是“***正在編輯”,這種情況只需要關閉其中一個進程或軟體即可。

二、當你打開的表格中某些單元格被設置了保護,當你編輯設置了保護的單元格時,就會出現以下窗口:

出現這種情況,一般情況下,是需要知道保護密碼才能解除。

對於這種情況,可以用以下方法解除密碼:

1、安裝2345好壓或者其他的壓縮軟體,之後打開壓縮包

2、找到Excel表格文件,打開

3、打開後,選擇XL資料夾打開,選擇worksheets資料夾打開,雙擊打開

4、查看加密信息,記住關鍵字,然後關閉瀏覽器

5、選擇sheet1,這里名稱和你的工作表名稱一致,選擇用內部查看器打開

6、選擇編輯查找或者直接Ctrl+F

7、在窗口內輸入sheetProtection,點擊查找下一個,在右側會有查找結果。

8、根據步驟5查看的信息,選擇下圖所示內容刪除

9、刪除後結果如下圖

10、點擊保存,關閉

11、點擊確定,關閉壓縮軟體

12、再次打開剛才的Excel文件,發現密碼已清除。

其實還有兩種情況就是1、工作簿加密的 2、Excel文件加密的,這里暫不介紹,後續會繼續介紹。

若您還有其他問題,歡迎在評論區留言。

以上就是我對這個問題的個人拙見,若您覺得對您有幫助,歡迎點贊收藏。若有高人高見,歡迎共享交流。

猜你喜歡

更多