Excel VBA 求大神解释内容

求大神解释第一行If的含义,和ElseIf中 And Cells(i,j)<>" "的含义
2025-04-28 11:04:18
推荐回答(2个)
回答1:

'假设i=2,j=1 那么这段代码可以具体解释如下:

如果  {单元格A1为空值} 并且 {A2不为空 }  那么
     单元格A1的值设置为A2的值
     单元格A2的值清空
     IsCanMove的值设为True
否则如果 {单元格A1的值等于单元格A2的值} 并且 {单元格A2不为空} 那么
     单元格A1的值设置为A2的值的2倍
     单元格A2的值清空
     IsCanMove的值设为True
结束if判断

'这段代码是通过比较同一列中本行的值与上一行的值,根据结果进行一定的操作。

回答2:

如果上一单元格为空且当前单元格不为空时,将当前单元格数据上移至上一单元格,并将“iscanmove”设为真;
如果上一单元格与当前单元格相等且不为空时,将两单元格累加后放在上一单元格,并清空当前单元格,并将“iscanmove”设为真;