要限定单元格赋值的范围,可以使用条件语句来实现。例如,如果要限定单元格 A1 的值只能在 1 到 100 之间,可以使用如下代码:

Sub SetValue()

    Dim value As Integer
    
    '获取输入值
    value = Range('A1').Value
    
    '判断输入值是否在 1 到 100 之间
    If value >= 1 And value <= 100 Then
        '将值赋给单元格 A1
        Range('A1').Value = value
    Else
        '给出错误提示
        MsgBox '输入值必须在 1 到 100 之间'
    End If
    
End Sub

这段代码首先获取单元格 A1 的值,然后判断该值是否在 1 到 100 之间。如果是,则将值赋给单元格 A1;如果不是,则弹出一个错误提示框。可以根据需要修改代码中的范围和提示信息。

VBA 单元格赋值范围限制 - 如何限制单元格输入值

原文地址: https://www.cveoy.top/t/topic/nPbA 著作权归作者所有。请勿转载和采集!

免费AI点我,无需注册和登录