普段のVBA業務でこんな風なプログラムを組んだことはありませんか?? Sub CommandButton1_Click() 'ボタンクリック時 Dim i As long With Worksheets("Sheet1") For i=1 to 100 If .cells(i,1) = "OK" then’もしセル内がOKの場合 .cells(i,2) = "OKです" else .cells(i ...