Xác định loại hệ điều hành sử dụng VBA trong Microsoft Excel

Posted on: 2020年11月13日 2020年11月13日
Tags: general-topics-in-vba

Để xác định loại HĐH, chúng ta có thể sử dụng mã macro. Trong bài này, chúng ta sẽ học cách xác định loại hệ điều hành đang được sử dụng bằng mã VBA.

Câu hỏi: Tôi muốn biết hệ điều hành của hệ thống của mình thông qua mã VBA cho dù nó là 32 bit hay 64 bit.

Để xác định loại hệ điều hành chúng ta cần làm theo các bước sau:

Chúng ta cần khởi chạy trình soạn thảo VB Click vào tab Developer * Từ nhóm Code chọn Visual Basic

Nhấp vào Chèn rồi đến Mô-đun

Thao tác này sẽ tạo mô-đun mới Nhập mã sau vào Mô-đun

===

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

===

Khi bạn chạy macro, bạn sẽ nhận được một hộp thông báo, hãy tham khảo ảnh chụp nhanh bên dưới:

Nếu bạn đang sử dụng hệ điều hành 64 bit thì hộp thông báo sẽ cập nhật “Bạn không sử dụng hệ điều hành 32 bit”

Để kiểm tra xem hệ thống có 32 bit hay không; chúng ta có thể sử dụng UDF trong một ô trống như:

= OSis32BIT (); điều này sẽ trả về TRUE nếu hệ điều hành là 32 bit, ngược lại trả về FALSE

Để kiểm tra xem hệ thống có phải là 64 bit hay không; chúng ta có thể sử dụng UDF trong một ô trống như:

= OSis64BIT (); điều này sẽ trả về TRUE nếu hệ điều hành là 64 bit, ngược lại trả về FALSE

Kết luận: Với cách sử dụng mã VBA này, chúng ta có thể xác định được hệ điều hành đang sử dụng.

Nếu bạn thích blog của chúng tôi, hãy chia sẻ nó với bạn bè của bạn trên Facebook. Và bạn cũng có thể theo dõi chúng tôi trên Twitter 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, bổ sung hoặc đổi mới 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 tại [email protected]