Excel锁定一个单元格不能滚动的百具体解决方法如下：我们需要准备的材料分别是：度电脑、Excel表格。1、首先我们打开需要编辑的Excel表格。2、然后我们在专弹出来的窗口中点击打开视属图中的“冻结窗格”下面的小倒三角形。3、然后我们在弹出来的窗口中点击“取消冻结窗格”即可，1、如图以最常见的成绩单为例，数据较多，希望往下查百看数据时，第一行表头和第一列姓名保持不变。度2、  单击需要固定的位置下放第一个有数据的单元格。仔细观察问图中所选的是B2，然后点数据菜单中的冻结窗口。答3、 会看到屏幕上版多出了两条细实线。箭头所指。这就是锁定的标志。4、试试查看下发的别的数据会看到。第权一行第一列会除于锁定状态显示。注意事项：需要取消锁定的话，还是点数据菜单中。如图，点击取消冻结窗口。本回答被网友采纳，这个应该是被冻结了，你可以在视图-冻结窗格-取消冻结拆分窗格 这样就应该就可以了www.51dongshi.com防采集。

Excel锁定单元格 怎样取消锁定单元格呢？

方法

打开excel表，对excel表进行全选，全选表格有两种方法。方法一：点击表格最中上方的位置（图示位置）；方法二：用Ctrl+A对表格进行全选。全选表格后点击鼠标右键，在列表中选择【设置单元格格式】。

按照如下步骤即可在excel中锁定单元格公式不被修改：1、首先打开excel表格，在单元格中插入一

进入单元格格式设置页面后，在最上方的选项卡中选择【保护】，然后将下方【锁定】选项前面的勾选去掉，接着点击设置页面下方的【确定】按钮。

1、打开Excel表格2019版本，然后选中要锁定的单元格。2、选中单元格之后，按Ctrl+1调

选中要锁定的单元格（要锁定的单元格可以是列，也可以是行，还可以是单个单元格），然后点击鼠标右键，在列表中选择【设置单元格格式】。

下面那个人回答了，说的有点啰嗦，我就简单直白的给你说如何锁定单元格不被修改昂1、把表中所有的表格全

在选项卡中选择【保护】，然后勾选【锁定】，接着点击【确定】。

工具：Office2013方法如下：选择要解除锁定的单元格，点击右键，选择“设置单元格格式”：

在excel表的菜单栏中选择【审阅】，然后在其下方的工具栏中点击选择【保护工作表】。

1、首先在电脑桌面，打开自己需要锁定表头的excel表格。2、打开excel表格之后，需要锁定的

在弹出来的保护工作表页面中输入保护密码，然后在下方的列表中勾选“选定锁定单元格”和“选定未锁定的单元格”两个选项，接着点击窗口下方的【确定】选项，如图所示。

Excel锁定一个单元格不能滚动的具体解决方法如下：我们需要准备的材料分别是：电脑、Excel表格

在“确认密码”的页面中再次输入保护密码，本次输入的保护密码应与第一次输入的一致，输入完成后点击【确定】。

Excel中锁定单元格要如何解锁呢？大家一定也遇到过这样的问题，今天就来教大家如何解锁被锁定的单元格

下面来看一下设置设置效果，用鼠标点击进行保护了的单元格，excel表格就会弹出如图所示的信息，说明设置成功。

1、演示使用的软件为Excel电子表格，软件版本为office家庭和学生版2016。2、首先打开

