Question

我创建了一个可以为不同州选择不同商品价格的宏（由于税收）。为此，我正在使用一个包含带有可能状态的ListBox的用户窗体。然后，我放了一个Select Case从正确的列中提取值。

但是，似乎无法理解我要使用的范围变量... 这是我的代码示例。

首先，我用要出售的商品声明Range变量，然后然后用我的所有状态的列表框提示输入用户表单。

Dim Items As Range
Set Items = Range("I9").End(xlDown)
Set Items = Range(Items, Items.End(xlDown))

UserForm1.Show

在用户窗体中，我放置了一个“命令按钮”以在单击时执行，应当根据状态在“项目”范围内进行偏移。

Select Case Me.ListBox1
    Case "NY"
        Set State = Items.Offset(0, 6)
    Case "CA"
        Set State = Items.Offset(0, 7)
    End Select
Unload UserForm1

...这就是我收到错误消息的时间：

运行时错误“ 1004”：

应用程序定义或对象定义的错误

有人可以帮助我理解为什么我不能抵消以前声明的范围吗？

组合列表框，在Excel VBA中选择大小写和范围

0 个答案: