開発時によく使う処理です。
設定を可変にしたい場合など、ユーザー目線に立った開発を心掛けています。
ループ処理を可変で行う
上記のようにB列から最終列まで何かの処理をしたい場合があります。
今回は「テスト1」「テスト2」「テスト3」の3つだけですが、
今後増えたり、減ったりする可能性は否定できません。
わざわざ、そのような追加修正(費用もらったとしても)は無駄だと思うので、
当方ではユーザー目線に沿った開発をします。(費用もらったとしても面倒ともいう)
ループ処理を可変で行うサンプルコード
Dim c As Long
For c = COL_START To Call_LastColWs(ROW, ws)
'実際にしたい処理を記載する
Next
注意点
- 上記コードは変数部分はきちんと指定をしているわけではありません。
- 使いたいように入力をしてください。
- Call_LastColWsはこちらの記事参照。
コメント