Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/27.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
VBA Excel-矩形网格数据列_Vba_Excel - Fatal编程技术网
Fatal编程技术网
  • vba/
  • VBA Excel-矩形网格数据列

VBA Excel-矩形网格数据列

vba excel

VBA Excel-矩形网格数据列,vba,excel,Vba,Excel,我希望能够将数据的矩形网格重新排序到列中。我已经编写了一些代码并运行了一些MsgBox来测试一些东西，它似乎工作正常，除了最后一行。也就是说，我已经进行了测试，以确保outputArray最终包含数据和其他各种内容。但是，当我尝试将outputArray中的数据写入工作表时，它只会输入所有空格（我有一个以前的版本，它不会自动删除原始数据，所以我可以看到第一列被清空）。我想这是一个我看不出来的简单错误。你能帮我弄清楚怎么了吗？（Excel 2010） 您正在寻找的一个容易犯的错误是，输出数组缺少明

我希望能够将数据的矩形网格重新排序到列中。我已经编写了一些代码并运行了一些MsgBox来测试一些东西，它似乎工作正常，除了最后一行。也就是说，我已经进行了测试，以确保outputArray最终包含数据和其他各种内容。但是，当我尝试将outputArray中的数据写入工作表时，它只会输入所有空格（我有一个以前的版本，它不会自动删除原始数据，所以我可以看到第一列被清空）。我想这是一个我看不出来的简单错误。你能帮我弄清楚怎么了吗？（Excel 2010）

您正在寻找的一个容易犯的错误是，
输出数组
缺少明确的下限。将
ReDim
更改为

ReDim outputArray(1 To totalCells, 1 To 1)
没有这个
outputArray
被声明为基于0的，因此有一行和一列比您预期的大吗

仅供参考，
inputRange.Value=”“
的另一种替代方法是
inputRange。清除
在将数组写入工作表之前，可能需要对其进行转置
..=Application.Transpose（outputArray）
@Tim，不是这样的，For
循环的
迭代范围刚刚好您是正确的，先生，它现在工作得很好。非常感谢！

ReDim outputArray(1 To totalCells, 1 To 1)