淘客网站怎么做 知乎郑州优化网站关键词
Sub hb()Dim nn = 3For i = 3 To 18If Range("b" & i) <> Range("b" & i + 1) ThenRange("b" & n & ":b" & i).Mergen = i + 1End IfNextEnd Sub
Sub hb()Dim nn = 3For i = 3 To 18If Range("b" & i) <> Range("b" & i + 1) ThenRange("b" & n & ":b" & i).Mergen = i + 1End IfNextEnd Sub