ref un paramètre macro appelant une fonction ADN excel avec Application.Run

Question

J'ai une fonction définie par l'ADN c# Excel:

[ExcelFunction(Description = "does stuff", IsVolatile = false, IsMacroType = true, IsThreadSafe = true)] 
public object AFunction(long k \* other parameters *\) 
{ 
    // do stuff 
} 

qui est appelé en VBA comme suit:

Dim v As Variant 
v = Application.Run("AFunction", k) 

maintenant, je modifie mon ADN Excel c# comme suit:

[ExcelFunction(Description = "Retrieves valo folio", IsVolatile = false, IsMacroType = true, IsThreadSafe = true)] 
public object AFunction(ref double x, long k \* other parameters *\) 
{ 
    // do stuff 
    // update x 
} 

l'idée étant que je vais passer à un double qui sera mis à jour, et que je vais utiliser après.

Je l'appelle en VBA comme suit:

Dim v As Variant 
v = Application.Run("AFunction", x, k) 

Mais x ("rationnés" as Double) n'est pas mis à jour. J'ai essayé un

Dim x() as Double 
Redim x(1) 

et

Dim v As Variant 
v = Application.Run("AFunction", x(1), k) 

mais ici aussi x(1) n'est pas mis à jour.

Y at-il un problème avec le ref dans le c#, ou est le problème causé par le?

Answer 1

Le problème était Application.Run en effet, comme suspecté, car il ne peut pas a priori passer les paramètres par référence. Mais en fait, il peut, voir ici:

http://www.tushar-mehta.com/publish_train/xl_vba_cases/1022_ByRef_Argument_with_the_Application_Run_method.shtml

où essentiellement une enveloppe l'UDF dans une méthode d'une classe VBA dont une instance est passé en utilisant Application.Run

Lourdeur mais travailler.