用vba判断当前的office软件是32位还是64位

2024年2月26日 14次阅读 来源: yueliang2100

上文介绍的是手动查看office软件是32位还是64位，如果要在vba中判断当前使用的office软件是32位还是64位，可以使用如下的最简单的代码判断：

Sub QQ1722187970()
    Dim sText As String
    sText = Environ("PROCESSOR_ARCHITECTURE")
    Debug.Print sText
    If sText Like "*64*" Then
        MsgBox "当前使用的是64位office"
    ElseIf sText Like "*86*" Then
         MsgBox "当前使用的是32位office"
    End If
End Sub

其中

Environ(“PROCESSOR_ARCHITECTURE”)

返回的是当前的代码所在的软件的位数，这个是关键，它返回的并不是操作系统的位数。

 

    原文作者：yueliang2100
    原文地址: https://blog.csdn.net/yueliang2100/article/details/103238278
    本文转自网络文章，转载此文章仅为分享知识，如有侵权，请联系博主进行删除。
点赞