如何保护 Excel 中的公式以允许数据输入 - 2 种方法

该数据集显示了员工的姓名、工资和成本。输入工资和成本以计算节省，无需使用节省列。

在工资和成本列中输入值并自动获得节省。

保留空单元格。如果储蓄列的单元格中没有公式，其他列仍可编辑。

方法 1 – 仅保护公式单元格

使用允许数据输入的公式保护单元格。

步骤：

• 按 Ctrl+A 选择整个工作表。

• 按 Ctrl+1 转到设置单元格格式窗口。
• 在保护标签中取消选中锁定。
• 单击确定。

• 工作表中没有锁定的单元格。

• 按 F5 按钮并选择转到窗口。
• 选择特殊。

• 在转到特殊项中选择公式。
• 单击确定。

• 所有包含公式的单元格均已标记。

• 转到设置单元格格式窗口。
• 选中锁定并单击确定。

包含公式的单元格被锁定。

• 转到审核标签。
• 单击保护中的保护表。

• 检查前两个选项并单击确定。

• 您可以在任何单元格中输入数据，公式单元格除外。 Allisa 已进入 B9。

• 如果您尝试在公式单元格中输入数据，将会显示警告。

方法 2 – 使用 Excel VBA 代码保护公式单元格并允许在其他单元格中输入数据

步骤：

• 转到工作表名称。
• 单击右键。
• 在上下文菜单中选择查看代码。

• 在VBA窗口中，选择插入选项卡中的模块。

• 输入VBA代码。

选项显式

Sub Protect_Formula_Cells()
    Dim pass As String, w_sheet As Worksheet
    Dim f_cells As Range
    pass = "123"
    Set w_sheet = ActiveSheet
    w_sheet.Unprotect pass
    On Error Resume Next
    Set f_cells = w_sheet.Cells.SpecialCells(xlCellTypeFormulas)
    If f_cells Is Nothing Then Exit Sub
    w_sheet.Cells.Locked = False
    f_cells.Locked = True
    w_sheet.Protect pass
End Sub

• 按 F5 运行代码。

单元格被锁定。

• 您可以在其他单元格中输入数据，但不能在公式单元格中输入数据。