功能
- 功能简介
- 更多系统
400-099-0376
400-099-0376
判断 Office 版本
office97 : 8.0
office2000 : 9.0
officeXP(2002) : 10.0
office2003 : 11.0
office2007: 12.0
office2010 : 14.0
office2013: 15.0
MsgBoxThisWorkbook.CalculationVersion 获取一个数字，该数字指示上次对工作簿进行完全重新计算的 Excel的版本。
最右边四位是计算引擎的次版本号，其它位（左边）是Microsoft Office Excel的主版本。
例子 114210
11 是 Excel 11, i.e. Excel2003
92512
9 是 Excel 9
0 没有进行过计算是 0!!!
Excel 97: 8
Excel XP:10
FileFormat例子:
SubxlFileVersion()
Dim Typ AsString
Select CaseActiveWorkbook.FileFormat
Case-4143: Typ = "Excel 2000 et plus"
Case 16:Typ = "Excel 2.1"
Case 29:Typ = "Excel 3"
Case 33:Typ = "Sheet Excel 4"
Case 35:Typ = "Workbook Excel 4"
Case 39:Typ = "Excel 5"
Case 43:Typ = "Excel 97/2000& 5/95"
CaseElse: Typ = "Unknown"
End Select
MsgBox "File format: "& Typ & " !",64
End Sub
方法二：
SubExcel_Ver()
Dim X, Y As String
X = Application.Version
select case X
case 8#
Y = "97"
case 9#
Y = "2000"
case 11#
Y = "2003"
end select
MsgBox X
MsgBox Y, , "Excel版本"
EndSub
Public Sub技巧1_001()
Dim myVersion As String
Select Case Application.Version
Case "8.0"
myVersion = "97"
Case "9.0"
myVersion = "2000"
Case "10.0"
myVersion = "2002"
Case "11.0"
myVersion = "2003"
Case Else
myVersion = "版本未知"
End Select
MsgBox "Excel 版本是: " &myVersion
End Sub
本程序仅适用于Excel 2003(11.0)，如果当前版本不是2003则退出
If Application.Version<> "11.0" Then MsgBox "本代码仅在 Excel2003 下可使用! ", vbOKOnly + vbCritical, "Keanjeason": ExitSub
SubxlFileVersion()'获取版本号
Dim Typ AsString
Select CaseActiveWorkbook.FileFormat
Case -4143: Typ = "Excel 2000 et plus"
Case 16: Typ = "Excel 2.1"
Case 29: Typ = "Excel 3"
Case 33: Typ = "Sheet Excel 4"
Case 35: Typ = "Workbook Excel 4"
Case 39: Typ = "Excel 5"
Case 43: Typ = "Excel 97/2000&5/95"
Case Else: Typ = "Unknown"
End Select
MsgBox "File format: "& Typ & " !",64
End Sub
实操指南：如何监控聊天中的敏感信息?这款秘籍软件，轻松掌握微信聊天动态
电影《摩登时代》里，流水线工人就连在吃饭时都要用“自动喂食机”提高效率，这样才能挤出更多时间投入工作。虽然现在打工人不至于此，但有些老板仍然放心不下……像企业聊天记录往往蕴含着大量的敏感信息。为了确保信息安全，监控聊天中的敏感信息成为了一项必要且重要的工作。以下是一款秘籍软件，帮助你轻松掌握微信聊天动态，确保信息安全。...
怎么监控员工上班情况？2024企业管理的四种方法，老板们不容错过
怎么监控员工上班情况？2024企业管理的四种方法，老板们不容错过员工上班在干什么？摸鱼？打游戏？老板该怎么管理？如何才能监视怎么监控员工上班情况？监控员工上班情况可以通过多种方式实现，但重要的是要确保这些措施既合法又合规，同时尊重员工的隐私权。以下是一些建议的方法：一、制定明确的行为规范与奖惩制度1、制定行为规范： 企...
怎么监控员工上班情况？快速监控员工状态
怎么监控员工上班情况？快速监控员工状态在企业管理中，如何有效监控员工上班情况，确保工作效率与团队协作，是每位老板都需面对的课题。本文为您揭秘五招快速监控员工状态的实用技巧，不仅能帮助您实时掌握员工动态，还能提升整体管理效率。作为老板，掌握这些技巧，将让您在企业管理中游刃有余，轻松应对各种挑战。一、使用安企神软件实时监控...
安企神桌管软件：提升企业管理效率的全能助力
安企神桌管软件：提升企业管理效率的全能助力在当今竞争激烈的商业环境中，企业必须不断优化管理和运营流程，以提高效率和盈利能力。安企神桌管软件正是这样一款面向中小企业的管理工具，能够帮助企业在多方面提升综合管理水平。本文将详细探讨安企神桌管软件给企业带来的多重价值。一、全方位的管理功能安企神桌管软件是一款集成了多种管理功能...
安企神：揭开终端安全管理软件的神秘面纱
安企神：揭开终端安全管理软件的神秘面纱在数字化日益普及的今天，企业的网络安全问题愈发显得重要。数据泄露、网络攻击等事件层出不穷，如何保障企业内部信息的安全性成为众多企业关心的焦点。安企神终端安全管理软件应运而生，作为一款专业的安全管理工具，它的功能与优势备受关注。本文将全面揭秘安企神软件的核心功能、应用场景及其在终端安...
