Spreadsheet.Data

This property returns/sets the spreadsheet data as a two dimensional array of doubles.

Syntax Parameters Return Value
- - Double()

SVB Example

Retrieving and assigning data: 

Option Base 1
Option Explicit
Sub Main
    Dim Array1() As Double
    'data is assigned to the Array1
    'also ReDim array to the size of the spreadsheet
    Array1 = ActiveSpreadsheet.Data
    'create new spreadsheet and set size
    Dim spr2 As New Spreadsheet
    spr2.SetSize(ActiveSpreadsheet.NumberOfCases, ActiveSpreadsheet.NumberOfVariables)
    'copy the data to a new spreadsheet
    spr2.Data = Array1
    spr2.Visible = True
End Sub