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

None of the solutions offered here is a good solution. It may work for individual cases, but only if you're in control of the final display. Take my example: my work produces list of products they sell to retail. This is in CSV format and contain part-codes, some of them start with zero's, set by manufacturers (not under our control). Take away the leading zeroes and you may actually match another product. Retail customers want the list in CSV format because of back-end processing programs, that are also out of our control and different per customer, so we cannot change the format of the CSV files. No prefixed'=', nor added tabs. The data in the raw CSV files is correct; it's when customers open those files in Excel the problems start. And many customers are not really computer savvy. They can just about open and save an email attachment. We are thinking of providing the data in two slightly different formats: one as Excel Friendly (using the options suggested above by adding a TAB, the other one as the 'master'. But this may be wishful thinking as some customers will not understand why we need to do this. Meanwhile we continue to keep explaining why they sometimes see 'wrong' data in their spreadsheets. Until Microsoft makes a proper change I see no proper resolution to this, as long as one has no control over how end-users use the files.

使用谷歌驱动器(如果你在Mac上，也可以使用Numbers)的解决方案:

在Excel中打开数据 将数据错误的列的格式设置为文本(format > Cells > Number > Text) 将.csv文件加载到谷歌Drive，并使用谷歌Sheets打开它 复制出错的列 将列作为文本粘贴到Excel中(编辑>粘贴特殊>文本)

或者，如果你在Mac上进行第3步，你可以在Numbers中打开数据。

我做了这个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解决方案，不包括在输入文本前面插入。该代码以原始形式保留数据。

(EXCEL 2016及以后版本，实际上我没有尝试过旧版本)

打开新空白页 转到“数据”标签 点击“来自文本/CSV”，选择CSV文件 检查预览您的数据是否正确。 在сase中，当某些列被转换为日期时，单击“编辑”，然后通过单击列头部的日历选择类型文本 点击“关闭并加载”

我有一个类似的问题，这是解决方案，帮助我无需编辑csv文件内容:

如果你可以灵活地将文件命名为“。csv”以外的东西，你可以用“。txt”扩展名来命名它，比如“Myfile.txt”或“Myfile.csv.txt”。然后，当你在Excel中打开它(不是通过拖放，而是使用文件->打开或最近使用的文件列表)，Excel将为你提供一个“文本导入向导”。

在向导的第一页中，为文件类型选择“Delimited”。

在向导的第二页中，选择“，”作为分隔符，如果用引号括起值，还可以选择文本限定符

在第三页，分别选择每一列，并为每一列分配类型为“文本”而不是“常规”，以防止Excel弄乱你的数据。

希望这能帮助你或有类似问题的人!