5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

Excel VBA 質問スレ Part18

32 :デフォルトの名無しさん:2011/02/24(木) 20:37:23.79
B7からK19までを一行おきに色を付けたいと思い下の通りに
作ったのですがうまくいきません;;どこが間違っているか教
えて下さい。宜しくお願いします。

Sub test()
For CellGyo = 7 To 19 Step 1
Range("B" & CellGyo & ":" & "K" & CellGyo).Select
Selection.Interior.ColorIndex = 34
Next CellGyo
End Sub


294 KB
★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.00 2017/10/04 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)