vba - 存储数据但不以预期格式输出

Question

我正在存储电子表格中的一些数据，这些数据在 Debug.Print 后可以正常工作

存储的数据是一个以单个或多个 0 开头的长数字。

我尝试使用以下几个不同的代码段，但它们都没有输出我想要的内容......

.Cells(LR + 1, 索引).value = "00049875142"

输出: 49875142

.Cells(LR + 1, 索引).value2 = "0008789875949898451142"

输出: 8.78988E+18

问题:将数据卸载回电子表格时，如何获取输出以在字符串中添加前导 0？

Answer 1

在向单元格存储值之前，请确保单元格格式设置为文本。

.Cells(LR + 1, index).NumberFormat = "@"
.Cells(LR + 1, index).value = "00049875142"

虽然不一次为每个单元格设置格式，而是在循环和设置值之前设置范围，但效率会更高。