从Access VBA在Excel中创建下拉列表

Question

我对Access VBA将数据导出到Excel相当陌生

我正在尝试创建一个简单的列表，并使用Access vba从ACCESS中向其添加值，然后将数据导出到Excel。

我发现可以将数据导出到Excel，但无法创建下拉列表

我在网上搜索失败。

有人可以帮我吗？

谢谢

Answer 1

只需创建一个表单，
带组合框控件和命令按钮
然后将以下代码放入命令按钮Click Event。

Private Sub cmdAddtoCombo_Click()
 Dim i As Long

    For i = 1 To 10
        cboItems.AddItem "Item - " & i
    Next i

End Sub

  

组合框Row Source Type应该为Value List