excel數字鎖定鍵在哪裡設置方法

❶ 如何讓excel表格的單元格一輸入就鎖定

鎖定單個或多個單元格方法
①首先，利用Excel快捷鍵
Ctrl
+
A
全選所以的單元格，然後，右鍵選擇「設置單元格格式」；
②在彈出的「單元格格式」中選擇「保護」，取消「鎖定」前面的鉤去掉；
③選中你所想要鎖定的單個或多個單元格，再次右鍵選擇「設置單元格格式」；
④同樣，在彈出的「單元格格式」窗口中選擇「保護」，再將「鎖定」前面的鉤打上，確定；
⑤繼續選中需要鎖定的單元格，然後單擊菜單欄的「工具」-->保護-->保護工作表，在彈出的「保護工作表」窗口中我們輸入鎖定該單元格的密碼（千萬別把密碼忘記了喲）；
到這里鎖定單元格就已經設置完畢了！現在你可以回到Excel表格中看看，剛才被我們鎖定的單元格貌似不可以編輯和修改了，每次編輯它都會提示：「正在視圖更改被保護的只讀單元格或圖標」。
如果想重新對鎖定的單元格進行編輯或修改，單擊菜單欄的「工具」中的「保護」下的「撤銷工作表保護」，在窗口中重新輸入設置的密碼，即可撤銷工作表的鎖定。

❷ Excel如何鎖定，怎樣excel某計算公式中鎖定其中一個數值

以2007版EXCEL為例，我們要鎖定單元格C10的數值來計算每個模型的數量佔比，即用每個模型數量/總的模型量（即C10）

❸ 電腦excel怎麼鎖定

我們可以分三種情況保護我們的工作表:
第一種情況是保護我們整個工作表，不允許別人改動內容
第二種情況是保護我們工作表裡的部分區域不讓別人編輯，但是其他區域是允許別人編輯的
第三種情況是我們希望別人編輯我們的工作表的時候需要輸入密碼
一、1.點擊文件-信息-保護工作簿。點擊「保護工作簿」，在下拉菜單中單擊「用密碼進行加密」。
2.輸入密碼，點擊確認即可。會讓你輸入兩次，注意：如果你忘記密碼，你本人也不可能打開文件，且沒有任何挽救的餘地，所以，密碼請你一定記住。
密碼設置好後，再次打開Excel，不會顯示任何內容，只會彈出一個對話框，提示你輸入密碼。只有輸入正確的密碼，你才能進行操作和修改。
二、打開【excel】表格，我們選中想要進行鎖定的部分單元格，點擊【右鍵】，在下拉選項中，選擇【設置單元格格式】；在【保護】一欄中，勾選【鎖定】和【隱藏】前面的對勾，點一下【確定】；接著在上方點擊【審閱】，點一下【保護工作表】；設置保護密碼，點擊【確定】，再次輸入密碼，點擊【確定】；這時如果我們想要對鎖定內容進行修改，就會提示不能修改，這樣excel中部分內容不被編輯就設置好了。

❹ Excel 固定一個單元格有什麼快捷鍵

Excel 中無鎖定單元格的快捷鍵，我們可以通過以下步驟來鎖定單元格。

1、打開Excel，單擊表格左上角的空白處，這時表格全選。

Microsoft Excel是Microsoft為使用Windows和Apple Macintosh操作系統的電腦編寫的一款電子表格軟體。

直觀的界面、出色的計算功能和圖表工具，再加上成功的市場營銷，使Excel成為最流行的個人計算機數據處理軟體。在1993年，作為Microsoft Office的組件發布了5.0版之後，Excel就開始成為所適用操作平台上的電子製表軟體的霸主。

Microsoft Office是一套由微軟公司開發的辦公軟體套裝，它可以在Microsoft Windows、Windows Phone、Mac系列、iOS和Android等系統上運行。與其他辦公室應用程序一樣，它包括聯合的伺服器和基於互聯網的服務。從2007版的Office被稱為「Office System」而不叫「Office Suite」，反映出它們包括伺服器的事實。

❺ 表格鎖定怎麼設置

1、鎖定單元格的快捷鍵

①首先，利用Excel快捷鍵 Ctrl + A 全選所以的單元格，然後，右鍵選擇「設置單元格格式」；

②在彈出的「單元格格式」中選擇「保護」，取消「鎖定」前面的鉤去掉；

③選中你所想要鎖定的單個或多個單元格，再次右鍵選擇「設置單元格格式」；

④同樣，在彈出的「單元格格式」窗口中選擇「保護」，再將「鎖定」前面的鉤打上，確定；

⑤繼續選中需要鎖定的單元格，然後單擊菜單欄的「工具」-->保護-->保護工作表，在彈出的「保護工作表」窗口中我們輸入鎖定該單元格的密碼；

⑥默認選中頭兩個「選定鎖定單元格」、「選定未鎖定單元格」，取消它們後，用戶將不能選中單元格。

下面那個「允許用戶編輯區域」可以設置可以改動的區域，這樣就實現用戶輸入區和鎖定區分開的功能了。

2、解除鎖定的單元格

單元格選不了.全選沒反應！！如果CTRL+A用不了，那麼就是單元格保護裡面限制了選擇。

可以用VBA來強行選擇復制：

①按ALT+F11 打開VB編輯器
②雙擊左邊靠上的【工程資源管理器】中的【Microsoft Excel 對象】中的ThisWorkbook(如果找不到【工程資源管理器】請按CTRL+R)，在右邊的代碼窗口貼入下面的代碼：（根據實際情況按代碼說明修改a、b的值，""中的內容）

Sub 強行復制()
'修改以下兩行""中的工作表名字
Dim a As String: a = "Sheet1" '修改成你需要復制的表名
Dim b As String: b = "Sheet2" '修改成粘貼的空白表名
'以下不需要修改
Sheets(a).Cells.Copy
Sheets(b).Range("A1").Select
ActiveSheet.Paste
End Sub
③回到EXCEL表，運行菜單 【工具】－【宏】－【宏】，選擇 強行復制 這條宏，然後按執行,之後就可以在另外一個工作表sheet里粘貼就行了，不過有圖片的話不能復制過來。
④假如有提示說宏的安全性被限制此類的信息，請在工具欄－【宏】－【安全性】裡面把【安全級】設置為【中】。

❻ Excel 中鎖定單元格的快捷鍵是什麼

Excel中「鎖定單元格」沒有快捷鍵，但是可以通過Excel菜單快捷鍵進行鎖定，具體操作步驟如下：

所需材料：Excel。

一、首先打開Excel表格文件，然後按下鍵盤上的Alt鍵開啟顯示菜單快捷鍵。

❼ excel里 如何鎖定單元格使單元格內的數字不變呢

如果不是鎖定全部的單元格，不妨按照下列步驟操作試試：
選中工作表，執行「格式/單元格/保護」操作，把「鎖定」前面的勾去掉；
選中要鎖定的單元格區域，執行「格式/單元格/保護」操作，把「鎖定」前面的勾打上；
執行「工具/保護/保護工作表」操作，進行相關設置即可。
建議：
最好不要設置密碼，避免密碼遺忘造成困擾！

❽ 如何在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. 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

6.關閉編輯窗口。
7.工具---宏-----宏,選AllInternalPasswords,運行,確定兩次,等2分鍾,再確定即可完成操作。

❾ excel表格中錄入數據怎樣鎖定不能修改

1、打開需要設置內容只能輸入不能修改的表格。