素人がExcelVBAによる「一人働き方改革」に挑むブログスマートフォン用の表示で見る素人がExcelVBAによる「一人働き方改革」に挑むブログExcelVBAネタです。定数は便利な仕組みだが、オブジェクト型の定数は指定できないっぽい。Range型の定数を定義しようとしてみる標準モジュールの宣言セクションに、次のように書いてみる。[Enter]を押してみると、こんな風に、コンパイルエラーっぽい状態になる。エラーメッセージは出ていない。この状態で、次のコードを実行してみる。Subすると、ここでコンパイルエラー。Range型の定数というのは無理っぽい。Sheet7.Range("A1")としても駄目だった。Propertyを使う処理の中で基準にするセルなど、特定のRangeオブジェクトを定数みたいにしておくことができたら便利。Propertyを使うことを考えた。Sheetモジュールに次のコードを書く。Propertyたったこれだけ。Sheet7のBASE_CELLプロパティにA1セルを指定。あ、Sheet7の「7」に深い意味はありませんよ。テスト用ブックのワークシートが増えすぎているだけのことですので。読み取り専用なので、定数っぽく使えると思う。使ってみる次のコードで実行。SubSheet7はこの状態なので、当然、実行すると、イミディエイトにこんな風に表示される。おわりに各シートのPropertyにすることで、各シートのモジュールにコードを書くことになるので、それぞれのシートの中で独特の役割を持ったセルやセル範囲を一括管理しやすくなると思う。»プロフィールid:akashi_keirinExcelVBAネタです。SyntaxHighlighter.all();注目記事はてなブログをはじめよう!akashi_keirinさんは、はてなブログを使っています。ブログを報告するスターをつけました引用をストックしましたストック一覧を見る閉じる引用するにはまずログインしてくださいログイン閉じる引用をストックできませんでした。再度お試しください閉じる限定公開記事のため引用できません。