当前位置：文江博客话题详情

CSV 文件：Excel 隐藏零

发布于 2024-10-29 18:32:52 字数 200 浏览 2 评论 0原文

如果我将 csv 文件加载到 Excel 中，值 123.320000 将变为 123.32。

我需要按原样查看所有内容。有什么方法可以阻止Excel隐藏尾随零吗？

阅读其他帖子，我发现这样做可以工作“=”“123.3200000”，但这意味着每次我想查看它时都在文件上运行正则表达式..因为它采用 xxxx|###|xxx 格式并且我无法控制生成部分。

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

风柔一江水 2024-11-05 18:32:52

您究竟是如何加载 CSV 文件的？

如果将其导入为“文本”格式，则 Excel 将保留所有格式，包括前导/尾随零。

在 Excel 2010 中，您从“数据”选项卡导入并选择“从文本”，找到 CSV 文件，然后在出现提示时选择将数据格式设置为“文本”

回复收藏 0 原文

还给你自由 2024-11-05 18:32:52

我假设一旦导入的值位于工作表中，您希望将它们视为数字而不是文本，即您希望能够求和、相乘等。将值加载为文本将阻止您执行此操作-- 直到您将值转换回数字，在这种情况下您将丢失尾随零，这使您回到最初的难题。

请记住，值 123.32 和 123.3200000 之间没有区别，您想要的只是更改显示格式，以便明确显示值的完整精度。您可以在 VBA 中执行此操作，如下所示：

strMyValue = "123.3200000"

strFormat = "#."
' Append a 0 to the format string for each figure after the decimal point.
For i = 1 To Len(strMyValue) - InStr(strMyValue, ".")
    strFormat = strFormat & "0"
Next i

With Range("A1")
    .Value = CDbl(strMyValue)
    .NumberFormat = strFormat
    'Value now shown with same precision as in strMyValue.
End With

I'm assuming that once the imported values are in the sheet, you want to treat them as numbers and not as text, i.e. you want to be able to sum, multiply, etc. Loading the values as text will prevent you from doing this -- until you convert the values back to numbers, in which case you will lose the trailing zeros, which brings you back to your initial conundrum.

Keeping in mind that there is no difference between the values 123.32 and 123.3200000, what you want is just to change the display format such that the full precision of your value is shown explicitly. You could do this in VBA like so:

strMyValue = "123.3200000"

strFormat = "#."
' Append a 0 to the format string for each figure after the decimal point.
For i = 1 To Len(strMyValue) - InStr(strMyValue, ".")
    strFormat = strFormat & "0"
Next i

With Range("A1")
    .Value = CDbl(strMyValue)
    .NumberFormat = strFormat
    'Value now shown with same precision as in strMyValue.
End With

回复收藏 0 原文

~没有更多了~