[E-03][E-07] Conditional Compilation Arguments

Bonjour,

je suis en train de faire un test à l'ouverture pour savoir quel code sera compilé à l'ouverture de mon workbook par rapport à la version de Excel. J'ai trouvé sur le site la ligne de code qui permet de seter la variable des arguments.(http://sinarf.developpez.com/access/autoref/)

Malheuresement le .SetOption n'existe pas....

Voici mon code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

Private Sub Workbook_Open() Dim dVersion As Double   dVersion = Val(Application.Version) If dVersion > 11 Then Application.SetOption "Conditional Compilation Arguments", "cVersion = false" Else Application.SetOption "Conditional Compilation Arguments", "cVersion = True" End If   ExcelVersionProperties (dVersion) End Sub   Public Function ExcelVersionProperties(ByVal pdVersion As Double)   #If cVersion Then 'Code pour Excel plus grand de version 11 #Else ''Code pour Excel plus petit de version 12 #End If End Function

---

Est-ce qu'une autre méthode existe?

merci d'avance

seba_stien

Je vais préciser le but de mon application pour savoir si quelqu'un a un autre moyen de le faire...

J'ai une application excel qui doit tourner sur Excel 2007 et excel 2003.
Le problème c'est qu'à l'ouverture j'ai du code qui s'exécute soit si c'est ouvert avec excel 2003 soit si c'est ouvert avec excel 2007.

Si j'ouvre avec excel 2007 tout fonctionne par contre à l'ouverture de excel 2003 erreur de compilation....

J'aimerais qu'il ne compile pas le code qui se trouve dans la partie excel2007...

merci d'avance

seba_stien