VBA中FieldInfo与.NumberFormat = "@"的区别及OpenText指令前置零位数逻辑问询

先直接拆解你的核心疑问，再结合你的场景分析问题根源：

FieldInfo 和 .NumberFormat = "@" 的本质区别 #

这两个工具的作用阶段、对象和逻辑完全不同：

• .NumberFormat = "@" 是「事后改显示」
  它是在数据已经加载到单元格之后，修改单元格的显示格式，把数值格式切换为文本格式，但不会改变单元格底层存储的实际值。比如你先把数字1存在单元格里，再设置成文本格式，它底层还是数字1，只是显示成文本样式的"1"——前导零不会凭空出现，也不会改变已有的值。
• FieldInfo 是「事前定规则」
  它是在使用OpenText导入/打开文本类文件时，提前告诉Excel每一列应该如何解析原始数据。它直接决定了Excel把源数据转换成什么类型存储到单元格里，是从原始数据到工作表的「入口规则」。比如你给某列指定xlTextFormat（对应参数2），Excel就会把这列的所有内容当成纯文本读取，保留每一个字符（包括前导零、空格等）；如果指定xlGeneralFormat（对应参数1），Excel会自动识别数据类型，数值会被转成数值型存储，前导零会被自动剔除。

你的宏为什么会导致部分行内容相同？ #

看你的FieldInfo设置：只有第1列和第4列被指定为xlTextFormat（Array(1,2)、Array(4,2)），其余列都是xlGeneralFormat（Array(n,1)）。

你的源数据里，部分行是1位数字、其余是13位数字——推测这些数字是产品代码，原本1位数字的行应该是带12个前导零的13位代码（比如0000000000001），但在导出为XLS时，因为单元格格式是数值，前导零被丢失，变成了1。当你用宏导入时，这些列被设为xlGeneralFormat，Excel会把1和0000000000001都当成数值存储，而数值型数据会自动去掉前导零，最终两者在单元格里显示的都是1，看起来内容相同。

关于「数字前添加多少个0」的疑问 #

其实你的VBA宏并没有主动添加前导零，出现这种误解是因为：
当FieldInfo指定某列为xlTextFormat时，Excel会原样保留源数据的文本内容——如果源数据里的13位代码本身带前导零，就会完整显示；如果源数据里是1位数字，就显示1位。而如果是xlGeneralFormat，Excel会自动剔除数值的前导零，导致不同长度的数字显示成相同内容。

解决建议 #

如果你的产品代码需要完整保留所有字符（包括前导零），把FieldInfo里所有列的类型都改成xlTextFormat（也就是把所有Array(n,1)改成Array(n,2)），这样导入时所有内容都会按纯文本解析，不会丢失前导零，也不会出现内容相同的情况。

内容的提问来源于stack exchange，提问作者BigBenne