読者です 読者をやめる 読者になる 読者になる

t-hom’s diary

主にVBAネタを扱っているブログです。

VBA 定数も一度に宣言できる

知っている方からすると、いまさら何をという話かもしれないが、私は定数がカンマ区切りで一度に宣言できることをさっき知った。

これまで定数は以下のように個別に宣言していた。

Const 行数 As Long = 100
Const 列数 As Long = 50
Const 実行回数 As Integer = 4
Const 対象モジュール As String = "出力シート"
Const 画面更新 As Boolean = False
Const 自動計算 As Boolean = False
Const 詳細出力 As Boolean = False

それで、モジュール分割する際にPublicをつける羽目になったが、一つずつPublicをつけるのは面倒くさい。

ひょっとして、Dimと同じようにカンマで一度に宣言できるのでは。。

Const 行数 As Long = 100, 列数 As Long = 50

できた。
考えてみればDimで普段やっていることを、Constで今まで思いつかなかったことが不自然だ。

これで、以下のようにPublic Const宣言は1か所にまとめることができた。

Public Const _
    行数 As Long = 100, _
    列数  As Long = 50, _
    実行回数  As Integer = 4, _
    対象モジュール  As String = "出力シート", _
    画面更新 As Boolean = False, _
    自動計算 As Boolean = False, _
    詳細出力 As Boolean = False


ただ全部まとめてしまうのも考え物で、ある程度グルーピングはした方が良いかもしれない。

'===シート定義===
Public Const _
    対象モジュール  As String = "出力シート", _
    行数 As Long = 100, _
    列数  As Long = 50
    
'===ベンチマーク設定===
Public Const _
    実行回数  As Integer = 4, _
    画面更新 As Boolean = False, _
    自動計算 As Boolean = False, _
    詳細出力 As Boolean = False

以上。

当ブログは、amazon.co.jpを宣伝しリンクすることによってサイトが紹介料を獲得できる手段を提供することを目的に設定されたアフィリエイト宣伝プログラムである、 Amazonアソシエイト・プログラムの参加者です。