VBAでアカウント名を取得する方法

質問

ＶＢＡで処理したＥＸＣＥＬブックをデスクトップに自動保存しようとしています。ＶＢＡで現在作業中のユーザーアカウント名を自動で取得する方法を教えていただきたいのですが。

デスクトップ上にブックを保存するには、パスを記述すればよいのですが、現在ＰＣ毎にユーザーアカウントを設定しユーザー名が異なっています。
このため、ＰＣ毎にこのユーザー名をデスクトップへのパスに入れ込まなければなりません。毎回キーボードからこのユーザー名を入力する方法もありますが、自動的にユーザー名を取得し、正しいパスを指定する方法を検討しています。
どなたか、ＶＢＡでこのユーザー名を取得する方法が有れば教えていただきたいのですが。
よろしくお願いいたします。

回答No.1

bin-chan · ベストアンサー

Environ関数で、環境変数[USERNAME]を取得する。

MsgBox Environ("USERNAME")

お礼

早速の教示有り難うございます。明朝やってみます。

回答No.3

hana-hana3

ネットを探すと幾つかの方法が見つかりますよ。
ユーザー名を取得するよりも、windowsの機能を使って特殊フォルダを取得するのが良いと思います。

スペシャルフォルダを得る
http://hanatyan.sakura.ne.jp/dotnet/folder05.htm
http://www.moug.net/tech/exvba/0060052.htm
http://www.happy2-island.com/vbs/cafe02/capter00106.shtml

お礼

早速連絡有り難うございます。明朝トライしてみます。

回答No.2

bin-chan

環境変数[USERPROFILE]を拾ったほうが良いかも。
パスの中に空白を含む場合は、両端をダブルクォートで囲むようにね。

お礼

早速の連絡有り難うございます。明朝テストしてみます。