version de fichier excel

[franck racine]

salut,

Quelqu'un peut-il me dire comment on fait en VBA pour connaitre la version d'excel qui a servi a créer un fichier x ??

merci d'avance
@Knarf

 

[@+Thierry]

Salut Franck

En direct du MPFE De Laurent Daures :

Sub VersionFichier()
Select Case ActiveWorkbook.FileFormat
Case -4143
typ = "Excel 2000"
Case 16
typ = "Excel 2.1"
Case 29
typ = "Excel 3"
Case 33
typ = "feuille Excel 4"
Case 35
typ = "classeur Excel 4"
Case 39
typ = "Excel 5"
Case 43
typ = "Excel 97/2000& 5/95"
Case Else
typ = "inconnu"
End Select
MsgBox "format : " & typ
End Sub


Bonne Soirée
@+Thierry