Excel VBA：使用DatePicker獲取正確的日期到一個單元格

Question

我有一個帶有DatePicker控件的UserForm。 它工作正常，除了將選定的日期複製到電子表格。 這是代碼：

Range("A1").Value = UserForm1.DTPicker1.Value 

將返回：

00:00:00 

在單元格A1，不管選擇了什麼樣的日期。

Answer 1

您可能將單元格格式設置爲時間而不是日期。

嘗試改變它，看它是否工作。

此外，在此步驟之後，進行格式化'常規'以查看是否有任何內容已被粘貼到「A1」中。

Answer 2

確保傳輸數據的命令與DTPicker本身位於多頁表單的相同表單或頁面中。

由於某些原因，當兩者分離時它不會工作，並且會在目標單元格中​​顯示一個零。該零點是已關閉日期的「時間」部分。雖然「日期」部分拒絕轉移，但由於某些原因，時間確實如此，並且零時間在單元中被讀取爲時間零點，這是中午。

因此，在總結：

保持在同一頁上的DTPicker和轉讓的控制，並且應該解決的問題。

代碼非常簡單。這是

Sheet1.Range("AA9") = Me.DTPicker1.Value