(excel2007及以上版本)

如何强制excel不“检测”日期格式而不编辑源文件

:

将文件重命名为.txt 如果你不能这样做，而不是直接在excel中打开CSV文件，创建一个新的工作簿，然后转到 数据>从文本中获取外部数据>并选择您的CSV。

无论哪种方式，你都会看到导入选项，只需选择每个包含日期的列，并告诉excel格式为“文本”而不是“一般”。

在我的案例中，使用R生成的csv文件中的“Sept8”被Excel 2013转换为“8-Sept”。该问题通过使用xlsx包中的write.xlsx2()函数生成xlsx格式的输出文件来解决，该输出文件可以由Excel加载，而无需进行不必要的转换。因此，如果给你一个csv文件，你可以尝试将它加载到R中，并使用write.xlsx2()函数将其转换为xlsx。

另一种方法:

将要更改的列的格式转换为“Text”。选择要保留的所有单元格，复制。在不取消这些列的情况下，单击“编辑>粘贴特殊> As值”

保存为CSV。请注意，这必须是您对文件所做的最后一件事，因为当您重新打开它时，它将自己格式化为日期，因为单元格格式不能保存在CSV文件中。

将表格粘贴到word中。进行搜索/替换并将所有-(破折号)更改为-(双破折号)。复制并粘贴到Excel中。可以为其他符号(/)等做同样的事情。如果需要在Excel中更改回破折号一次，只需将列格式化为文本，然后进行更改。希望这能有所帮助。

(假设Excel 2003…)

当使用文本到列向导时，在步骤3中，您可以为每个列指定数据类型。单击预览中的列，将行为不端的列从“常规”更改为“文本”。

我做了这个VBA宏，基本上在粘贴数字之前将输出范围格式化为文本。当我想要粘贴诸如8/11、23/6、1/3等值时，它非常适合我，而Excel不会将它们解释为日期。

Sub PasteAsText()
' Created by Lars-Erik Sørbotten, 2017-09-17
Call CreateSheetBackup
    
Columns(ActiveCell.Column).NumberFormat = "@"
    
Dim DataObj As MSForms.DataObject
Set DataObj = New MSForms.DataObject
DataObj.GetFromClipboard

ActiveCell.PasteSpecial

End Sub

我很想知道这是否也适用于其他人。我一直在寻找一个解决这个问题的方法有一段时间了，但我还没有看到一个快速的VBA解决方案，不包括在输入文本前面插入。该代码以原始形式保留数据。