I like assigning data kept in a range to a variant array where possible. I
see that when the range consists of only a single cell, the variant takes on
the value of the cell and does not become an array (which makes sense). I
just don't know how to keep it an array. Sample code below:

Thanks!

Private Function IDataStorageConnection_Connect() As Boolean
Dim v As Variant
v = DataRng <------ this ia an Xl data range
MemoryStorage.VariantArray = v
MemoryStorage.IMemoryStorage_PopulateMemory
End Function