本文收集整理关于excel怎么取消锁定的单元格的相关议题,使用内容导航快速到达。
内容导航:
Q1:Excel锁定一个单元格不让它滚动怎么弄
假定你要锁定前5行:
点单元格A6,选择菜单 “窗口”-->冻结窗格
假定你要锁定第5行标题及左边第1、2列:
点单元格C6,选择菜单 “窗口”-->冻结窗格
要解冻结,只需回到菜单 “窗口”-->取消冻结窗格
WwW.yIj▶iTAo.COM
Q2:Excel中怎么锁定某个单元格不被编辑
为每一单元格区域设置编辑密码
1.选定所有单元格(CTRL+A),设置单元格格式,将锁定或隐藏的钩去掉。
2.选中你要保护的单元格,要保护的一次全要选,将锁定或隐藏的钩挑上。
3.工具,保护,允许用户编辑区域,点新建
4.引用单元格输入你要保护的第一个区域范围。
5.为每一个保护区输入密码,以次类推
6.设置保护工作表密码
这样就可以各人用各人的密码编辑了,互不干扰
Q3:excel怎么锁定固定某些单元格不被编辑
excel锁定固定单元格不被编辑的步骤是:
1、打开Excel工作表;
2、按Ctrl+A,全选整个工作表,然后单击鼠标右键,选择“设置单元格格式”命令,在“保护”选项中,取消勾选“锁定”,按确定键;
3、选择需要锁定区域,然后单击鼠标右键,选择“设置单元格格式”命令,在“保护”选项中,勾选“锁定”(并根据需要选择“隐藏”),按确定键;
4、在“审阅”选项下按“保护工作表”;
5、根据提示,输入密码,然后按确定;
6、锁定(或隐藏)的单元格将不再能够直接编辑(隐藏的单元格将不再显示公式)。
7、如果需要恢复锁定单元格的编辑功能,在“审阅”选项下,按“撤消工作表保护”,并输入正确的“撤消保护密码”,确定后,即可恢复锁定单元格的编辑功能。
Q4:如何在EXCEL中锁定一个单元格,单元格内容不被修改
工具/原材料
excel2016版、电脑。
1、打开电脑找到并点击excel2016版表格软件;
2、双击打开excel表格软件以后,此时先对全部的表格进行选中,这里以A到C列的单元格为例;
3、全部选中单元格后,点击鼠标右键在下拉选项中点击“设置单元格格式”;
4、在弹出的对话框中找到并取消勾选保护选项下的“锁定”的命令,这点很重点否则是不能对指定的单元格进行保护的;
5、取消所有表格的锁定命令以后,此时再对需要锁定的单元格进行选中,这里以B列单元格为例;
6、选中需要锁定的部份单元格以后,在鼠标右击选择“设置单元格格式”的命令;
7、进入界面以后,在保护的界面框中勾选“锁定”的命令,此时的锁定就只针对B列需要保护的单元格,不会影响其它单元格的修改;
8、对B列单元格锁定以后,找到并点击审阅命令下的“保护工作表”的命令;
9、在弹出的界面框中,只勾选“选定未锁定的单元格”的命令,并点击确定即可完成对B列单元格的锁定,不影响其它内容的修改。
Q5:Excel中如何锁定某部分单元格内容不被修改?
1、演示使用的软件为Excel电子表格,软件版本为office家庭和学生版2016。
2、首先打开Excel电子表格,并在表格中输入用于演示锁定部分单元格的数据。
3、首先选中所有数据区域,单击鼠标右键选择设置,单元格是在单元格格式设置窗口中,选择保护选项,并取消锁定和隐藏的勾选,点击确定。
4、此时选中想要进行锁定不被修改的单元格,再次打开设置单元格格式,并勾选锁定和隐藏的保护菜单。
5、找到工具栏中的审阅菜单,在审阅菜单下找到保护工作表选项,点击后设置保护密码。
6、此时点击我们锁定的单元格内容进行修改,可以看到当前单元格已经处于保护状态了。
Q6:excel如何锁定单元格
excel2003选中你想固定行的下一行的任意单元格,选择窗口----冻结窗格 即可。 2007在视图---冻结窗格 。此功能冻结选中单元格以上及以左的单元格
Q7: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分钟,再确定即可完成操作。