创建ListBox

Question

我正在尝试使用VBA从Access创建Excel报表。因此，每次用户单击Access表单中的按钮时，都应生成Excel文件。我需要在文件中有ListBox。我正在声明ListBox添加项目但是将其分配给特定单元格有问题：

Dim lst As ListBox
With lst
.AddItem "1"
.AddItem "2"
End With

现在我想在Cells（7,1）中显示列表框。

我该怎么做？

Answer 1

一个简单的解决方案是利用数据验证直接在单元格中创建下拉列表。这样您还可以避免使用可能弃用的组件。

在您的情况下，这可以运行此代码：

imageview

使用Join添加验证的灵感来自this answer。