Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/24.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
Excel VBA从数据转储连接多个范围_Excel_Vba_For Loop_Concatenation - Fatal编程技术网

Excel VBA从数据转储连接多个范围

Excel VBA从数据转储连接多个范围,excel,vba,for-loop,concatenation,Excel,Vba,For Loop,Concatenation,我的目标是根据作为工作表添加到工作簿中的文件,将两个单元格区域相互连接,并有条件地再添加一段字符串 第一个范围从单元格C2开始,到列AF的最后一行结束。 要连接的单元格始终位于同一行,右侧为31个单元格 如果原始单元格的前两个数字>=22或 这两行是不正确的语法。当您将k=3的写入k=LastRw时,对于k=3的写入False或对于k=3的写入0,因此循环将永远不会运行。这需要: For k = 3 To LastRw For l = 2 To 33 如果您没有进行过控制台调试,则可能需

我的目标是根据作为工作表添加到工作簿中的文件,将两个单元格区域相互连接,并有条件地再添加一段字符串

第一个范围从单元格C2开始,到列AF的最后一行结束。 要连接的单元格始终位于同一行,右侧为31个单元格

如果原始单元格的前两个数字>=22或 这两行是不正确的语法。当您将k=3的
写入k=LastRw
时,对于k=3的
写入False
或对于k=3的
写入0
,因此循环将永远不会运行。这需要:

For k = 3 To LastRw
   For l = 2 To 33

如果您没有进行过控制台调试,则可能需要从控制台调试开始。使用CTRL+G在IDE中打开“即时窗口”,然后在特定位置添加诸如debug.print“whatever”或debug.print i之类的行。这些将在代码运行时打印到控制台,让您查看是否执行。我将在有问题的if语句及其else之后添加
debug.print“if bla true”
。控制台将指示触发的逻辑。这同样适用于计数器,例如(或
debug.print“k=“&k
”(或
debug.print“LastRw=“&LastRw
)或其他东西,以验证它们是否符合您的期望。)
适用于k=3到k=LastRw
-这看起来不正确。对于k=3到LastRw,这应该是
。与下一行相同-对于l=2到33,应该是
For k = 3 To k = LastRw
   For l = 2 To l = 33
For k = 3 To LastRw
   For l = 2 To 33