Transfer Data to the Synthesis Data Warehouse (SDW)/VBA

Tutorial: Transfer Data from an Excel File to the SDW
Below is the VBA version of the tutorial.

VBA Sub Main DataCollection RawDataSet DataCollection.ExtractedName = DataCollection.ExtractedType = RawDataSetType_Weibull Row RawData i Integer, MaxRow  Integer MaxRow = 20 i = 2 MaxRow Row = RawData Row.StateFS = Sheet1.Cells(i, 1) Row.StateTime = Sheet1.Cells(i,2) Row.FailureMode = Sheet1.Cells(i,3) DataCollection.AddDataRow(Row) i   MyRepository  Repository MyRepository.ConnectToRepository MyRepository.DataWarehouse.SaveRawDataSet(DataCollection) End Sub