Excel vba如何合并这三个单元格？答案

【问题标题】：Excel vba how to merge this three cells?Excel vba如何合并这三个单元格？
【发布时间】：2017-04-24 20:11:21
【问题描述】：

我尝试合并三个单元格，并将其分配给其他单元格，但无法合并第三个单元格。下面是我的代码，

For x = 2 To LastRow_Line_Site
        With Sheets("Line_Site")
            .Cells(x, "E") = CStr(.Cells(x, "A") & .Cells(x, "B") & .Cells(x, "C"))
        End With
    Next

ColA:8009601022 ColB:77854 ColC:00340，我希望得到像 80096010227785400340 这样的结果，但结果变成了 80096010227785400000

有人可以帮我解决这个问题吗？

非常感谢！！

【问题讨论】：

看起来你超过了 Excel 的数值精度。因此，如果您将目标单元格格式化为文本，它应该可以工作。

标签： excel vba merge

【解决方案1】：

    With Sheets("Line_Site")
        .Cells(x, "E").NumberFormat = "@"
        .Cells(x, "E") = .Cells(x, "A").Text & .Cells(x, "B").Text & .Cells(x, "C").Text
    End With

【讨论】：

只是补充一点，原因是 Excel 的数字精度限制为 15 位。请参阅here 了解更多信息。要将数字存储在单元格中，您需要将其存储为字符串，确保单元格的数字格式也匹配。
@Jordan 谢谢老兄，你救了我的命 :)