Excel日期選擇器控件

我需要爲我創建的Excel工作表創建一個單元格日期選擇器。Excel日期選擇器控件

但是我無法理解的例子應該如何放置一個日曆選取細胞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

我沒有得到任何結果在所有...

任何提示或答案是讚賞:)

來源

2012-11-20 Ole Henrik Skogstrøm

見http://www.rondebruin.nl/calendar.htm的工作示例。 ...我認爲你當前的鏈接不是'VBA' – brettdj

謝謝你的例子，但是我已經使用Ro de Bruin例子，這個方法需要安裝日曆。（在Excel 2010中，此日曆控件不再自動安裝）。我所包含的示例頁面在C＃和VB中都有示例。 –

這個例子不是'VBA'.It可能是'VB.Net' – brettdj