公司上网行为管理,就用安企神软件
立即咨询判断 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
如何监控电脑端微信?5款软件可以看到对方微信在聊什么
案例背景某科技公司,专注于为客户提供定制化的软件开发服务。公司拥有一支庞大的销售团队,主要通过微信与客户进行沟通和项目跟进。随着业务的不断扩大,公司逐渐发现一些项目的进展不如预期,客户流失率也有所上升。通过引入一款专业的微信监控软件,公司开始收集和分析销售团队的微信聊天记录。经过一段时间的监控和分析,公司发现了一名销售...
电脑远程控制软件有什么作用?2024上榜的电脑远程控制软件有哪些?
电脑远程控制软件是一种通过网络远程操控其他设备的工具,广泛应用于技术支持、远程工作、系统维护等场景。这种软件不仅提高了工作效率,还极大地降低了时间和空间的限制。以下是其主要作用:1.技术支持:IT人员可以远程协助用户解决问题,无需物理接触设备,大大提高了解决问题的速度和效率。2.远程工作:员工可以在家或其他地点远程访问...
告别电脑USB接口泄密!请使用这四款电脑USB接口控制软件
听说某大型企业因未严格管理电脑USB接口,一名离职员工利用未加密的USB设备轻易拷贝了大量敏感客户资料,导致企业遭受重大经济损失和声誉损害。这个经历告诉我们,企业一定要对USB接口进行严格管控。本文将介绍几款电脑USB接口控制软件。1. 安企神软件安企神是一款功能强大的电脑管理及数据安全软件,其USB接口管理功能尤为突...
2024年常用的8款电脑加密软件分享|电脑加密神器排名
随着数字化时代的到来,企业和个人对数据安全的需求日益增加。电脑加密软件作为保护数据的重要手段,已经成为日常办公和企业管理中不可或缺的一部分。本文将分享2024年常用的八款电脑加密软件,以帮助企业和个人更好地保护数据安全。1. 安企神软件简介安企神软件是业界领先的企业级防泄密解决方案,为企业提供全方位、智能化的数据保护。...
政府单位上网监控软件:全面了解其强大功能与应用场景
政府单位上网监控软件:全面了解其强大功能与应用场景在当今数字化时代,政府单位对电脑上网的监控已成为一项重要的工作任务。随着信息科技的快速发展,各种上网监控软件的应用日益普及,不仅帮助政府单位维护信息安全,也提高了工作效率。本文将细致分析政府单位上网监控软件的多种功能及其在实际应用中的重要性。一、什么是上网监控软件?上网...