ByteScout Barcode Suite – VB.NET – Calculate xirr function with spreadsheet sdk

Home
/
Articles
/
ByteScout Barcode Suite – VB.NET – Calculate xirr function with spreadsheet sdk

printable version:
ByteScout-Barcode-Suite-VB-NET-Calculate-xirr-function-with-spreadsheet-sdk.pdf

How to calculate xirr function with spreadsheet sdk in VB.NET using ByteScout Barcode Suite

If you want to learn more then this tutorial will show how to calculate xirr function with spreadsheet sdk in VB.NET

On this page you will learn from code samples for programming in VB.NET.Writing of the code to calculate xirr function with spreadsheet sdk in VB.NET can be executed by programmers of any level using ByteScout Barcode Suite. ByteScout Barcode Suite is the bundle that privides 3 SDK products to generate barcodes (Barcode SDK), read barcodes (Barcode Reaer SDK) and read and write spreadsheets (Spreadsheet SDK). It can be applied to calculate xirr function with spreadsheet sdk using VB.NET.

Want to save time? You will save a lot of time on writing and testing code as you may just take the VB.NET code from ByteScout Barcode Suite for calculate xirr function with spreadsheet sdk below and use it in your application. Simply copy and paste in your VB.NET project or application you and then run your app! Enjoy writing a code with ready-to-use sample VB.NET codes.

If you want to try other source code samples then the free trial version of ByteScout Barcode Suite is available for download from our website. Just try other source code samples for VB.NET.

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.IO

Imports Bytescout.Spreadsheet
Module Module1

    Sub Main()
        ' Create new Spreadsheet
        Dim document As New Spreadsheet()

        ' Set locale
        document.Workbook.Locale = New System.Globalization.CultureInfo("en-US")

        ' Add new worksheet
        Dim worksheet As Worksheet = document.Workbook.Worksheets.Add()

        ' Fill some data
        worksheet.Cell(1, 1).Value = New DateTime(2008, 1, 1)
        worksheet.Cell(1, 2).Value = 100
        worksheet.Cell(2, 1).Value = New DateTime(2009, 1, 1)
        worksheet.Cell(2, 2).Value = -200

        ' Apply function
        worksheet.Cell(4, 1).Formula = "=XIRR(C2:C3,B2:B3,0)"
        ' Read value
        worksheet.Cell(4, 2).Value = worksheet.Cell(4, 1).Value

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

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

        ' Close Spreadsheet
        document.Close()

        ' open generated XLS document in default program
        Process.Start("Output.xls")
    End Sub

End Module