写string（）数组，以排除空白值

是否有任何function，可以让我写一个二维string数组到Excel工作表，但只有“覆盖”Excel中的单元格，如果相应的值不是一个空string？

我有一个应用程序这样做…它从我们的数据库中提取数据，把它放在一个二维数组，并将整个数组写入一个Excel模板。 写入的列是从A到S，但在列Q中有一个当前正在被覆盖的公式，因为它不是从数据库中提取的。

我讨厌在程序中硬编码公式，所以我希望有一种方法可以完成我所要做的事情。 我唯一的想法是先尝试从工作表中读取范围，但我很想知道是否有某种function可以处理这个问题。

编辑：要清楚，这是一个VB.Net程序写入Excel。

Answer 1

编辑：写在假设这是VBA？

你可以这样做，它使用INDEX来提取列Q之后的数组的列。

 Sub Sample() Dim X 'create 2D array matching your size X = Range("A1:S10").Value2 Range("A1:P10").Value2 = X 'add 2nd last column to R Range("R1:R10").Value2 = Application.Index(X, 0, UBound(X, 2) - 1) 'add last column to S Range("S1:S10").Value2 = Application.Index(X, 0, UBound(X, 2)) End Sub