【今雑】今瞬間的に思ったことで雑談するスレ122

【今雑】今瞬間的に思 ..

500:ZiyNiy
18/06/24 22:06:10.85 0.net
>>488
とりあえずLooｐ処理バージョン
Sub tesMacro()
Dim i As Integer
i = 14
Do While i < 24
If Cells(i, 4) >= Range("H6") And Cells(i, 4) <= Range("K6") And 改行
Cells(i, 5) >= Range("I6") And Cells(i, 5) <= Range("L6") And 改行
Cells(i, 6) >= Range("J6") And Cells(i, 6) <= Range("M6") Then　改行
Cells(i, 7).Value = ""
Else
Cells(i, 7).Value = "範囲外"
End If
i = i + 1
Loop
End Sub

次ページ

続きを表示

1を表示