返回列表 上一主題 發帖

[發問] 關於 自動鎖定儲存格

[發問] 關於 自動鎖定儲存格

用了以下VBA
本想輸入資料後 自動鎖定儲存格
用在普通儲存格是可以正常使用

但如果已經合併的儲存格
沒有輸入資料已經自動鎖定

請指教
Thanks
------------------------------------------------

Private Sub Worksheet_SelectionChange
ActiveSheet.Unprotect
  Target.Locked = False
    On Error Resume Next
        If Target <> "" Then
      Target.Locked = True
    ActiveSheet.Protect Contents:=True
   End If
End Sub

        靜思自在 : 唯其尊重自己的人,才更勇於縮小自己。
返回列表 上一主題