Question

Excel窗体中的列表框调用列表框的数据时，总是显示列表的第一个值不能显示其他值。

列表框里有许多可选的值，但是无论怎么选，写到Excel的值都是第一个值，.使用的语句是Offset(0, 2).Value = ListExpenseType.Text，求大神看看怎么解决？急！！！在线等。

Answer 1

你看看是不是事件绑定有问题，最好是在ListBox或者ComboBox的change事件中，

放置你的代码，而不是在click事件中执行代码。

Private Sub ListBox1_Change()
    '这里填写你的代码
    '可以先用控制台打印一下此时的值，看看是否正确。
    debug.print ListExpenseType.Text
    Offset(0, 2).Value = ListExpenseType.Text
End Sub

Private Sub ListBox1_Click()
    '最好不要在Click事件中执行，因为此时Value值可能没有改变过来
End Sub

另外，在窗体列表初始化时，可以这样给列表框或组合框赋值：

ListBox.List() = Array("值1", "值2", "值3")
ComboBox.List() = Array("值1", "值2", "值3")

追问

这个确保没有问题的，打印出来也是第一个的值

Answer 2

是不属性值设置有问题

追问

属性我没改过，只改了名字

追答

上传文件吧，大家看看

追问

文件怎么上传？

追答

补充里边可以插入图片，把属性和代码以插入图片形式

追问

问题解决了，不是你们所说的问题但是感谢。