作者waiter337 (給開司一罐蘇格登)
看板Office
標題[算表] vba 迴圈時遇到if then +1重跑迴圈
時間Mon Oct 3 04:30:19 2016
軟體:
版本:
目前寫一份自己的日期報表
aaa111:
For k = 1 To 10
bb = Range("am" & k).Value
If bb = "無" Then
??? k = k + 1
??? go to aaa111
End If
i = Range("am" & 5 + k)
j = Range("am" & 6 + k)
Range("A" & j & ":" & "aa" & i - 1).Select
next
在k=1的情況下
假設bb發現am1的格子內有 "無" 這個字時
他會取消下面 i跟 j的操作
直接回到迴圈 並且從k=2
我試過直接用next 系統說不行
???的部份我也嘗試過
但是k值會從1重新開始
好像邏輯錯誤
又或者是否要從迴圈那個面就該中止了
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.35.158.244
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1475440221.A.137.html
→ soyoso: aaa111: 標籤處移至i跟j的操作下方 10/03 07:00
→ soyoso: k=k+1取消 10/03 07:01
→ waiter337: 阿 是不是for next要改用while wend 10/03 07:19
→ soyoso: 或是將i跟j的操作,移至邏輯判斷if內,條件改為不等於 10/03 07:19
→ soyoso: 迴圈改以while wend或do loop應都可 10/03 07:22
→ waiter337: 好 我研就看看 10/03 07:26