时间戳

首页 > 解决方案 > 从 FormControl ListBox 检索值时出现运行时错误

excel - 从 FormControl ListBox 检索值时出现运行时错误

问题描述

我将FormControl ListBox带有名称ListBox2的 a 添加到 Excel 工作表中，并将宏分配给RectangleRoundedCorners3_Click形状。现在我想将列表框的第一项打印到单元格 A1 中：

Sub RectangleRoundedCorners3_Click()

ActiveSheet.Range("A1").Value = ActiveSheet.ListBox1.List(0)

End Sub

我收到以下错误：

运行时错误“438”：

对象不支持此属性或方法

我真的不明白为什么会这样。如果我使用ActiveX Controls ListBox完全相同的代码工作得很好。

标签： excelvbalistboxform-control

解决方案

尝试：

ActiveSheet.Range("A1").Value = Activesheet.ListBoxes("ListBox2").List(1)

注意：对 的引用ActiveSheet并不是引用工作表的最佳方式。在这里查看这篇文章以了解更多信息。

FormControl ListBoxes可以在网站Complete guide to Excel VBA Form Control ListBoxes找到使用多种方法的有用概述。- 由于乔纳斯的评论而编辑:-)

推荐阅读