作业帮 > 综合 > 作业

EXCEL A列数值相同的 让对应B列值也相同

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/18 21:29:04
EXCEL A列数值相同的 让对应B列值也相同
如图所示,A列很多值相同(相邻),B列有些有值,有些没有,要求处理后A列相同的,对应B列全部赋上相同值.PS.A列有9000+个单元格,在0到400循环,循环之间有重复的情况!请避免A列循环间的数值相同的情况.
恩.尤其“小程序员0618” 邮件给我改了两次,基本上是接近完美答案了!在此再次表示感谢!而答案呢“wjp456789”给出的其实是正解,经过几次验证确实是最快捷方便的方法,前提是你是I7电脑!本人酷睿2-P8800的计算机算了10分钟,EXCEL还是假死状态!换了台I7,用了5分多钟算出了全部答案.= =|||险些错过了正解,再次拜谢了.
Sub a()
Dim i&, j&
For i = 1 To [a65536].End(xlUp).Row
    If Cells(i, 2) = "" Then
        For j = 1 To [a65536].End(xlUp).Row
            If Cells(i, 1) = Cells(j, 1) And Cells(j, 2) <> "" Then
               Cells(i, 2) = Cells(j, 2)
            End If
        Next j
    End If
Next i
End Sub
再问: If Cells(i, 1) = Cells(j, 1) And Cells(j, 2) "" Then 执行这句EXCEL就牺牲了