如何粘贴日期并防止格式错误?

时间:2017-10-17 09:28:34

标签: excel date

我需要粘贴来自包含格式为mm / dd / yyyy日期的应用程序的数据。当我将数据传递到Excel时,日期标识为dd / mm / yyyy,并且错误标识月份的日期(mm> 12)将变为文本。见下面的示例图片

enter image description here

如何粘贴数据以将日期格式直接从mm / dd / yyyy格式化为dd / mm / yyyy?我试着将列格式化为日期dd / mm / yyyy,但它没有任何区别。

4 个答案:

答案 0 :(得分:3)

粘贴到excel时应该有一些粘贴句柄:

enter image description here

选择'使用文本导入向导..."

enter image description here

选择分隔(固定宽度也很好,我们真的不想拆分信息),然后下一步:

enter image description here

使用分隔符,取消所有内容更安全:

enter image description here

最后一部分是重要的部分。选择日期并从源中选择格式。在这种情况下,源代码的格式是首月,然后是日期,然后是年份,这样你选择的是什么,然后点击完成:

enter image description here

我的本​​地设置的日期格式为dd / mm / yyyy,以便我得到的内容:

enter image description here

如果您有多个列,则可以使用适当的分隔符导入它们。当您到达向导的第3部分时,选择包含日期的列(在预览框中单击它们/它们)并选择日期选项。

答案 1 :(得分:0)

在粘贴数据之前,请先尝试将excel列格式化为mm / dd / yyyy。

选择要粘贴数据的单元格范围(区域),然后右键单击>格式化细胞。转到自定义并输入mm / dd / yyyy并点击确定。

之后,继续粘贴日期。

enter image description here

答案 2 :(得分:0)

我设法通过选择数据复制数据后选择数据 - >解决了问题。文字到列 - >选择日期MDY,然后将单元格格式化为dd \ mm \ yyyy

希望这有助于其他人。

答案 3 :(得分:0)

我找到了VBA解决方案:

'Set all the cells in a Text format
ActiveSheet.Cells.NumberFormat = "@"
'Paste data
ActiveSheet.Paste()
'Set all the cells in a Standard format
ActiveSheet.Cells.NumberFormat = "General"