excel - Excel 日付ピッカー コントロール

Question

作成中の 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

全然結果が出ない…

ヒントや回答をいただければ幸いです:)

Answer 1

以前に発見したものよりも、Excel 2010 Calander が動作するより良い例を見つけました。

このチュートリアルは非常に優れており、Excel 2010 用のポップアップ Calander を作成するのに役立ちます: http://www.fontstuff.com/vba/vbatut07.htm

brettdj によってリンクされたページの下部で見つけました。ありがとうございました ：）

Answer 2

Trevor Eyre によるこの VBA バージョンは非常に見栄えがよく、ドキュメントも充実しています。1 行のコードで VBA フォームを開き、日付を取得します。

myDate = CalendarForm.GetDate

http://trevoreyre.com/portfolio/excel-datepicker/

-OO-