Application.version numbers for Word

[Gary Hillerson]

I'm trying to branch some code based on Aplication.Version numbers; I
know that 2007 is version 12, and Word 2003 , but I don't know the
other version numbers, and haven't been able to find them. Can someone
help?

Specifically, I need to differentiate Office 2007 versus Office 2000
or 2003, versus earlier versions. I'm guessing I can use this code:

Dim versStr as String
Select Case CInt(Application.Version)
Case >=12: versStr = "Word 2007"
Case 11: versStr = "Word 2003"
Case 10: versStr = "Word 2000"
Case Else: versStr = "Word 97 or earlier"
End Select

Can anyone verify these numbers for me??

thanks
gary

 

[Steve Yandl]

Gary,

I think it's:
Version 7.0 Office 95
Version 8.0 Office 97
Version 9.0 Office 2000
Version 10.0 Office XP
Version 11.0 Office 2003
Version 12.0 Office 2007

Steve