Excel日期选择器控件

Question

我需要为我正在创建的 Excel 工作表创建一个单元格日期选择器。

我正在尝试关注 this tutorial

但是我无法理解该示例如何将日历选择器放置在单元格 A1:C1 中。在我的工作表中，如果我按原样粘贴代码，则会引发错误。如果我尝试像这样修改它:

'Declaration
Public Function AddDateTimePicker(range As range, name As String) As DateTimePicker   

Private Sub ExcelRangeAddDateTimePicker()
Dim DateTimePicker1 As Microsoft.Office.Tools.Excel.Controls.DateTimePicker
DateTimePicker1 = Me.Controls.AddDateTimePicker(Me.range("A1", "C1"), "DateTimePicker1")       
End Sub

我根本没有得到任何结果......

任何提示或答案表示赞赏:)

Answer 1

我发现了一个比我之前发现的更好的 Excel 2010 Calander 示例。

这个教程非常好，可以帮助您为 Excel 2010 创建弹出日历: http://www.fontstuff.com/vba/vbatut07.htm

我在 brettdj 链接的页面底部找到了它。谢谢:)