Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


10416 / 13644 ツリー ←次へ | 前へ→

【21961】システム情報取得について miyake 05/2/4(金) 19:44 質問[未読]
【21967】Re:システム情報取得について miyake 05/2/4(金) 23:02 質問[未読]
【21970】Re:システム情報取得について ちゃっぴ 05/2/5(土) 7:36 回答[未読]
【21972】Re:システム情報取得について miyake 05/2/5(土) 14:48 質問[未読]
【21973】Re:システム情報取得について ちゃっぴ 05/2/5(土) 15:19 回答[未読]

【21961】システム情報取得について
質問  miyake  - 05/2/4(金) 19:44 -

引用なし
パスワード
   いつもお世話になっております。

エクセルの使用者情報の取得として、
application.username
がありますが、その他に、CPUID、OSの種別・バージョン、パソコン使用者名、WINDOWSの登録番号(シリアル番号)を取得する記述を教えてください。

【21967】Re:システム情報取得について
質問  miyake  - 05/2/4(金) 23:02 -

引用なし
パスワード
   すいません。説明不足でした。
vbaのコードの中でシステム情報を取得したいのです。
コードで書く場合、どのように書いたらいいのでしょうか。

【21970】Re:システム情報取得について
回答  ちゃっぴ  - 05/2/5(土) 7:36 -

引用なし
パスワード
   >vbaのコードの中でシステム情報を取得したいのです。
>コードで書く場合、どのように書いたらいいのでしょうか。

いろいろ情報を取得したいようですね。
ということであれば、WMIを使用してやるのが簡単でしょう。

Scriptomatic ツール
http://www.microsoft.com/japan/technet/scriptcenter/tools/wmimatic.mspx

このToolをDownLoadして、自動取得されるSourceが参考になるでしょう。

たとえば、OSの情報なら「Win32_OpelatingSystem」
CPUの情報なら「Win32_Processor」という風にしてすればいい訳です。

【21972】Re:システム情報取得について
質問  miyake  - 05/2/5(土) 14:48 -

引用なし
パスワード
   ▼ちゃっぴ さん:
ありがとうございます。
ダウンロードしてみました。このツールで作成されるコードをVBAに貼り付ければいいのでしょうか。
ちなみに、VBAでエクセルのシリアル番号を取得する方法はありますか。

【21973】Re:システム情報取得について
回答  ちゃっぴ  - 05/2/5(土) 15:19 -

引用なし
パスワード
   > ダウンロードしてみました。このツールで作成されるコードを
> VBAに貼り付ければいいのでしょうか。

やってみればわかりますけど、作成されるCodeはVBScriptで
書かれていますので、VBA用にちょこっと変更してやる必要があります。

> ちなみに、VBAでエクセルのシリアル番号を取得する方法はありますか。

Registryを調べることになりそうですね。

[HKLM\SOFTWARE\Microsoft\Office\<Version>\Registration\<ClassID>]
のREG_SZ値ProductIDを調べてやればいいでしょう。

<Version>: 2003 11.0, 2002 10.0, 2000 9.0
<ClassID>: ClassIDがどのApplicationに対応するかは下記でお調べください。
[HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\UnInstall\<ClassID>]
DisplayNameを調べればいいでしょう。

Registry値の取得方法は、過去Logを検索してみてください。

10416 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free