Créer une occurrence d'Excel dans la version souhaitée

La première méthode consiste à utiliser la classe publique Microsoft.Office.Interop.Excel.Application qui va effectuer une liaison anticipée avec Excel. C'est la syntaxe standard préconisée sous .Net

Dim objMyExcel As Microsoft.Office.Interop.Excel.Application
If objMyExcel Is Nothing Then
    objMyExcel = New Microsoft.Office.Interop.Excel.Application
    objMyExcel.Visible = True
    MsgBox(objMyExcel.name & Space(1) & objMyExcel.version)
End If

Pour utiliser la classe publique Microsoft.Office.Interop.Excel.Application, il faut ajouter une référence COM à la bibliothèque d'objets Excel. Prenons soin de choisir la référence à la bibliothèque 12.0 (qui correspond à la version 2007) et non pas 15.0 (qui correspond à la version 2013).

Résultat : KO ! Bien que l'on choisisse la référence à la version 2007, le programme crée une occurrence d'Excel 2013.

Cette fois-ci, on utilise la méthode CreateObject qui va effectuer une liaison tardive avec Excel. CreateObject nous permet de préciser la classe d'application d'Excel : on choisit naturellement "Excel.Application.12" pour cibler la version Excel 2007.

Dim objMyExcel As Object
 If objMyExcel Is Nothing Then
    '// CreateObject == Creates and returns a reference to a COM object
    objMyExcel = Microsoft.VisualBasic.Interaction.CreateObject("Excel.Application.12")
    objMyExcel.Visible = True
    MsgBox(objMyExcel.name & Space(1) & objMyExcel.version)
End If

Résultat : KO ! Bien que l'on précise la classe d'application d'Excel 2007, le programme crée une occurrence d'Excel 2013.

Toujours en liaison tardive, on utilise System.Activator.CreateInstance pour créer l'occurrence, et System.Type.GetTypeFromProgID pour préciser la version d'Excel 2007.

Dim objMyExcel As Object
If objMyExcel Is Nothing Then
    '// CreateInstance == Creates an instance of the specified type using that type's default constructor
    '// GetTypeFromProgID == Gets the type associated with the specified program identifier (ProgID)
    objMyExcel = System.Activator.CreateInstance(System.Type.GetTypeFromProgID("Excel.Application.12"))
    objMyExcel.Visible = True
    MsgBox(objMyExcel.name & Space(1) & objMyExcel.version)
End If

Résultat : KO ! Bien que l'on précise la classe d'application d'Excel 2007, le programme crée une occurrence d'Excel 2013. La déclaration de objMyExcel en liaison anticipée (As Microsoft.Office.Interop.Excel.Application) ne change rien au résultat.

Comme les méthodes 1.0, 2.0 et 3.0 ne permettent pas de créer une occurrence d'Excel de la version voulue, on va lancer l'exécutable de la version d'Excel 2007 et tenter de récupérer l'occurrence.

Dim objMyExcel As Object
If objMyExcel Is Nothing Then
    Call Microsoft.VisualBasic.Interaction.Shell("C:\Program Files (x86)\Microsoft Office\Office12\Excel.exe")
    '// GetObject == Returns a reference to an object provided by a COM component
    objMyExcel = Microsoft.VisualBasic.Interaction.GetObject("C:\Program Files (x86)\Microsoft Office\Office12\Excel.exe")
    objMyExcel.Visible = True
    MsgBox(objMyExcel.name & Space(1) & objMyExcel.version)
End If

Résultat : KO ! La commande Shell lance bien l'occurrence d'Excel 2007 précisée dans le path, mais le GetObject génère l'erreur « Impossible de créer le composant ActiveX ».

L'utilisation de Microsoft.VisualBasic.Interaction.GetObject(, "Excel.Application.12") ne change rien au résultat.

Cette méthode est une variante fonctionnelle du GetObject. Comme dans la méthode 4.0, on va lancer l'exécutable de la version d'Excel 2007 et tenter de récupérer l'occurrence.

Dim objMyExcel As Object
If objMyExcel Is Nothing Then
    Call Microsoft.VisualBasic.Interaction.Shell("C:\Program Files (x86)\Microsoft Office\Office12\Excel.exe")
    objMyExcel = System.Runtime.InteropServices.Marshal.GetActiveObject("Excel.Application.12")
    objMyExcel.Visible = True
    MsgBox(objMyExcel.name & Space(1) & objMyExcel.version)
End If

Résultat : KO ! La commande Shell lance bien l'occurrence d'Excel 2007 précisée dans le path, mais le GetActiveObject tente de récupérer une occurrence de la version la plus récente installée sur le poste. Si Excel 2013 n'est pas lancé sur le poste, le GetActiveObject génère l'erreur « Opération non disponible ». Si Excel 2013 est lancé sur le poste, le GetActiveObject récupère l'occurrence d'Excel 2013 et pas celle de 2007, bien que l'on précise la classe d'application d'Excel 2007.

Cette méthode consiste à paramétrer l'appel au Shell avec un suffixe particulier qui permet au GetObject de récupérer l'occurrence.

Dim objMyExcel As Object
If objMyExcel Is Nothing Then
    '// Shell == Runs an executable program and returns an integer containing the program's process ID if it is still running
    Call Microsoft.VisualBasic.Interaction.Shell("C:\Program Files (x86)\Microsoft Office\Office12\Excel.exe" & " /automation -Embedding")
    objMyExcel = Microsoft.VisualBasic.Interaction.GetObject(, "Excel.Application")
    objMyExcel.Visible = True
    MsgBox(objMyExcel.name & Space(1) & objMyExcel.version)
