Utiliser une librairie C# en VBA d'un fichier Excel

Bonjour à toutes/tous,

Voila mon souci, qui je dois l'avouer, commence à me taper sur le système... et comme je n'y connais pas grand chose je rame à mort!

J'utilise une application Excel avec des contrôles fesant appel des méthodes VBA. Or d'un autre côté j'ai développé une librairie en C# pour les gros algorithmes.
Mon souci est que je n'arrive pas à appeler cette librairie.

Mode de génération de la librairie en C#:
1. Création d'un projet "Librairie de classe"
2. Développement, tests des méthodes etc...
3. Génération de la librairie (non chiffrée, peut-être que ça vien de là, mais je ne vois pas pourquoi j'en aurais besoin...)

Appel de la librairie dans le VB:
1. Copie de la dll dans le répertoire du fichier Excel
2. Insertion dans le code VB de :
Public Declare Function maSomme Lib "MyLibrary.dll" (ByVal a As Integer, ByVal b As Integer) As Integer
(en passant j'aimerais bien savoir comment intégrer la libraire dans sa totalité, car si je dois déclarer cheque méthode je suis pas rendu :p)
3. Appel de ma fameuse méthode dans le code:
Sub maSommeVBA()

a = Feuil1.Cells(1, 1)
b = Feuil1.Cells(1, 2)

Feuil1.Cells(1, 4) = maSomme(a, b)

End Sub

Resultat:
Erreur d'exécution '453':
Point d'entrée maSomme d'une dll  introuvable dans MyLibrary.dll

Voila, peut-être que ce que je viens d'écrire parait abhérant, peut-être pas, mais en tout cas, toute aide sera grandement appréciée. Parceque là... je craque :p:p:p:p:p

Merci!

Romain

Salut,

Tu ne peux pas procéder de la même manière qu'avec une méthode exportée d'une dll C/C++, tu dois passer par COM.

Exemple :

Soit un projet de bibliotheque de classe appelé "CSharp" :
- sortie : "CSharp.dll"
- "Inscrire pour COM Interop" à true dans les propriétés du projet

Classe "CSharp", fichier CSharp.cs :
--------------
using System;
using System.Runtime.InteropServices;

namespace CSharp
{
    [ClassInterface(ClassInterfaceType.None)]
    [ComVisible(true)]
    public class CSharp : ICSharp
    {
        [ComVisible(true)]
        public int Somme(int a, int b)
        {
            return a+b;
        }
    }
}
--------------

Interface "ICSharp" (fichier ICSharp.cs) :
--------------
using System;

namespace CSharp
{
 public interface ICSharp
 {
  int Somme(int a, int b);
 }
}
--------------

A la compilation, VS effectue l'inscription pour l'emplacement actuel de l'assembly .Net.

Dans ton VBA il ne te reste plus qu'à faire quelquechose de ce genre :
Dim csharp As Object
Dim result As Integer
Set csharp = CreateObject("CSharp.CSharp")
result = csharp.Somme(1, 3)
MsgBox (result)
Set csharp = Nothing



Cocoricoooooooo !!!!
coq
MVP Visual C#

Très bonne explication : )

Pour les détails: [ Lien ]

En fait, si je référence le fichier .tlb généré par Visual Studio, j'ai l'erreur suivante:

Erreur d'exécution '429':
Un composant ActiveX ne peut pas créer d'objet

sur la ligne

Set myClass1 = CreateObject("MyLibrary.Class1")

Faut-il référencer la librairie dans le VB avec un importlib ou quelque chose du genre? Le fait de référencer par "Outils/Références/MyLibrary.tlb" est-il suffisant?
Pour l'instant je n'ai mis que ça dans le VB:

Sub maSommeVBA()
Dim myClass1 As Object
Set myClass1 = CreateObject("MyLibrary.Class1")

a = Feuil1.Cells(1, 1)
b = Feuil1.Cells(1, 2)
Feuil1.Cells(1, 4) = myClass1.maSomme(a, b)

Set myClass1 = Nothing
End Sub

Merci,
romain

Argh!
Je vois pas du tout là... bon je sais que ça fait glandeur, mais voici ce que j'ai fait pas à pas, si tu vois une erreur ou unh oubli quelque part ça me débloquerait peut-être...

Côté Visual Studio .NET:
1. Création d'un projet de type librairie de classes
2. Contenu 2 classes:
-----------------------------------------------------------------------------------------------------   
Class1.cs
-----------------------------------------------------------------------------------------------------
using System;
using System.Runtime.InteropServices;
namespace MyLibrary
{
   /// <summary>
   /// Summary description for Class1.
   /// </summary>
   [ClassInterface(ClassInterfaceType.None)]
   [ComVisible(true)]
   public class Class1:IClass1
   {
      [ComVisible(true)]
      public int maSomme(int a, int b)
      {return a+b;}
   }
}
-----------------------------------------------------------------------------------------------------   
IClass1.cs
-----------------------------------------------------------------------------------------------------
using System;
namespace MyLibrary
{
   /// <summary>
   /// Summary description for IClass1.
   /// </summary>
   public interface IClass1
   {
      int maSomme(int a, int b);
   }
}

3. Compilation du projet avec "Register for COM interop" = true
=> génération de MyLibrary.pdb, MyLibrary.dll et MyLibrary.tlb

Côté VBA:
1. Référencement de MyLibrary.tlb par "Outils/Références/add..."
2. Le code VBA est le suivant:
---------------------------------------------------------------------------------------------
Module1
---------------------------------------------------------------------------------------------
Sub maSommeVBA()
Dim myClass1 As Object
Set myClass1 = CreateObject("MyLibrary.Class1")

a = Feuil1.Cells(1, 1)
b = Feuil1.Cells(1, 2)
Feuil1.Cells(1, 4) = myClass1.maSomme(a, b)

Set myClass1 = Nothing
End Sub

Erreur générée sur le CreateObject :
Erreur d'exécution '429':
Un composant ActiveX ne peut pas créer d'objet

Voila tout ce que j'ai :(
Je suis vraiment désolé de balancer tout mon code comme ça pour que tu m'aides à trouver l'erreur, mais je te rassure, je ne joue pas aux cartes pendant ce temps :))

Merci beaucoup!
Romain