We made thousands of pre-made source code pieces for easy implementation in your own programming projects. ByteScout Data Extraction Suite is the bundle that includes three SDK tools for data extraction from PDF, scans, images and from spreadsheets: PDF Extractor SDK, Data Extraction SDK, Barcode Reader SDK and you can use it to copy data between spreadsheets with spreadsheet sdk with VBScript.
The following code snippet for ByteScout Data Extraction Suite works best when you need to quickly copy data between spreadsheets with spreadsheet sdk in your VBScript application. This VBScript sample code is all you need for your app. Just copy and paste the code, add references (if needs to) and you are all set! If you want to use these VBScript sample examples in one or many applications then they can be used easily.
All these programming tutorials along with source code samples and ByteScout free trial version are available for download from our website.
' Create and activate two Spreadsheet objects Set srcDocument = CreateObject("Bytescout.Spreadsheet.Spreadsheet") srcDocument.RegistrationName = "demo" srcDocument.RegistrationKey = "demo" Set dstDocument = CreateObject("Bytescout.Spreadsheet.Spreadsheet") dstDocument.RegistrationName = "demo" dstDocument.RegistrationKey = "demo" ' Load exported data srcDocument.LoadFromFile ".\sample.csv" ' Load destination document dstDocument.LoadFromFile ".\destination.xlsx" ' Get worksheets Set srcWorksheet = srcDocument.Worksheet(0) Set dstWorksheet = dstDocument.Worksheet(0) ' Copy data from source to destination For row = 0 To 3 For column = 0 To 3 dstWorksheet.Cell(row, column).Value = srcWorksheet.Cell(row, column).Value Next Next ' Recalculate formulas dstDocument.Workbook.Calculate ' Save modified document as "result.xls" dstDocument.SaveAs ".\result.xls"