卖逼视频免费看片|狼人就干网中文字慕|成人av影院导航|人妻少妇精品无码专区二区妖婧|亚洲丝袜视频玖玖|一区二区免费中文|日本高清无码一区|国产91无码小说|国产黄片子视频91sese日韩|免费高清无码成人网站入口

如何設(shè)置EXCEL僅能輸入數(shù)據(jù)且不能修改已輸入的數(shù)據(jù)

在工作中,有時(shí)我們需要錄入數(shù)據(jù),但又希望其他人不能輕易地修改已經(jīng)輸入的數(shù)據(jù)。這時(shí),我們可以通過(guò)設(shè)置讓EXCEL工作表僅能輸入數(shù)據(jù),要修改已輸入的數(shù)據(jù)時(shí)則需要輸入密碼。 步驟一:選定全部工作表 首先

在工作中,有時(shí)我們需要錄入數(shù)據(jù),但又希望其他人不能輕易地修改已經(jīng)輸入的數(shù)據(jù)。這時(shí),我們可以通過(guò)設(shè)置讓EXCEL工作表僅能輸入數(shù)據(jù),要修改已輸入的數(shù)據(jù)時(shí)則需要輸入密碼。

步驟一:選定全部工作表

首先,按下Ctrl A鍵,選定整個(gè)工作表。

步驟二:打開(kāi)【單元格格式】對(duì)話(huà)框

按下Ctrl 1鍵,打開(kāi)【單元格格式】對(duì)話(huà)框。然后點(diǎn)擊【保護(hù)】選項(xiàng)卡,在【鎖定】前面的方框中去掉勾選。

步驟三:輸入VBA代碼

按下Alt F11鍵,打開(kāi)VBE窗口。在左側(cè)的工程窗口選擇要保護(hù)的工作表,在右側(cè)的代碼窗口輸入以下代碼:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    On Error Resume Next
    With Target
        If .Value lt;gt; "" Then
            PW  InputBox("請(qǐng)輸入密碼:")
            If PW lt;gt; "123" Then
                Cells(1,1).Select
            Else
                Exit Sub
            End If
        End If
    End With
End Sub

關(guān)閉VBE窗口,然后點(diǎn)擊另存為啟用宏的工作薄。這樣設(shè)置后,當(dāng)選中一個(gè)單元格時(shí),如果單元格不為空,就會(huì)彈出密碼輸入框(默認(rèn)密碼為123)。如果密碼輸入錯(cuò)誤,則自動(dòng)跳轉(zhuǎn)到A1單元格,如果密碼輸入正確,則用戶(hù)可以繼續(xù)在當(dāng)前單元格輸入內(nèi)容。

通過(guò)以上步驟,我們可以設(shè)置EXCEL僅能輸入數(shù)據(jù)且不能修改已輸入的數(shù)據(jù),從而保護(hù)我們的數(shù)據(jù)安全。

標(biāo)簽: