ByteScout Data Extraction Suite – VB.NET – Swap cells and their values with spreadsheet sdk

Home
/
Articles
/
ByteScout Data Extraction Suite – VB.NET – Swap cells and their values with spreadsheet sdk

printable version:
ByteScout-Data-Extraction-Suite-VB-NET-Swap-cells-and-their-values-with-spreadsheet-sdk.pdf

swap cells and their values with spreadsheet sdk in VB.NET and ByteScout Data Extraction Suite

Learn to code swap cells and their values with spreadsheet sdk in VB.NET: How-To tutorial

The example source codes on this page will display you how to make swap cells and their values with spreadsheet sdk in VB.NET. ByteScout Data Extraction Suite was made to help with swap cells and their values with spreadsheet sdk in VB.NET. ByteScout Data Extraction Suite is the set that includes 3 SDK products for data extraction from PDF, scans, images and from spreadsheets: PDF Extractor SDK, Data Extraction SDK, Barcode Reader SDK.

This rich and prolific sample source code in VB.NET for ByteScout Data Extraction Suite contains various functions and options you should do calling the API to implement swap cells and their values with spreadsheet sdk. If you want to implement this functionality, you should copy and paste code below into your app using code editor. Then compile and run your application. This basic programming language sample code for VB.NET will do the whole work for you in implementing swap cells and their values with spreadsheet sdk in your app.

Visit our website to get a free trial version of ByteScout Data Extraction Suite. Free trial contains many of source code samples to help you with your VB.NET project.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

Module1.vb

      Imports System
Imports System.Collections.Generic
Imports System.Text
Imports Bytescout.Spreadsheet
Imports System.Diagnostics
Imports System.IO

Module Module1

    Sub Main()
        ' Open existing Spreadsheets
        Dim document1 As New Spreadsheet()
document1.LoadFromFile("input.xls")

        ' Get first cell value
        Dim value1 As Object = document1.Worksheet(0).Cell("A1").Value
        ' Get another cell value
        Dim value2 As Object = document1.Worksheet(0).Cell("B1").Value

        ' Swap them
        Dim value3 As Object
        value3 = value2
        value2 = value1
        value1 = value3

        document1.Worksheet(0).Cell("A1").Value = value1
        document1.Worksheet(0).Cell("B1").Value = value2


        ' remove output file if already exists
        If File.Exists("Output.xls") Then
            File.Delete("Output.xls")
        End If

        ' Save document
        document1.SaveAs("Output.xls")

        ' Close Spreadsheet
        document1.Close()

        ' open in default spreadsheets viewer/editor
        Process.Start("Output.xls")
    End Sub

End Module