作者tsongs (lkk)
看板Visual_Basic
标题Re: [VBA]请问这样多重回圈逻辑应该怎麽写
时间Tue Jul 30 11:37:52 2013
※ 引述《zchien (小建)》之铭言：
错的地方明显是COUNT计算的地方
不过你根本不需要COUNT这参数
: count = 1
: For n = 2 To Sheet2_Row
: For m = 1 To Sheet1_Row
: If Sheet2资料(n) = Sheet1资料(m) Then
: For k = 1 To i - 1
: If Sheet2时间(k) = Sheet1时间(m) Then
: Worksheets("sheet2").Cells(n, k + 1) = count
改成 sheet2.cells(n, k + 1)=sheet2.cells(n, k + 1)+1
COUNT拿掉 简单不会出错
: count = count + 1
: End If
: Next k
: End If
: Next m
: count = 1
: Next n
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 1.162.162.142
1F：推 zchien:真感谢..我想破头..原来只要这麽简单的方式... 07/30 11:52