office2010版本号

2018-06-27 16:55:09 qq_36196748 阅读数 1556

转自

由于我们开发所用的office版本和客户用的版本经常不一样,所以我们开发的时候得考虑周全,将所有版本的情况都要考虑进去,这就需要识别office版本,看到有人写得很好了,特转来留用。

private void button1_Click(object sender, EventArgs e)
    {
        string officeShowStr =GetExcelVerStr();
        MessageBox.Show(officeShowStr);
    }
        //第二种方法
public static double CheckExcelVer()
    {
         Type objExcelType = Type.GetTypeFromProgID("Excel.Application");
            if (objExcelType == null)
            {
                return 0;
            }
            object objApp = Activator.CreateInstance(objExcelType);
            if (objApp == null)
            {
                return 0;
            }
            object objVer = objApp.GetType().InvokeMember("Version", BindingFlags.GetProperty, null, objApp, null);

            double iVer = Convert.ToDouble(objVer.ToString());
            objVer = null;
            objApp = null;
            objExcelType = null;
            GC.Collect();
            return iVer;
        }

public static String GetExcelVerStr()
    {
        String s1 = " Office ";
        double excelver;
        excelver = CheckExcelVer();
        if (excelver == 0)
        {
            MessageBox.Show("无法识别Excel的版本", "错误", MessageBoxButtons.OK, MessageBoxIcon.Information);
            s1 = "无法识别 office 版本";
        }
        else if (excelver >= 14) s1 += "2010或以上";
        else if (excelver >= 12) s1 += "2007";
        else if (excelver >= 11) s1 += "2003";
        else if (excelver >= 10) s1 += "XP";
        else if (excelver >= 9) s1 += "2000";
        else if (excelver >= 8) s1 += "97";
        else if (excelver >= 7) s1 += "95";
        return s1;
    } 
2019-12-19 15:19:45 iamlaosong 阅读数 148

作者:iamlaosong

Office从开发至今经历了非常多的版本,如office2000、office2003、office2007、office2010、office2013、office 2016等等,现在office2019也出来了(听说只能在最新版本win10中使用),这些版本名称实际也是产品名称,而office真正版本号是一串数字,最前面的大版本号就是开发版本号。如我用的office2010开发版本号就是14,如下图所示:

各个版本office查看版本号的方法不一定一样,如在Office 2010中,是通过单击菜单“文件→帮助”来查看其版本号的。

Office 2016依次单击【文件】=>【账户】=>【关于Excel】可以查看Excel版本信息:

为方便查看,现将各个版本office的开发版本号罗列如下:

Office版本

开发版本号

Office97

8.0

Office2000

9.0

Office XP(2002)

10.0

Office2003

11.0

Office2007

12.0

Office2010

14.0

Office2013

15.0

Office2016

16.0

有的网友可能发现微软发布的 Office 2010版本号为 14,上一代的 Office 2007 的版本号是 12 ,那么13 去哪儿了呢?

据说是因为西方国家认为13 是个Unlucky 数字,所以跳过了这个数字,直接从12跳到14。

最后说一下在VBA发开发环境下,Application.Version可以获得当前Excel开发版本号,ThisWorkbook.CalculationVersion 也可以获取一个数字,该数字指示上次对工作簿进行完全重新计算的 Excel的版本。最右边四位是计算引擎的次版本号,其它位(左边)是Microsoft Office Excel的主版本,开发版本号。

ActiveWorkbook.FileFormat可以得到当前活动窗口的Excel文件格式版本代号,如xlsx是51,xlsm是52,xls是56,如下图:

 

 

2019-01-28 10:50:00 weixin_30321449 阅读数 1226

 造冰箱的大熊猫@cnblogs 2019/1/28

 

如何查询当前所用Microsoft Office的版本信息?

 

Word 2007为例,点击程序左上角的Office图标,在弹出的菜单中选择“Word选项”。在“Word选项”对话框中,选择“资源”,“关于Microsoft Office Word 2007”给出了Word的版本信息。

点击鼠标右键看大图

转载于:https://www.cnblogs.com/pandabang/p/10329222.html

2014-01-20 14:32:44 cnsqq_mapan 阅读数 990

       最近做的一个项目中要用到office 的版本号。在网上找了下相关的资源,以备后续使用。

office 2003 对应的相应信息(11):
http://support.microsoft.com/kb/821549/zh-cn

 

office 2007 对应的相应信息(12):

http://support.microsoft.com/kb/928116/zh-cn

 

office 2010 对应的相应信息(14):

http://support.microsoft.com/kb/2687455/zh-cn

 

写到这不仅纳闷了,为什么没有13呢,原来" 13 "数字在西方观念中是一个不吉祥的数字,下面的网址中有解释:
http://news.mydrivers.com/1/157/157312.htm

 

通过c++ 来获取office 的相应版本号信息,参考资料。

http://bbs.csdn.net/topics/60051676

 

 

 

2018-11-15 10:59:25 bluecard2008 阅读数 1369

判断 Office 版本

office97 : 8.0

office2000 : 9.0

officeXP(2002) : 10.0

office2003 : 11.0

office2007: 12.0

office2010 : 14.0

office201315.0

ms.office.interop.excel.dll版本号

(1) 1985年:Excel 1.0   
(2) 1993年:Excel 5.0——Office 4.2   
(3) 1995年:Excel 7.0(Excel 95) 
(4) 1997年:Excel 8.0(Excel 97) 
(5) 1999年:Excel 9.0(Excel 2000) 
(6) 2001年:Excel 10(Excel XP/2002)——Office XP/2002   
(7) 2003年:Excel 2003(Excel XP/2003)——  11.0  
(8) 2007年:Excel 2007(Excel XP/2007) —— 12.0

(9) 2010年:Excel 2010 —— 13.0
(10) 2012年:Excel 2013 ——14.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