2015-05-29 54 views
1

我很新VBa,我現在面臨一個問題。我有一個多頁,有2頁,每個框架,每個框架內,我有日期選擇器的初始日期和最後日期,名爲DTPicker1Li,DTPicker2LI,DTPicker3LI和DTPicker4LI。它們的形式是frmInserirImpLI。錯誤日期,設置錯誤或其他對

用於獲取值

DInicioILI = frmInserirImpLI.DTPicker1LI.Value 
DFimILI = frmInserirImpLI.DTPicker2LI.Value 
DInicioLImp = frmInserirImpLI.DTPicker3LI.Value 
DFimLImp = frmInserirImpLI.DTPicker4LI.Value 

在Excel單元格寫我有

Range("H" & linhaAEscreverLI) = DInicioILI 
Range("I" & linhaAEscreverLI) = DFimILI 
Range("O" & linhaAEscreverLI) = DInicioLImp 
Range("P" & linhaAEscreverLI) = DFimLImp 

問題是,它僅用於傳遞細胞的2正確的日期。 或者在列H和I中寫入正確的日期,然後在列O和P中出現:00-01-1900 或者如果日期在列O和P中正確顯示,它將出現在列H和I中: 12:00:00 AM 我在做什麼錯誤?

在此先感謝

+0

快速quesiton:這個文件供個人使用還是要跨到其他人發送它呢? –

+0

如果您將'Debug.Print DInicioILI,DFimILI,DInicioLImp,DFimLImp'添加到您的代碼中,您會在即時窗口中打印4個日期嗎? – ChipsLetten

+0

你的問題解決了嗎?如果它已修復,請驗證答案以將問題標記爲已解決! – R3uK

回答

1

設定值後,只需添加格式:

Range("H" & linhaAEscreverLI) = DInicioILI 
Range("H" & linhaAEscreverLI).NumberFormat = "dd/mm/yy"