如何使用MS Word 2007 VBA检查窗口版本

里昂

我想检查不同comp上的窗口版本,从而在MS Word 2007 vba上执行不同的任务。我尝试了此代码,该代码已在ms excel 2007 vba上应用,并且正在运行,但在MS word 2007 vba上却没有。

Dim TheOS As String
Dim WinType As String
TheOS = Application.OperatingSystem
MsgBox ("TheOS ")

在ms字2007 vba上,它抛出编译错误:找不到方法或数据成员。我需要什么?

拱灯

如果您希望可以在所有办公产品中使用的VBA代码,则WMI是一种解决方案。

与Application.System.OperatingSystem有关的东西是它没有返回任何有趣的东西。

Application.System.Version可用。但是我使用WMI给我正确的信息。

 Sub test()
    Dim info As System
    'Well everything is windows NT today..
    Debug.Print Application.System.OperatingSystem
    'Short version string MajorVersion.MinorVersion
    Debug.Print Application.System.Version

    Dim objWMI As Object
    Dim objSystems As Object
    Dim objOs As Object

    Set objWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
    Set objSystems = objWMI.ExecQuery("Select * from Win32_OperatingSystem")

    For Each objOs In objSystems
        Debug.Print objOs.Name 'Full name as in OS startup screen
        Debug.Print objOs.Caption ' Human readable name
        Debug.Print objOs.Version ' the correct windows version string
    Next

    Set objOs = Nothing
    Set objSystems = Nothing
    Set objWMI = Nothing

End Sub

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

在MS Word 2007中合并引用

来自分类Dev

如何在MS Word 2007或更高版本中的方程式中放置换行符

来自分类Dev

如何修复MS Word 2007中的串行列?

来自分类Dev

如何填补MS Word 2007中的巨大空间?

来自分类Dev

如何更改MS Word 2007曲目更改中使用的颜色?

来自分类Dev

Word 2007-在字段中使用通配符

来自分类Dev

如何在Word 2007/2010中保护/锁定表单而不丢失拼写检查?

来自分类Dev

MS Word 2007中的拼写检查器适用于某些语言,但不适用于其他语言

来自分类Dev

MS Word 2007中的文档结构图

来自分类Dev

自定义MS Word 2007中的字幕编号?

来自分类Dev

MS Word 2007中的“ Ctrl + Alt + NumPad +”光标是什么?

来自分类Dev

MS Word 2007-插入形状,但保持选中该工具

来自分类Dev

修复MS Word 2007中合并表的不规则形状

来自分类Dev

MS Access 2013:通过VBA使用MS Word的语法检查

来自分类Dev

Word 2007到pdf转换版本7或更低

来自分类Dev

如何在MS Word 2007中更改图像的不透明度?

来自分类Dev

如何计算MS Word 2007文件的大量注释中的字符数?

来自分类Dev

如何删除MS Word(2007)文档的修订历史记录?

来自分类Dev

如何在整个MS Word 2007文档中更改特定字母的字体颜色?

来自分类Dev

如何使用VBScript检查MS Word是否正在运行

来自分类Dev

如何使用Perl在MS Word中检查超链接?

来自分类Dev

如何在Microsoft Word 2007中隐藏文本格式弹出窗口(迷你工具栏)

来自分类Dev

如何在Word 2007模板中打印模板行?

来自分类Dev

如何在Word 2007中将图像与文本对齐?

来自分类Dev

如何在Microsoft Word 2007中锁定图像

来自分类Dev

如何在Word 2007的表格列中自动递增数字

来自分类Dev

如何在Word 2007的草稿视图中显示图像

来自分类Dev

如何使用MS Access中触发的VBA更改MS Word文档中形状的颜色?

来自分类Dev

MS Word 2007:远程编辑后,文档结构图窗格显示所有内容。如何只还原标题?

Related 相关文章

  1. 1

    在MS Word 2007中合并引用

  2. 2

    如何在MS Word 2007或更高版本中的方程式中放置换行符

  3. 3

    如何修复MS Word 2007中的串行列?

  4. 4

    如何填补MS Word 2007中的巨大空间?

  5. 5

    如何更改MS Word 2007曲目更改中使用的颜色?

  6. 6

    Word 2007-在字段中使用通配符

  7. 7

    如何在Word 2007/2010中保护/锁定表单而不丢失拼写检查?

  8. 8

    MS Word 2007中的拼写检查器适用于某些语言,但不适用于其他语言

  9. 9

    MS Word 2007中的文档结构图

  10. 10

    自定义MS Word 2007中的字幕编号?

  11. 11

    MS Word 2007中的“ Ctrl + Alt + NumPad +”光标是什么?

  12. 12

    MS Word 2007-插入形状,但保持选中该工具

  13. 13

    修复MS Word 2007中合并表的不规则形状

  14. 14

    MS Access 2013:通过VBA使用MS Word的语法检查

  15. 15

    Word 2007到pdf转换版本7或更低

  16. 16

    如何在MS Word 2007中更改图像的不透明度?

  17. 17

    如何计算MS Word 2007文件的大量注释中的字符数?

  18. 18

    如何删除MS Word(2007)文档的修订历史记录?

  19. 19

    如何在整个MS Word 2007文档中更改特定字母的字体颜色?

  20. 20

    如何使用VBScript检查MS Word是否正在运行

  21. 21

    如何使用Perl在MS Word中检查超链接?

  22. 22

    如何在Microsoft Word 2007中隐藏文本格式弹出窗口(迷你工具栏)

  23. 23

    如何在Word 2007模板中打印模板行?

  24. 24

    如何在Word 2007中将图像与文本对齐?

  25. 25

    如何在Microsoft Word 2007中锁定图像

  26. 26

    如何在Word 2007的表格列中自动递增数字

  27. 27

    如何在Word 2007的草稿视图中显示图像

  28. 28

    如何使用MS Access中触发的VBA更改MS Word文档中形状的颜色?

  29. 29

    MS Word 2007:远程编辑后,文档结构图窗格显示所有内容。如何只还原标题?

热门标签

归档