VBAテクニック集 VBA一覧 変数・知識 文法・構文

【VBA】Const（定数）の使い方｜実務で役立つ宣言方法を徹底解説

Excel VBA を書いていると、繰り返し使う値や設定値が何度も登場することがあります。たとえば「初期フォルダ名」「税率」「閾値」「シート名」「ファイル名」など、実務では“変わらない値”が多く存在します。それらを毎回コード内に直接書き込んでしまうと、修正が必要になった時に複数箇所を探して手作業で直す必要が出てきてしまい、ミスやバグの原因にもなります。

こうした問題を解決するのが Const（定数） です。Const を正しく使うと、コードの保守性が大きく向上し、実務のマクロ開発が驚くほど楽になります。また、複数人で共有するマクロ、部署全体で使うツール、RPA や ChatGPT が生成するコードの品質改善にも大きく効果があります。

この記事では、Const の基本から、実務で使われる宣言方法、モジュールレベル・プロシージャレベルの使い分け、注意点、複数環境への展開方法まで、初心者でも確実に理解できるように解説します。

目次

✅ Const（定数）とは？変わらない値を管理するためのキーワード

・Const の基本定義

Const は「変わらない値（定数）」を宣言するためのキーワードです。

Const 税率 As Double = 0.1

一度設定した値は、コードの中で書き換えることはできません。

・Const を使うメリット

  • 値を一元管理できる
  • コードの可読性が向上
  • 修正が容易になる
  • バグが減る
  • 意図しない上書きを防げる

実務マクロでは非常に重要なテクニックです。

✅ Const の基本的な宣言方法（プロシージャ内）

・最も基本的な書き方

Sub Sample()
    Const TAX As Double = 0.1
    MsgBox 1000 * (1 + TAX)
End Sub

プロシージャの内部に Const を書いた場合、その Sub／Function の中でだけ有効です。

・使えるデータ型一覧

Const で宣言できる型には制約があります。

使える型

  • Integer
  • Long
  • Single
  • Double
  • Currency
  • String
  • Boolean
  • Date

使えない型

  • Variant
  • Object
  • Range
  • Dictionary
  • 配列

定数は「純粋な値」を表すものなので、オブジェクトは宣言できません。

参考：【VBA】Dimとは？変数宣言の基本と書き方をわかりやすく解説｜初心者でも実務で使える知識を解説

❗ Const は“変更不可”という重要な特徴を持つ

・再代入はできない

Const TAX As Double = 0.1
TAX = 0.2   ' → エラー

変更しようとするとコンパイルエラーになります。

❗ Const と Dim の違いを理解する

キーワード内容値の再代入主な用途
Dim変数の宣言可処理中で変わる値
Const定数の宣言不可固定値・設定値

参考：【VBA】Option Explicitとは？変数未宣言エラーを防ぐ基本設定｜初心者必見重要機能



✅ モジュールレベル（Public/Private Const）を使う方法

Const はプロシージャ内だけでなく、モジュールの先頭に書くこともできます。

・モジュール内だけで有効（Private Const）

Private Const SHEET_NAME As String = "売上"

同じモジュール内であればどの Sub からも使えます。

・プロジェクト全体で有効（Public Const）

Public Const FILE_PATH As String = "C:\Data\"

複数のモジュール間で共通値を使いたい場合に適しています。

・実務でよく使う Public Const の例

  • データフォルダのパス
  • ログの保存先
  • 初期表示するシート名
  • メール送信先
  • 共有環境の設定値

特に、部署全体で使う Excel アプリでは Public Const が重宝されます。

❗ Const を置く場所によってスコープが変わる（重要）

宣言場所有効範囲使用例
プロシージャ内そのSub/Function内税率・端数処理
モジュール先頭（Private）そのモジュール内共通処理のパラメータ
モジュール先頭（Public）プロジェクト全体初期フォルダ、アプリ設定

🔍 実務でよくある Const の活用パターン

・パターン①：フォルダパスの一元管理

Public Const DATA_FOLDER As String = "C:\Users\xxx\Data\"

フォルダが変わっても、ここだけ修正すれば全体に反映されます。

・パターン②：初期シート名の管理

Private Const SHEET_MAIN As String = "TOP"

・パターン③：税率や基準値の管理

Const TAX As Double = 0.1
Const LIMIT_VALUE As Long = 1000

・パターン④：メッセージの統一