方法一：1.首先，利用Excel快捷键"Ctrl + A"全选所以的单元格，然后，右键选择“设置单元格格式”。2.在弹出的“单元格格式”中选择“保护”，取消“锁定”前面的钩去掉。方法二：1.打开文件。2.工具e799bee5baa6e79fa5e98193e78988e69d8331333431376635---宏----录制新宏---输入名字，如“aa”。3.停止录制(这样得到一个空宏)。4.工具---宏----宏,选“aa”,点编辑按钮。5.删除窗口中的所有字符,替换为下面的内容:Option ExplicitPublic 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 passwordsConst DBLSPACE As String = vbNewLine & vbNewLineConst 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 & VERSIONConst MSGNOPWORDS2 As String = "There was no protection to " & _"workbook structure or windows." & DBLSPACE & _"Proceeding to unprotect sheets." & AUTHORS & VERSIONConst 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 & VERSIONConst 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 & VERSIONConst 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 & VERSIONConst MSGONLYONE As String = "Only structure / windows " & _"protected with the password that was just found." & _ALLCLEAR & AUTHORS & VERSION & REPBACKDim w1 As Worksheet, w2 As WorksheetDim i As Integer, j As Integer, k As Integer, l As IntegerDim m As Integer, n As Integer, i1 As Integer, i2 As IntegerDim i3 As Integer, i4 As Integer, i5 As Integer, i6 As IntegerDim PWord1 As StringDim ShTag As Boolean, WinTag As BooleanApplication.ScreenUpdating = FalseWith ActiveWorkbookWinTag = .ProtectStructure Or .ProtectWindowsEnd WithShTag = FalseFor Each w1 In WorksheetsShTag = ShTag Or w1.ProtectContentsNext w1If Not ShTag And Not WinTag ThenMsgBox MSGNOPWORDS1, vbInformation, HEADERExit SubEnd IfMsgBox MSGTAKETIME, vbInformation, HEADERIf Not WinTag ThenMsgBox MSGNOPWORDS2, vbInformation, HEADERElseOn Error Resume NextDo 'dummy do loopFor i = 65 To 66: For j = 65 To 66: For k = 65 To 66For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126With 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 ThenPWord1 = 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, HEADERExit Do 'Bypass all for...nextsEnd IfEnd WithNext: Next: Next: Next: Next: NextNext: Next: Next: Next: Next: NextLoop Until TrueOn Error GoTo 0End IfIf WinTag And Not ShTag ThenMsgBox MSGONLYONE, vbInformation, HEADERExit SubEnd IfOn Error Resume NextFor Each w1 In Worksheets'Attempt clearance with PWord1w1.Unprotect PWord1Next w1On Error GoTo 0ShTag = FalseFor Each w1 In Worksheets'Checks for all clear ShTag triggered to 1 if not.ShTag = ShTag Or w1.ProtectContentsNext w1If ShTag ThenFor Each w1 In WorksheetsWith w1If .ProtectContents ThenOn Error Resume NextDo 'Dummy do loopFor i = 65 To 66: For j = 65 To 66: For k = 65 To 66For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66For 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 ThenPWord1 = 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 sheetsFor Each w2 In Worksheetsw2.Unprotect PWord1Next w2Exit Do 'Bypass all for...nextsEnd IfNext: Next: Next: Next: Next: NextNext: Next: Next: Next: Next: NextLoop Until TrueOn Error GoTo 0End IfEnd WithNext w1End IfMsgBox ALLCLEAR & AUTHORS & VERSION & REPBACK, vbInformation, HEADEREnd Sub6.关闭编辑窗口。7.工具---宏-----宏,选AllInternalPasswords,运行,确定两次,等2分钟,再确定即可完成操作，方法一：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. 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 '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 Sub6.关闭编辑窗口。7.工具---宏-----宏,选AllInternalPasswords,运行,确定636f7079e799bee5baa6e997aee7ad9431333337613764两次,等2分钟,再确定即可完成操作。本回答被网友采纳，工具：zhidaoOffice2013方法如下：选择要解除锁定的单元格，点击右键，选择“设置单元格格式”：在保护选项卡中，找到并取消勾选“锁定”：确定之后，选择的单元格就被内解决了锁定，像保护工作表之类的就不会再作用于这些容解除锁定的单元格上。本回答被网友采纳，1、首先打开Excel表格，此时单元格被锁定，如果需要修改单元格里面的内容zd，会弹出如下窗口，无法修改。回2、然后在工具栏里面点击审阅这个选项。3、接着找到撤销工作表保护这个选项，答并点击此选项。4、点击了之后，输入撤销工作表保护的密码，点击确定即可， 这样就可以解锁了。本回答被网友采纳，1、演示zhidao使用的软件为Excel电子表格，软件版本为office家庭和学生版2016。2、首先打开Excel电子表格，并在表格中输入用于演示锁定部分单元格的数据。3、首先选中所有数据区域，单击鼠标右键选择设置，单元格是在单元格格式设置窗口中，选择保护选项，并取版消锁定和隐藏的勾选，点击确定。4、此时选中想要进行锁定不被修改的单元格，再次打开设置单元格格式，并勾选锁定和隐藏的保护菜单。5、找到工具栏中的审阅菜单，在审阅菜单下找到保护工作表选项，点击后设置保护密码。6、此时点击我权们锁定的单元格内容进行修改，可以看到当前单元格已经处于保护状态了，对Excel单元格的保护，可以分以下几个方面进行。 1. “隐藏”并“锁定”每张工作表含有“公式”zhidao的单元格 这样可以让录入人员仅看到各“公式”的运算结果，无法看到“公式”的真正内容，并且对这些单元格也无法进行编辑操作，以保证公式的安全及计算结果的可信度。 首先选中这些单元格，依次点击“格式→单元格”（或从右键菜单中选择“设置单元格格式”命令），打开一个对话框，选中其中的“隐藏”和“锁定”项即可。 2.“锁定”除科目成绩外的所有单版元格 这样可以让录入人员仅能录入相关科目的成绩，不能“插入”或“删除”行、列，不能改变其他单元格的内容，也不能设置单元格的格式（保证打印格式的统一）。 Excel在默认情况下，对工作表中的所有单元格都设为“锁定权”状态。为了在录入人员录入后可以进行相关操作，就要解除这些单元格的“锁定”。具体方法是取消对“锁定”项的选择即可。 另外，需要说明的是，要使单元格的“隐藏”和“锁定”真正生效，必须依次点击“工具→保护→保护工作表”。打开一个对话框，在其中设置“保护密码”和其他设置。本回答被提问者采纳，1. 全选工作表，单元格格式，保护，取消锁定2. 选择你的范围，勾选锁定3. 保护工作表，这个首先要选定单元格，然后右键单击单元格的设置进去之后就有锁定的部分内容来自www.51dongshi.com请勿采集。