複数のパソコンでユーザー名を取得する方法

前へ 次へ
このQ&Aのポイント
  • 複数のパソコンで、異なるOSやバージョン、32ビットと64ビット環境でExcelのVBAを使用しているユーザー名を取得する方法について調べています。
  • 参考になる情報としては、以下の2つのページを見つけました。 - [OKWaveの質問ページ](http://okwave.jp/qa/q1473823.html) - [Microsoft Answersの投稿ページ](http://answers.microsoft.com/ja-jp/office/forum/office_2007-excel/excel%E3%81%A7win732bitos%E3%81%8B64bitos%E3%82%92/951ca707-4eb1-4751-8050-a2968e3cd788?msgId=41267a56-79a8-4889-a890-e2161e422a5b&page=1&tm=1358751003959&tab=AllReplies) これらの情報を参考にすることで、ユーザー名の取得方法についての基礎知識を得ることができます。
  • もしもっと良いページや方法がある場合は、別の質問サイトやオンラインコミュニティを探すことをおすすめします。そこでは、より詳細な情報や他のユーザーの経験を共有することができます。また、VBAのユーザーグループやオンラインフォーラムを利用することも有益です。
回答を見る
  • ベストアンサー

複数のパソコンで、ユーザー名を取得したく

複数のパソコンで、違うＯＳ／違うバージョンのOFFICE／32BIT・64BITも違う中で、ＥxcelのVBA　でログインしているユーザー名を取得したくて、 http://okwave.jp/qa/q1473823.html と http://answers.microsoft.com/ja-jp/office/forum/office_2007-excel/excel%E3%81%A7win732bitos%E3%81%8B64bitos%E3%82%92/951ca707-4eb1-4751-8050-a2968e3cd788?msgId=41267a56-79a8-4889-a890-e2161e422a5b&page=1&tm=1358751003959&tab=AllReplies を参考にしようと思っていますが、この2つのページで良いですか？もっと良いページは有りますか？もっと良い方法は有りますか？

質問者が選んだベストアンサー

  • ベストアンサー
  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.1

良い方法と言うか簡単なのは、Environ 関数で取得する方法です。 イミディエイトウィンドウで、 ?environ("username") でEnterキーで確認してみてください。 ヘルプにも載ってますが、環境変数の値を返します。 コマンドプロンプトで、set と打ち込めば確認できます。 ?environ("computername") とかも使ってます もちろん、Mac には対応してません (^^ゞ

kichi4182
質問者

お礼

ありがとうございます。こんな簡単な事だったのですね。ネット検索で探し出せませんでした。下手なんですね（笑） 参考にさせて頂きます。

その他の回答 (1)

回答No.2

安直な方法としては、ユーザ名を含むフォルダパスからユーザ名を切り出すことができる。 利用できるのは、Application.UserLibraryPath以外にもあるようだが、パス名のデリミタ￥でSplitすれば、ユーザ名は簡単に取り出せる。例えば、 Dim xPath As Variant xPath = Split(Application.UserLibraryPath, "\") XPならこの配列データの３番目がユーザ名、ということになる。 OSのビットエディション？、関係ないでしょう、、、

kichi4182
質問者

お礼

ありがとうございます。参考にさせて頂きます。

kichi4182
質問者

補足

http://okwave.jp/qa/q1473823.html こちらの方法でやろうとした時に　64bitだとエラーが出たので、if文で分岐させようと思ったのですが．．．．．

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. その他MS Office製品

関連するQ&A

  • ~$ファイル名.doc　とは？

    ワード2003のですが、 ワードのファイル「ファイル名.doc」を開くと、その「ファイル名.doc」と同じフォルダに 「~$ファイル名.doc」というファイルが出来るのですが これはなんでしょうか？ エクセルも開いていますが、エクセルにはそんなファイルはできません。 ~$ファイル名.docを開こうとすると 「コンバータMSWRD632.WPCを起動できません」が表示されます。 ネットで検索したら http://answers.microsoft.com/ja-jp/office/forum/officeversion_other-word/%E3%82%B3%E3%83%B3%E3%83%90%E3%83%BC%E3%82%BFmswrd/dbe9def4-3068-49c8-9043-e8d08d9a3250?tab=AllReplies の記事を見つけたのですが ワードのファイルは通常通り開けるので 特に対策は必要ないのでしょうか？

  • Windows7 デバイスマネージャーが真っ白です

    Windows7なのですが、デバイスマネージャーを表示しようと思ったのですが、真っ白でなにも表示されません。 自分で調べましたところ、http://answers.microsoft.com/ja-jp/windows/forum/windows_7-hardware/%E3%83%87%E3%83%90%E3%82%A4%E3%82%B9%E3%83%9E/c4589a83-d84f-45e2-8431-0dd2e5eaecac?msgId=f1a0f2fd-c38a-4254-9f1e-5554ddc8f2ab このサイト通りにしましたが、最後のところで質問者同様、ダメでした。 どうすればよいのでしょうか？ また、こうなったのはウイルスですか？

  • [Word]XMLデータ構造の作業ウィンドウ

    Word2003で掲題のウインドウを開く方法について教えて下さい。 2010は、方法が記載されているものがありましたが、2003については発見できませんでした。 表示方法について、教えていただけないでしょうか。 ●2010での表示方法 http://answers.microsoft.com/ja-jp/office/forum/office_2010-word/word/a4c63479-2e47-4e87-a104-0109b162b21f

  • 動くクリップアートがループ再生されない

    中を見ていただきありがとうございます Windows7でPowerPoint2010を使っています。 これまでのPowerPointでは、動くクリップアート（webアニメーション） をスライドに挿入してプレゼンテーションを走らせると、 挿入したクリップアートがループ再生されていました。 しかし、PowerPoint2010では、1回しか再生されないものがあります。 例えば、「webアニメーション　ひよこ　孵化」で検索したときに出てくる ひよこのクリップアートはループ再生されるますが、 「webアニメーション　ひよこ　巣」で検索した時にでてくるものは ループ再生されません。 解決策を探したところ、以下のようなものがありましたが、 このような対症療法的なものではなく、根本的に解決する手段があれば どうかご教授ください http://answers.microsoft.com/ja-jp/office/forum/office_2010-powerpoint/win7%E4%B8%8A%E3%81%AEpowerpoint2010%E3%81%A7/775f7438-677c-e011-9b4b-68b599b31bf5?msgId=f82644fc-227d-e011-9b4b-68b599b31bf5

  • 【VBA】複数シートをWorksheetにset

    お世話になります。 Excel2010のVBAにおいて、 Worksheetオブジェクトに、複数シートの値を格納させることが出来ず困っています。 下記に詳細を記載します。 ご存知の方がいらっしゃったらご教授頂きたく思います。 ■エラー内容 　エラーNo.13　型が一致しません。 ■コード(抜粋) Public PUBLIC_objWorkBook As Workbook Public MAINSHT_MULTI As Worksheet 　Set MAINSHT_MULTI = PUBLIC_objWorkBook.Worksheets(Array("Ａ", "B", "C", "D", "E")) そもそも、これは無理なことなのでしょうか？ 別サイトで無理と言い切っていらっしゃる方はおりますが。。。。 http://answers.microsoft.com/ja-jp/office/forum/office_2003-excel/excel-vba/1046284d-7331-4b68-9e52-9a81511bed0f?auth=1 もともと実現したいことは、 worksheetオブジェクトに格納されたシートを １つのPDFに出力する(ExportAsFixedFormat)ということですが、 worksheetオブジェクトの値に関わらず、 PDF出力プログラムが１つで済むようにしたいと考えています。 どうぞ宜しくお願い致します。

  • フォルダ内でファイルの並べ替えは出来ますか？

    こんばんは。 下記ページをそれぞれ試してみても出来ませんでした。 2つのページでは、作成するModeの値のデータが違います。上URLのバッチファイルも試してみました。 http://fix0.net/?p=22 http://news.mynavi.jp/column/windows/112/ PC環境は、最下の方とproの違い以外は同じですが、この方はこの質問一行上のURLで解決されたようです。 同じことをしてから 「表示」 を展開しても、新たに「自動整列」 「等間隔に整列」 が加わっていません。 http://answers.microsoft.com/ja-jp/windows/forum/windows_7-files/%e3%83%95%e3%82%a1%e3%82%a4%e3%83%ab%e3%82%92/f3857646-09d0-4aca-876f-dd648ff72e68?page=2&msgId=e65bf005-8287-4917-a84a-1bdd01e228dc DWORDとする手順で、「DWORD（32ビット値）値（D）」 「QWORD（64ビット値）値（Q）」 の2つが有りました。 DWORD（32ビット値）値（D）で作成しましたがWin7 - 64ビットでは、QWORD（64ビット値）値（Q）を選ぶものなのか、さっぱり分かりません。 レジストリは、必要で有れば変更していますので、危険性どうこうは流していただいて、分かる方、宜しくお願いします。

  • 2013 ラベル印刷ウィザードが見当たらない！

    Microsoft Excel ラベル印刷ウィザード https://support.office.microsoft.com/ja-jp/article/Microsoft-Excel-%e3%83%a9%e3%83%99%e3%83%ab%e5%8d%b0%e5%88%b7%e3%82%a6%e3%82%a3%e3%82%b6%e3%83%bc%e3%83%89-91219923-de0d-40b2-a4c2-ace46c59725b?CorrelationId=ad8dd331-17b5-43b5-ae1a-c6515d7907f7&ui=ja-JP&rs=ja-JP&ad=JP の説明では、 》 このアドインは Microsoft Excel 2007 以降のバージョンに装備されています。 》 [ラベル印刷ウィザード]ボタンが表示されていない場合は、[ラベル印刷ウィ 》 ザード] アドインを有効にする必要があります。 となっていて、その手順３の直下の画面に見える[名前]が“ラベル印刷ウィザード”の[種類]“Excel アドイン”が何処にも見当たりません。 [ラベル印刷ウィザード]を使えるようにするにはどう対処したらよろしいのでしょうか？ ちなみに、私の Excel 2013 はそれ単体をＭＳから直接購入したものです。英語版としても使えるように、Office 2013 言語設定をインストールしています。

  • Windows8.1のフォトで日付別に並び変えたい

    Windows8.1を買いました。 フォトアプリで日付別に並べ替えられるようですが（http://121ware.com/qasearch/1007/app/servlet/relatedqa?QID=014122）、フォトアプリで日付別に表示のアイコンがそもそも示されません。 右クリックしても、新しいフォルダー、スライドショー、すべて選択、インポートのアイコンは表示されるのですが、日付別に表示のアイコンが表示されないため、日付別に表示することができなくて困っています。 http://answers.microsoft.com/ja-jp/windows/forum/windows_8-pictures/windows8/86b566de-4ab1-4719-9739-d2b5714ebc10?msgId=a57eb7d3-4f41-4bb2-9d60-14830e5b42a6 上記リンクの通りにやってみても変わりません。どうしたら表示されるようになるでしょうか。

  • Windows10起動時に複数の白い窓が開いて

    ASUSUのデスクPCです。 Windows10起動時に複数の白い窓が開いて消えます。 そのために起動に時間がかかります。 現象の画像は以下のページを見てください。 ttps://answers.microsoft.com/ja-jp/windows/forum/all/windows10%E8%B5%B7%E5%8B%95%E6%99%82%E3%81%AB/2104e8fd-7f8e-414d-9cbe-908d293aab9d?page=1 他の方も同じ症状の方がいたの検索して見つけました。 URLのページに書いてあるとうりでタスクマネージャーを開くと私もintel(R) security assistが多数でています。 URLのページにはintel(R) security assistをタスクから１つ１つ終了させてからアンインストールで症状が直ったと出ています。 そもそもintel(R) security assistとは何でしょうか？ またアンインストールしても問題ないのでしょうか？ WINDOWS10　64bitです。よろしくお願いします。

  • hotmaliをローカル上にバックアップしたい

    hotmaliをローカル上にバックアップすることはできないのでしょうか？ またできる場合、添付ファイルにウイルスがついていると困るのですが、 バックアップするとそのような添付ファイルまで一緒にバックアップされるのでしょうか？ それとも添付ファイルは一切されないのでしょうか？ バックアップ出きればまたメールが見たい時に、 ローカル上で検索すればけんさくして見れるのですよね？ https://answers.microsoft.com/ja-jp/windowslive/forum/hotmail-email/hotmail%E3%81%AE%EF%BE%8A%EF%BE%9E%EF%BD%AF/1e62a814-cf6b-4b79-8bc6-e8fdae1434d7?msgId=799f0869-3dc1-4b10-bbcb-e7453bffa7a8 が一番近い回答ですが、具体的な方法がよくわかりません。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する