Public Const MSG_ERROR As String = "エラーが発生しました。"

メッセージ文言を複数箇所に書く必要がなくなります。

・パターン⑤：正規表現パターン

Private Const PATTERN_ZIP As String = "\d{3}-\d{4}"

☑ Const を使うべきタイミング

● 1つの値を複数のSubで使う時

→ Public Const を使う

● 1つの値を1モジュール内で使う時

→ Private Const を使う

● Sub内だけで完結する値

→ Sub内 Const

❗ Const を使う時の注意点

・注意①：文字列の前後にスペースが含まれると意図せぬ動作

Const FOLDER = "C:\Data "

最後のスペースに気付かないとエラーの原因になります。

・注意②：ファイルパスの最後に「\」が必要か検討

Public Const PATH = "C:\Data\"  ' OK

・注意③：環境ごとに値が変わる場合は分岐も検討

#If VBA7 Then
    Public Const SYSTEM = "64bit"
#Else
    Public Const SYSTEM = "32bit"
#End If

環境依存値も管理できます。

・注意④：ConstはVariant不可

Variant で宣言したい場合は Enum を使う方が適切です。

🔧 Const と Enum（列挙型）を併用するとさらに便利

Const が増えてくると管理が大変になるため、Enum が役立ちます。

Public Enum STATUS
    READY = 0
    RUNNING = 1
    ERROR = 2
End Enum

複数の関連する値をひとまとめにできます。

🧰 ChatGPT と併用する場合の注意点

ChatGPT が生成するコードは以下の特徴があります：

  • 固定値をハードコーディング（Const未使用）
  • パスがベタ書きされて管理されていない
  • メッセージ文字列が複数箇所で重複

これらはすべて Const で改善できます。

🧠 RPA（UiPath・PAD）との連携でも Const は重要

  • ExcelマクロをRPAから呼び出す
  • ログ保存先をConst化
  • ファイル名ルールをConstで管理
  • 開発環境と本番環境で Const を切り替え

RPAの安定性向上につながります。

【実例】Const を活用した実務的なサンプルコード

▼例①：フォルダパス管理

Public Const FOLDER_OUTPUT As String = "C:\Output\"

Sub ExportData()
    Dim file As String
    file = FOLDER_OUTPUT & "result.csv"
    Debug.Print file
End Sub

▼例②：端数処理の統一

Const TAX As Double = 0.1
Const ROUND_TYPE As Long = vbRoundNearest

Sub Calc()
    Dim v As Double
    v = 1000 * (1 + TAX)
    MsgBox Round(v, 0, ROUND_TYPE)
End Sub

▼例③：メッセージを一元管理

Public Const MSG_NOTFOUND As String = "ファイルが見つかりません。"
Public Const MSG_COMPLETE As String = "処理が完了しました。"

▼例④：正規表現パターンを定数化

Private Const ZIP_PATTERN As String = "\d{3}-\d{4}"

【失敗例】Const を使わなかったせいで発生しがちなトラブル

・トラブル①：ファイルパスの修正漏れ

コードA："C:\Data\"
コードB："C:\Data2\"（誤字）

・トラブル②：メッセージ文言がバラバラ

「完了しました」
「処理完了」
「完了です」

統一できていないとユーザー体験が悪化。

・トラブル③：値が変わった時にすべて修正が必要

税率が変更された時など、Const で管理していないと地獄。

🔚 Const を使いこなすと “実務レベルのVBA” にレベルアップできる

Const を正しく使えるようになると、次の効果があります：

  • コード変更が1箇所で済む
  • マクロが壊れにくくなる
  • 可読性が向上
  • 保守性が劇的に改善
  • 他者にとっても理解しやすい
  • AI生成コードの品質補強に役立つ

VBA での定数管理は実務で非常に重要なスキルです。

✅ まとめ：Const は“変わらない値”を管理する最強の仕組み

  • Const は「変化しない値」を管理する仕組み
  • 値の変更を禁止できるためコードが安定
  • プロシージャ・モジュール・プロジェクト単位で使い分ける
  • ハードコーディングを避けられる
  • 実務ではフォルダ・シート名・メッセージ・設定値の管理が中心
  • RPA・ChatGPT との連携でも効果大

定数管理を習得すると、Excel マクロ開発が一気に楽になり、信頼性の高いツールを作れるようになります。

    -VBAテクニック集, VBA一覧, 変数・知識, 文法・構文