首页 文章

用于Excel剪切和粘贴的VBA代码

提问于
浏览
0

用户可以在该单元格中输入数据:

  • 从预定义的选项列表中选择(滚动下拉列表)

  • 直接输入字母数字值(所有数字,所有字母或两者的组合)

  • 通过复制(从其他文档)并将标识符粘贴到该单元格中

我不想让用户有权执行选项3?是否有VBA代码可以实现这一目标?

Excel一直存在验证问题 . 当您需要某人从列表中选择或输入特定数据时,它们可以正常工作,但是当用户从其他人复制数据和验证单元格中的粘贴时,它会忽略验证并允许它

1 回答

  • 0

    这是一个例子:

    Private Sub Worksheet_Change(ByVal Target As Range)
        Application.EnableEvents = False
        If Target = Range("A1") Then
            If Not (Target >= 1 And Target <= 10) Then
                Application.Undo
                MsgBox "Please enter value between 1 to 10", vbOKOnly + vbCritical
            End If
        End If
        Application.EnableEvents = True
    End Sub
    

相关问题