Trong bài viết này, chúng tôi sẽ tạo một macro sẽ trả về máy tính và tên người dùng cho người dùng đã đăng nhập.

Trong ví dụ này, chúng tôi muốn trích xuất tên máy tính trong ô C10 và tên người dùng trong ô C11.

ArrowMain

Chúng tôi đã tạo macro “GetComputerUserName” để tìm máy tính và tên người dùng. Chúng tôi có thể chạy macro bằng cách nhấp vào nút “Gửi”.

ArrowOutput

Macro sẽ trích xuất tên máy tính trong ô C10 và tên người dùng trong ô C11.

Giải thích mã

Chức năng môi trường

Hàm môi trường trả về giá trị chuỗi được liên kết với biến môi trường của hệ điều hành.

Cú pháp của hàm Môi trường

Môi trường (\ {Tên biến môi trường | số})

Vui lòng theo dõi bên dưới để biết mã

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

Nếu bạn thích blog này, hãy chia sẻ nó với bạn bè của bạn trên Facebook và Facebook.

Chúng tôi rất muốn nghe ý kiến ​​từ bạn, hãy cho chúng tôi biết cách chúng tôi có thể cải thiện công việc của mình và làm cho nó tốt hơn cho bạn. Viết thư cho chúng tôi [email protected]