Microsoft ExcelでVBAを使用して、オペレーティング・システムのタイプを決定
OSの種類を識別するために、マクロコードを使用できます。この記事では、VBAコードを使用して使用されているオペレーティングシステムの種類を判別する方法を学習します。
質問:システムのOSをVBAコードで32ビットか64ビットか知りたいのですが。
オペレーティングシステムの種類を確認するには、次の手順に従う必要があります。
VBエディターを起動する必要があります。[開発者]タブをクリックします。* [コード]グループから[VisualBasic]を選択します
-
[挿入]をクリックしてから[モジュール]をクリックします
これにより、新しいモジュールが作成されます。モジュールに次のコードを入力します
===
Function OSis32BIT() As Boolean OSis32BIT = False If InStr(Application.OperatingSystem, "32-bit") Then OSis32BIT = True End If End Function
Function OSis64BIT() As Boolean OSis64BIT = False If InStr(Application.OperatingSystem, "64-bit") Then OSis64BIT = True End If End Function
Sub TestOSis32BIT() If OSis32BIT Then MsgBox "You use a 32bit operating system", , _ Application.OperatingSystem Else MsgBox "You don't use a 32bit operating system", , _ Application.OperatingSystem End If End Sub
===
マクロを実行すると、メッセージボックスが表示されます。以下のスナップショットを参照してください:
64ビットオペレーティングシステムを使用している場合、メッセージボックスは「32ビットオペレーティングシステムを使用していません」と更新されます
システムが32ビットかどうかを確認するには;空のセルでUDFを次のように使用できます:
-
= OSis32BIT();オペレーティングシステムが32ビットの場合はTRUEを返し、そうでない場合はFALSEを返します
システムが64ビットかどうかを確認するには;空のセルでUDFを次のように使用できます:
-
= OSis64BIT();オペレーティングシステムが64ビットの場合はTRUEを返し、そうでない場合はFALSEを返します
結論:このようにVBAコードを使用すると、使用しているオペレーティングシステムを特定できます。
私たちのブログが気に入ったら、Facebookで友達と共有してください。また、TwitterやFacebookでフォローすることもできます。
_私たちはあなたからの連絡をお待ちしております。私たちの仕事を改善、補完、または革新し、あなたのためにそれをより良くする方法を教えてください。 [email protected]_までご連絡ください