在数组输出中保留前导零

如果我做错了，我很抱歉。

我在Excel中有一个VBA子我用来扩展值的范围。

例如，111-113变为111,112,113。当我必须用前导零来扩大数值时，就会出现这个问题。 我把它们都作为NumberFormat =“@”，前置子数据显示前导零。 他们在处理中丢失的地方，我怀疑它与我的variablestypes的问题，但我真的不知道。

我正在粘贴下面代码的相关位。 任何帮助将非常感激。

Dim ArrayData As Variant Dim ArrayOut As Variant Dim X As Long Dim D As Long Dim Index As Long For D = ArrayData(X, 1) To ArrayData(X, 2) Index = Index + 1 ArrayOut(Index, 2) = D 

Answer 1

你有没有尝试设置D的Stringtypes？

如果你真的要做一些数字的事情，比如添加/增加它们，事情只需要很Long 。

如果这些数字有前导零，那么它们可能不是真正的“数字”。

Answer 2

格式为@的单元格是stringtypes的格式。 因此，当将其转换为数字格式时，您将丢失任何尾随零（或者如果您的单元格包含除数字之外的任何内容，则会出现错误）。

因此，您应该Dim D As String以便保留单元格中值的格式。