如何判断Office是32位还是64位?

对于持续学习VBA的老铁们,有必要了解Office的位数。

如果系统是32位的,则不需要判断Office位数了,因为只能安装32位Office。

下面只讨论64位系统中,Office的位数判断问题。

64位系统中可能存在以下4种情况:

  • 安装了32位Office
  • 安装了64位Office
  • 安装了32位和64位两个版本Office
  • 没安装任何Office

究竟Office是多少位的?如果不打开Office以及VBA,通过注册表可能能够查询出来,不过比较费事儿,而且注册表也有被修改的可能,靠不住。

下面介绍打开了Office的一个组件,或者打开了VBA编程环境后,查看位数的方法。

方法一:手动查看法

找到账户(Account)选项,然后点击关于Excel

 

 

下面的对话框中,看一下最上面的那行字,写的是64bit。

 

 

方法二:VBA法

该方法还可以分为以下n多种方法

方法2-1:根据ProductCode属性

如果结果是四个0,后面又四个0,则是32位Office。 如果后面是1000,则是64位Office

 

 

方法2-2:根据HInstance属性

32位Office的情形,可以返回一个整数。

 

 64位Office的情形,返回的是致命的错误。

 

方法2-3:声明LongLong类型变量

在64位Office的VBA中可以声明LongLong类型的整型变量

 

在32位Office的VBA里面,只有Long。

方法2-4:根据API函数的颜色

在模块顶部加入一个最简单的API函数声明,64位Office的情况下函数呈现为红色。

 

32位Office的话,以上代码直接显示为黑色,而且不报错。

方法2-5:条件编译法

在VBA模块中运行如下过程,看看返回的是哪一个对话框。

Sub 判断Office位数()
    #If Win64 Then
        MsgBox "64bit"
    #Else
        MsgBox "32bit"
    #End If
End Sub

 

以上各种方法都亲测好使,感谢老铁们继续支持。

 

posted @ 2020-02-16 14:25  ryueifu  阅读(5854)  评论(0编辑  收藏  举报