Microsoft Excelでユーザー名とコンピュータ名を返すためにマクロ
この記事では、ログインしたユーザーのコンピューターとユーザー名を返すマクロを作成します。
この例では、セルC10のコンピューター名とセルC11のユーザー名を抽出します。
コンピューターとユーザー名を検索するための「GetComputerUserName」マクロを作成しました。 「送信」ボタンをクリックすると、マクロを実行できます。
マクロは、セルC10にコンピューター名を抽出し、セルC11にユーザー名を抽出します。
コードの説明
環境機能
Environ関数は、オペレーティングシステムの環境変数に関連付けられた文字列値を返します。
Environ関数の構文
Environ(\ {環境変数名|番号})
コードについては以下に従ってください
Sub GetComputerUserName() Dim ComputerName, UserName As String 'Getting computer name ComputerName = Environ("computername") 'Getting user name UserName = Environ("username") 'Assigning value to cell C10 and C11 Range("C10").Value = ComputerName Range("C11").Value = UserName End Sub
このブログが気に入ったら、FacebookやFacebookで友達と共有してください。
皆様からのご意見をお待ちしております。私たちの仕事を改善し、あなたのために改善する方法をお知らせください。 [email protected]までご連絡ください