Array VBA di oggetti definiti dall'utente da una DLL C#

Question

Informazioni di base:
Sto costruendo un sistema SCADA, che funziona su VBA e cerco alcuni dei poteri di C#. Costruisco una libreria DLL in C# e ho i dati di base per il flusso tra la DLL e VBA.

[ComVisible(true), ClassInterface(ClassInterfaceType.AutoDual)] 
public class BE_Log 
{ 
    public string DateTime 
    { 
     [return: MarshalAs(UnmanagedType.BStr)] 
     get; 
     [param: MarshalAs(UnmanagedType.BStr)] 
     set; 
    } 
    public string User 
    { 
     [return: MarshalAs(UnmanagedType.BStr)] 
     get; 
     [param: MarshalAs(UnmanagedType.BStr)] 
     set; 
    } 
    public string SCADA 
    { 
     [return: MarshalAs(UnmanagedType.BStr)] 
     get; 
     [param: MarshalAs(UnmanagedType.BStr)] 
     set; 
    } 
    public string Tag 
    { 
     [return: MarshalAs(UnmanagedType.BStr)] 
     get; 
     [param: MarshalAs(UnmanagedType.BStr)] 
     set; 
    } 
    public string Area1 
    { 
     [return: MarshalAs(UnmanagedType.BStr)] 
     get; 
     [param: MarshalAs(UnmanagedType.BStr)] 
     set; 
    } 
    public string Area2 
    { 
     [return: MarshalAs(UnmanagedType.BStr)] 
     get; 
     [param: MarshalAs(UnmanagedType.BStr)] 
     set; 
    } 
    public string Description 
    { 
     [return: MarshalAs(UnmanagedType.BStr)] 
     get; 
     [param: MarshalAs(UnmanagedType.BStr)] 
     set; 
    } 
    public string ValueOld 
    { 
     [return: MarshalAs(UnmanagedType.BStr)] 
     get; 
     [param: MarshalAs(UnmanagedType.BStr)] 
     set; 
    } 
    public string ValueNew 
    { 
     [return: MarshalAs(UnmanagedType.BStr)] 
     get; 
     [param: MarshalAs(UnmanagedType.BStr)] 
     set; 
    } 

    public BE_Log(string DataTime, string User, string SCADA, string Tag, string Area1, string Area2,string Description) 
    { 
     this.DateTime = DateTime; 
     this.User = User; 
     this.SCADA = SCADA; 
     this.Tag = Tag; 
     this.Area1 = Area1; 
     this.Area2 = Area2; 
     this.Description = Description; 
    } 

    public BE_Log(string DataTime, string User, string SCADA, string Tag, string Area1, string Area2, string Description, string ValueOld, string ValueNew) 
    { 
     this.DateTime = DateTime; 
     this.User = User; 
     this.SCADA = SCADA; 
     this.Tag = Tag; 
     this.Area1 = Area1; 
     this.Area2 = Area2; 
     this.Description = Description; 
     this.ValueOld = ValueOld; 
     this.ValueNew = ValueNew; 
    } 

} 

E sono tornato la classe in questo modo:

[ComVisible(true), ClassInterface(ClassInterfaceType.AutoDual)] 
public class TI 
{ 
    private BLL_LogBook bll; 

    public TI() 
    { 
     bll = new BLL_LogBook(); 
    } 

    [return: MarshalAs(UnmanagedType.SafeArray, SafeArraySubType=VarEnum.VT_USERDEFINED)] // SafeArrayUserDefinedSubType = typeof(BE_Log) 
    public BE_Log[] CreateLogBook() 
    { 
     List<BE_Log> logs = bll.GetLogEntry(); 
     return logs.ToArray(); 
    } 
} 

Il mio livello di dati:

public class BLL_LogBook 
{ 
    public List<BE_Log> GetLogEntry() 
    { 
     List<BE_Log> logs = new List<BE_Log>(); 
     logs.Add(new BE_Log("05-05-2015", "some user", "scada01", "LA010NDA10CU12XQ12", "Ribe", "Esbjerg", "Some short description")); 
     logs.Add(new BE_Log("06-05-2015", "test user", "scada01", "LA010NDA10CU12XB05", "Herning", "KBH", "Some long description")); 
     logs.Add(new BE_Log("07-05-2015", "normal user", "scada02", "LA010NDA10CU12YQ01", "Åhus", "Tønder", "Some test description")); 

     return logs; 
    } 
} 

Il metodo statico VBA sta chiamando:

static class UnmanagedExports 
{ 
    [DllExport] 
    [return: MarshalAs(UnmanagedType.IDispatch)] 
    static Object TI_Object() 
    { 
     return new TI(); 
    } 
} 

In VBA i ottenuto i dati in questo modo:

Declare Function TI_Object Lib "<path>\\TJI.dll"() As Object 

Sub TestTheTestClass() 
    Dim TJI As Object 
    Set TJI = TI_Object() 

    Dim test As Variant 
    test = TJI.CreateLogBook() 

    Dim log As Variant 
    Set log = test(0) 

    Debug.Print log.User 
End Sub 

Ora alla mia domanda:
Come posso restituire un array o Lista della classe 'BE_Log'
EDIT:Questo è dove mi sono bloccato: http://puu.sh/hnPGe/472ff863d0.png

Ho cercato di elaborare alcune delle documentazioni di Microsofts, senza molta fortuna.

La guida originale ho seguito è stato questo uno:
http://www.analystcave.com/excel-use-c-sharp-in-excel-vba/

egli afferma quanto segue, ma I dont completamente capire.

If you are using an array as an argument be sure to use the C# “ref” get by reference option e.g. ref int[] ar

penso che sia qualcosa a che fare con 'MarshalAs' o il modo in cui ho letto i dati in VBA

Answer 1

If you are using an array as an argument be sure to use the C# “ref” get by reference option e.g. ref int[] ar

Questo è vero, ma non hanno tutti i metodi che accettano un argomento di matrice , quindi non si applica alla tua situazione.

Hai provato cambiando il metodo di firma:

public Log CreateLogBook() 

ad una firma che restituisce un array:

public Log[] CreateLogBook()