Cells.Formula="=CONCATENATE(...)" 异常 0x800A03EC

Question

我正在编写一个生成 Excel 文件的 VB.NET 应用程序。

我的目的是编写一个在单元格中使用CONCATENATE 的特定公式。

现在，以下代码行触发上述异常：

0) tSheet.Cells(tIncRow + ItemIndex * PixelIndex + PixelIndex, 2).Formula = 
   "=CONCATENATE(" & Pixels(PixelIndex) & ";Batches!J3)"

下一行不会引发异常。 （它只是上面的行，开头没有=。它没有引发异常的事实意味着索引被正确使用；我将在以下段落中删除它们以简化符号）。另外，如果我在 Excel 中手动将 = 放在同一个公式前面，那么该公式会给出正确的结果（它正确地抓取了 Batches!J3）

1) tSheet.Cells(tIncRow + ItemIndex * PixelIndex + PixelIndex, 2).Formula = 
   "CONCATENATE(" & Pixels(PixelIndex) & ";Batches!J3)"

以下行也可以正常运行：

2) tSheet.Cells(indexes).Formula = "=CONCATENATE(" & Pixels(PixelIndex) & ")"

这条线也可以：

3) tSheet.Cells(indexes).Formula = "=CONCATENATE(Batches!J3)"

似乎只有 2) 和 3) 的组合会引发异常。

我使用的是 Visual Studio 2012、Excel 2007，并且包含 Microsoft Excel 12.0 对象库

感谢您的帮助！

Answer 1

您尚未提及您的语言环境，因此以防万一 Excel 期望参数分隔符为逗号（如在 en-UK 语言环境中）而不是分号（如在 de-DE 语言环境中），然后尝试：

tSheet.Cells(tIncRow + ItemIndex * PixelIndex + PixelIndex, 2).Formula = 
    "=CONCATENATE(" & Pixels(PixelIndex) & ",Batches!J3)"

（编辑）如果确实有效，那么您可以使用以下内容使其独立于语言环境：

Dim ci As CultureInfo = System.Globalization.CultureInfo.CurrentCulture
Dim listSep As String = ci.TextInfo.ListSeparator
tSheet.Cells(tIncRow + ItemIndex * PixelIndex + PixelIndex, 2).Formula =
    "=CONCATENATE(" & Pixels(PixelIndex) & listSep & "Batches!J3)"

这只是从 windows 文化中获取数字列表分隔符。它确实假定 Excel 使用 System.Globalization.CultureInfo.CurrentCulture 运行，请参阅以下两个 MSDN 参考以获取有关此内容的更多详细信息以及您可能遇到的特殊情况：

• Creating Excel Solutions for Use in Multiple Countries/Regions Using Visual Studio Tools for Office（尤其是“编写代码检查区域设置”部分）
• Creating Office Solutions for Use in Multiple Countries/Regions

（结束编辑）

如果这不起作用，那么我们可能需要更多信息 - 请参阅我的 cmets 关于您的原始问题。