VBA Drucken Sie eine dreidimensionale Daten

Question

wie ein 3-dimensionales Array anzuzeigen, ohne seine genaue Größe zu kennen? Wenn der Variablenname DataSet ist. Aber ich bin mir nicht sicher über die Höhe und die Länge. In Makro,

msgbox(DataSet) 'type mismatch 
msgbox(DataSet(0,0,0))'subscript out of range 

oder allgemeines Beispiel geben. Schätze deine Hilfe, danke.

Answer 1

Sie können immer Nest eine For Schleife als solche:

For d1 = 0 to Ubound(myArray,1) 
    For d2 = 0 to UBound(myArray,2) 
     For d3 = 0 to UBound(myArray, 3) 
      sValue = sValue & vbNewLine & myArray(d1, d2, d3) 
     Next 
    Next 
Next 
MsgBox sValue