我有一个代码:
For i = 1 To fRow
ali = wbTarget.ActiveSheet.Cells(i, 14).Value
For j = 1 To fRow
If nwb.Sheets(1).Cells(j, 3).Value = ali
究竟发生了什么:
问题是:
非常感谢你!
答案 0 :(得分:2)
更改
If nwb.Sheets(1).Cells(j, 3).Value = ali
要
If nwb.Sheets(1).Cells(j, 3).Value = ali Or _
nwb.Sheets(1).Cells(j, 3).Value Like ali & "*" Then