こんにちは。Excel VBA講師の佐藤です。
日々の業務自動化を進める中で、「今ログインしているユーザー名は誰か？」「デスクトップのパスはどこか？」といった、PCの環境情報が必要になる場面は非常に多いですよね。そんな時、皆さんはどのようにしてこれらの情報を取得していますか？
APIを呼び出したり、FileSystemObject（FSO）を多用したりするのも一つの手ですが、実はVBAにはもっと手軽で強力な標準関数が存在します。それが今回解説する「Environ関数」です。
この関数を使いこなせば、コードが短くなるだけでなく、環境に依存しない柔軟なツール作成が可能になります。ベテランの視点から、その仕組みと実践的な活用法を余すところなく解説します。
Environ関数とは何か？
Environ関数は、オペレーティングシステム（OS）が管理している「環境変数」の値を取得するためのVBA標準関数です。
環境変数とは、WindowsなどのOSが実行中のプロセスに対して提供している設定情報のことで、ユーザー名、コンピュータ名、OSのバージョン、システムディレクトリの場所などが格納されています。
VBAでの構文は非常にシンプルです。
‘ 構文
Environ(環境変数名 または インデックス番号)
引数に「環境変数名（例: “USERNAME”）」を渡せばその値が返り、数値を渡せば「n番目の環境変数」の値が取得できます。まずは、最も頻繁に使う「環境変数名」による取得方法をマスターしましょう。
主要な環境変数と取得の具体例
開発現場でよく使われる環境変数をいくつかリストアップしました。これらを知っているだけで、マクロの汎用性が劇的に向上します。
– **USERNAME**: 現在Windowsにログインしているユーザー名
– **COMPUTERNAME**: PCのホスト名
– **USERPROFILE**: ユーザーのプロファイルフォルダのパス
– **TEMP**: 一時ファイルが保存されるフォルダのパス
– **OS**: OSの種類（Windows_NTなど）
– **PROCESSOR_ARCHITECTURE**: プロセッサのアーキテクチャ（AMD64など）
例えば、デスクトップのパスを取得したい場合、VBAでは通常「WScript.Shell」オブジェクトを使うのが定石ですが、環境変数を使えば以下のように書くことも可能です。
Sub GetDesktopPath()
Dim desktopPath As String
‘ USERPROFILEからデスクトップパスを推測する例
desktopPath = Environ(“USERPROFILE”) & “\Desktop”
MsgBox “デスクトップのパスは: ” & desktopPath
End Sub
Environ関数を使うメリットと注意点
なぜ他の手法ではなくEnviron関数を使うべきなのでしょうか。
最大のメリットは「準備が不要」な点です。オブジェクトの生成（CreateObject）が不要であるため、メモリ消費が少なく、コードの記述も非常に短くなります。また、OS標準の機能に直接アクセスするため、動作も高速です。
一方で、注意点もあります。環境変数はユーザーが自由に書き換えられる可能性があるため、セキュリティ上重要な判定（「このユーザーしか実行できない」といった制限）に使うのは避けるべきです。あくまで「パスの自動取得」や「ログ出力時の端末識別」といった補助的な用途に留めるのが、プロフェッショナルの作法です。
全環境変数を一覧表示するテクニック
「今の環境にはどんな変数が定義されているのだろう？」と気になったことはありませんか？実は、Environ関数に数値を渡すことで、定義されているすべての環境変数をループで取得することができます。
以下のコードを実行すると、イミディエイトウィンドウにすべての環境変数と値が出力されます。
Sub ListAllEnvironVariables()
Dim i As Integer
Dim envString As String
i = 1
Do
envString = Environ(i)
If envString = “” Then Exit Do
Debug.Print envString
i = i + 1
Loop
End Sub
このコードを実行すると、「USERNAME=Sato」のような形式で、システム内のすべての情報が一覧化されます。デバッグ時や、新しいPC環境でのツール開発時に非常に役立ちます。
実務で差がつく！「環境依存」を排除するコード設計
多くの初心者が陥る罠が、コード内に「C:\Users\Sato\Desktop\…」のように、特定のユーザー名を含んだ絶対パスをハードコーディングしてしまうことです。これでは、別の人がそのファイルを開いた瞬間にエラーが発生してしまいます。
Environ関数を使えば、誰が使っても正しく動作する「環境非依存」なコードが書けます。
‘ 悪い例：特定のユーザーに依存している
‘ Workbooks.Open “C:\Users\Sato\Desktop\Data.xlsx”
‘ 良い例：環境変数を使ってパスを動的に生成
Dim filePath As String
filePath = Environ(“USERPROFILE”) & “\Desktop\Data.xlsx”
Workbooks.Open filePath
このように、環境変数を活用することで、配布先の環境を問わない堅牢なExcelツールを作成できるのです。
まとめ：Environ関数はVBAエンジニアの武器
Environ関数は、派手な機能ではありませんが、システムとVBAの橋渡しをする重要な役割を担っています。
1. **Environ(“変数名”)** で特定の情報を取得する。
2. **Environ(i)** でシステムの状態を調査する。
3. **パスのハードコーディングを避ける**ために積極的に活用する。
この3点を押さえるだけで、あなたの書くVBAコードは一気にプロフェッショナルなレベルへと引き上げられます。ぜひ、今日作成しているマクロのパス指定部分を見直してみてください。
もし、「もっと複雑なシステム情報を取得したい」「特定の環境変数が存在しない場合のハンドリングはどうすればいいか」といった疑問があれば、いつでもコメント欄で教えてくださいね。
それでは、次回の記事でも、現場で即戦力となるテクニックを伝授します。ハッピー・コーディング！