End If

Résultat : OK ! On récupère bien l'occurrence d'Excel 2007, sans même avoir précisé la classe d'application d'Excel 2007. Avec ce paramétrage, l'utilisation de Marshall.GetActiveObject fonctionne également. Enfin, on peut l'utiliser en déclarant une liaison anticipée pour objMyExcel.

Chaque version d'Excel possède sa propre classe d'application

Cependant, toutes les versions ont le même identifiant de classe (CLSIDClass Identifier). C'est la dernière version installée qui contient le chemin d'accès au serveur Automation.

C'est pourquoi, sur un poste où l'on a installé Office 2007, puis Office 2013 :

• New Microsoft.Office.Interop.Excel.Application crée une occurrence d'Excel 2013 (Méthode 1.0) ;
• CreateObject("Excel.Application"), CreateObject("Excel.Application.12") ou CreateObject("Excel.Application.15") crée toujours une occurrence d'Excel 2013 (Méthode 2.0) ;
• GetTypeFromProgID("Excel.Application.12") donne le type Excel indépendamment de la version (Méthode 3.0) ;
• Marshal.GetActiveObject("Excel.Application.12") essaye toujours de récupérer une occurrence d'Excel 2013 (Méthode 5.0).

Une solution raisonnable semble donc d'avoir une seule version d'office installée sur le poste.

Notez que, comme le précise Microsoft, il est déconseillé d'installer plusieurs versions d'Office sur le même poste : « Si vous installez plusieurs versions de Microsoft Excel sur un ordinateur, vous pouvez rencontrer des difficultés lorsque vous essayez d'utiliser Automation pour contrôler une version spécifique de Microsoft Excel. »

Vous l'avez compris, si une seule version d'Excel est installée, l'identifiant de classe Excel fera automatiquement référence à cette unique version.

Si vous avez uniquement Excel 2007 installé sur le poste, les méthodes 1.0, 2.0, 3.0 et 5.0 permettent donc d'affecter une occurrence d'Excel 2007 à notre variable objMyExcel.

La méthode 6.0 présente une syntaxe qui permet bien d'instancier l'occurrence d'Excel 2007 dans notre variable objMyExcel.

Cependant, comment s'assurer que la bibliothèque d'objets Excel référencée pour Excel 2007 (via Microsoft Excel 12.0 Object Library ) ne fera pas malgré tout référence à la dernière version d'Excel installée, c'est-à-dire à l'objet Excel 2013 ?

Il y a selon moi un risque de conflit entre l'occurrence d'Excel 2007 ouverte et l'utilisation de la bibliothèque d'objets d'Excel 2013.

C'est pourquoi je vous déconseille d'utiliser cette méthode, même si le défi de récupérer l'occurrence d'Excel 2007 sur un poste où Office 2007 cohabite avec Office 2013 est finalement une réussite !

Si, comme pour moi, la méthode 6.0 ne vous convient pas, vous devrez vous résigner à n'installer qu'une seule version d'Office par poste. C'est pourquoi, à moins de disposer de x machines, il faut créer une machine virtuelle par version d'Office à gérer.

Il existe de nombreux logiciels de virtualisation dont les plus connus sont VirtualBox, Windows Virtual PC, VMware. Sans entrer dans les détails (je vous laisse effectuer vos propres recherches), je vous conseille VirtualBox, tant pour sa gratuité que pour sa polyvalence.

En résumé, il faut créer une machine virtuelle par environnement à tester (XP, Vista, Seven…), puis dupliquer ces machines virtuelles pour obtenir une version de chaque environnement par version d'Office à tester (2007, 2010, 2013…).

Pour strictement bien faire, pour développer une application devant être compatible avec Excel 2007, il faut non seulement tester sur une machine virtuelle avec uniquement Office 2007 installé, mais aussi développer dans cet environnement.

Si votre application est destinée à tourner avec plusieurs versions d'Office, veillez à développer votre application avec une référence à la version d'Office la plus ancienne des versions avec lesquelles vous souhaitez être compatible. Votre application utilisera automatiquement une version plus récente quand elle sera exécutée sur poste ne contenant pas votre version de développement.

Par exemple, si vous souhaitez que votre application soit compatible avec les versions 2007, 2010 et 2013, vous devez faire référence à la bibliothèque de version 2007.

Note : Les références disponibles pour ajouter à votre projet sont bien sûr dépendantes des versions d'Office installées sur votre PC.

Pour de meilleures performances, préférez toujours la liaison anticipée (early binding) à la liaison tardive (late binding). Consultez l'article du support Microsoft en référence à la fin de cet article.

Certaines méthodes décrites dans cet article précisent le chemin d'accès au dossier d'Excel 2007 dans sa version 32 bits ("C:\Program Files (x86)\Microsoft Office\Office12\Excel.exe"). Pour un codage propre, il convient d'utiliser les constantes énumérées « SpecialFolder » pour récupérer les chemins d'accès au dossier des programmes, en prenant soin de distinguer les installations x86 et en précisant la version d'Excel (cf. chapitre V.A). Consultez l'énumération Microsoft Msdn en référence à la fin de cet article.