WPS怎么设置表格只允许填写数据，不允许再修改？

Question

就是设置好表格，只允许自主的填写数据，填写完以后不允许修改内容，包括自己填写的

Answer 1

使用VBA。限制单元格输入次数，任何一个单元格，只能输入一次，即，空单元格允许输入第一次数据；非空单元格，不能删除不能修改数据。

打开VB编辑器，双击thisworkbook，输入以下代码

Dim MyRow As Integer

    Dim MyColumn As Integer

    Dim MyOldValue As String

    Dim MyNewValue As String

    Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

      MyRow = Target.Row

      MyColumn = Target.Column

      MyOldValue = Cells(MyRow, MyColumn).Value

    End Sub

    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

      MyRow = Target.Row

      MyColumn = Target.Column

      MyNewValue = Cells(MyRow, MyColumn).Value

      If (Trim(MyOldValue) <> "") Then

      Cells(MyRow, MyColumn).Value = MyOldValue

      Else

      Cells(MyRow, MyColumn).Value = MyNewValue

    End If

    End Sub

关闭VB编辑器就可以了，输入内容后，如果修改了内容，会又变成原内容。

你也可以在里面加入警告语句，提醒输入者不能修改原数据。