Re: [VBA]請問這樣多重迴圈邏輯應該怎麼寫

看板Visual_Basic作者 (lkk)時間12年前 (2013/07/30 11:37), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串2/2 (看更多)
※ 引述《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

07/30 11:52, , 1F
真感謝..我想破頭..原來只要這麼簡單的方式...
07/30 11:52, 1F
文章代碼(AID): #1HzpKJi7 (Visual_Basic)
文章代碼(AID): #1HzpKJi7 (Visual_Basic)