错误日期，设置错误或其他对

问题描述：

我很新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 我在做什么错误？

在此先感谢

快速quesiton：这个文件供个人使用还是要跨到其他人发送它呢？ –

如果您将'Debug.Print DInicioILI，DFimILI，DInicioLImp，DFimLImp'添加到您的代码中，您会在即时窗口中打印4个日期吗？ – ChipsLetten

你的问题解决了吗？如果它已修复，请验证答案以将问题标记为已解决！ – R3uK

答

设定值后，只需添加格式：

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

错误日期，设置错误或其他对

相关推荐