DocumentHost.Close

Use this function to closes the document.

Syntax Parameters Return value 
Sub DocumentHost.Close( _
    Optional SaveChanges As Variant, _
    Optional FileName As Variant)
  • SaveChanges [in, optional]

    Whether to save the file's changes.

    Type: Variant

  • FileName [in, optional]

    An alternate file path to save to (if saving changes).

    Type: Variant

This function does not return a value.

SVB Example

Opening an Office document in Statistica 

Sub Main

    'Open Weather report.xls as an Excel ActiveX document
    Dim H1 As DocumentHost
    Set H1 = DocumentHosts.Open(Path & "\Examples\Datasets\Weather report.xls")

    'Select the Excel file's range for the analysis
    VariableTypes = Array(0, 2, 0, 2)
    VariableWidths = Array(8, 128, 8, 128)
    VariableFormats = Array("m/d/yyyy", "", "General", "")

    'Set the Excel file's data to a spreadsheet
    Dim S1 As Spreadsheet
    Set S1 = H1.DataSet(1, 0, 2, 1, 31, 4, VariableTypes, VariableWidths, VariableFormats)

    'Perform a simple descriptive statistics
    Dim newanalysis2 As Analysis
    Set newanalysis2 = Analysis (scBasicStatistics, S1)
    Dim oStaDocs2 As StaDocuments

    'Basic Statistics and Tables: Weather report.xls (B2:AE31)
    Dim oAD1 As STABasicStatistics.BasStartup
    Set oAD1 = newanalysis2.Dialog
    oAD1.Statistics = scBasDescriptives

    newanalysis2.Run

    Dim oAD2 As STABasicStatistics.BasDescriptiveStatistics
    Set oAD2 = newanalysis2.Dialog
    oAD2.Variables = "3 "

    'Show the results
    oAD2.Summary.Visible = True

    'Close the Excel file and spreadsheet
    S1.Close(False)
    H1.Close(False)

End Sub