[已解决]求助在线等！

liming1614 · 发表于 2012-2-29 11:01

zjcat35 发表于 2012-2-29 09:42
你按ALT+F11，另外你可以百度下VBA代码怎么用
既然你不知道VBA代码是什么，你自己修改，可能性不大吧 ...

新数据.rar (2.11 KB, 下载次数: 9)

liming1614 · 发表于 2012-2-29 11:01

本帖最后由 liming1614 于 2012-2-29 11:41 编辑

Next i
ReDim arr(1 To m)
For j = 1 To m
      For i = 3 To k
         If Cells(i, 1) = arr1(j, 1) And Cells(i, 2) <> "" Then
            x = x + 1
            ReDim Preserve ar(1 To x)
            ar(x) = Cells(i, 2)
         End If
      Next i
      arr(j) = Join(ar, "、")
      x = 0
      Erase ar
Next j
这段代码什么意思？解释下哦,里面的I J代表哪一列？

tayisha · 发表于 2012-2-29 11:48

都是高手{:021:}{:021:}

liming1614 · 发表于 2012-3-1 20:30

5blessyou 发表于 2012-2-28 12:14
没有人抢答
C3输入记得区域要多引用一行
然后B15输入

=B3&IF(COUNTIF(A4:$A$13,A3),IF(OR(VLOOKUP(A3,A4:$F$13,2,)="",B3=""),"","、")&VLOOKUP(A3,A4:$F$13,3,),"") 这个代码中$F$13,2和$F$13,3,为什么是F列？什么原因？

ljzzlan · 发表于 2012-3-1 20:38

学习!

		自动登录	找回密码
密码			注册

[已解决]求助 在线等！

[已解决]求助在线等！