wps表格怎么实现禁止在单元格进行粘贴操作（只允许键入，不允许粘贴进来）
wps表格怎么实现禁止在单元格进行粘贴操作（只允许手动键入，不允许粘贴进来），因为只要直接粘贴就破坏了原来设置的单元格的锁定的格式。
3 +1
1
+1
请
登录后发表评论哦
全部评论
1
Private Sub Workbook_Open()
Application.OnKey "^v", "DisablePaste" ' 禁用 Ctrl+V
Application.OnKey "+{INSERT}", "DisablePaste" ' 禁用 Shift+Insert
Application.CellDragAndDrop = False ' 禁用拖放功能
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
' 恢复默认设置
Application.OnKey "^v"
Application.OnKey "+{INSERT}"
Application.CellDragAndDrop = True
End Sub
Sub DisablePaste()
MsgBox "粘贴操作已被禁用，请手动输入数据！", vbExclamation, "提示"
End Sub
回复