成语| 古诗大全| 扒知识| 扒知识繁体

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

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文件加密的,这里暂不介绍,后续会继续介绍。

若您还有其他问题,欢迎在评论区留言。

以上就是我对这个问题的个人拙见,若您觉得对您有帮助,欢迎点赞收藏。若有高人高见,欢迎共享交流。

猜你喜欢

更多