我有以下IF語句在VBA,但「刪除」的說法,或elseif的前位的一部分,是完全可以忽略不計:第一部分是被忽略
For i = 3 To (customerNum + 3)
If Sheets("Reports").Range("L" & i).Value = "A" Then
Sheets("Reports").Range("G" & i & ":M" & i).Select
Selection.Delete Shift:=xlUp
ElseIf Sheets("Reports").Range("L" & i).Value <> "A" Then
Sheets("Reports").Range("J" & i).Value = form1_1 & i & form1_2
Sheets("Reports").Range("J" & i).NumberFormat = "d-mmm-yy"
Sheets("Reports").Range("M" & i).Value = form2_1 & i & form2_2 & i
Sheets("Reports").Range("M" & i).NumberFormat = "_-[$£-809]* #,##0.00_-;-[$£-809]* #,##0.00_-;_-[$£-809]* ""-""??_-;[email protected]_-"
End If
Next i
休息運行流暢。沒有崩潰或錯誤。
任何想法?
「完全忽略」是什麼意思?你能看到代碼在調試模式下進入If塊(Select + Delete)嗎? –
P.s.你的是一個非常基本的「If」塊,如果單元格L&i的值等於「A」,或者你輸入另一個部分,那麼你輸入Delete部分。因此,你的陳述「刪除部分完全被忽略,其餘部分順利運行」使我認爲單元格「L&i」不等於A. –
也許是'Sheets(「Reports」)。Range(「G 「&i&」:M「&i).Select'沒有選擇任何東西。 – JJF