Excel Vba Date Time Picker 簡易使用方法  (How to use DateTimePicker)

1.新增表單(form)

先插入一個自訂表單form，然後再控制項工具箱選擇 DateTimePicker 物件

2.若控制項中沒有該  DateTimePicker 物件 則 在控制項按右鍵新增

3.往下拉 尋找一個 Microsoft Date And Time Picker Control 6.0  並點選 打勾按確定

4.再來就會看到選項多了一個 DateTimePicker 物件，將之拖曳到 表單form 上

5. 使用起來就會像是下拉式選單一樣(dropdown list 或 combobox 差不多)

6. 如果要取得該值的話 

Range("A1").Value = DTPicker1.Value '將值顯示在A1欄位上

7. 若要新增多一天在Range("A2") 上，可以使用 公式的方法。

Range("A2").Formula = "=A1+1"

8.若要客製化日期格式可以使用

DTPicker1.CustomFormat = "dd/MM/yyyy" '欲顯示的日期格式
DTPicker1.Format = dtpCustom '選擇使用客製化格式

也可以在屬性欄直接打上

加上星期的格式

DTPicker1.CustomFormat = "yyyy-MM-dd (ddd)" 

9.取得該日的星期

若星期日、一、二、三、四、五、六

該值依序為 1．2、3、4、5、6、7

Weekday(DTPicker1.Value)

也可以自訂哪一天為1

此例為自訂星期四所得數值為1

msgbox Weekday(DTPicker1.Value，5)

有其他問題歡迎留言