お疲れ様です。
データーを高速に処理するプログラムに改良するため、
セルをループで人る一つ見るのではなく、オブジェクト変数を使った方が高速に処理できるとのことで、オブジェクト変数を勉強しております。
そこで、簡単に以下の処理を書いてみましたが、正しいでしょうか?
処理内容としては、A1~E20のセルにランダムにデーターが入っっており、
空白セルを見つけたら、"-"を入れるという処理です。
一応、意図した通りの動作はしておりますが、果たして正しいのかどうなのか
判断がつかず、自身がもてません。
vba
1Sub test1() 2 3 Dim Area As Range 'A1~E20の範囲を格納 4 Dim null_Cell As Range 5 6 Set Area = Range("A1", "E20") 7 8 For Each null_Cell In Area 9 If null_Cell = "" Then 10 null_Cell = "-" 11 End If 12 Next 13End Sub
どなたかアドバイス、改善点等ご教授下さい。
回答2件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
退会済みユーザー
2017/01/13 22:42