ByteScout Data Extraction Suite – VB.NET – Set shrinktofit for cells with spreadsheet sdk

Home
/
Articles
/
ByteScout Data Extraction Suite – VB.NET – Set shrinktofit for cells with spreadsheet sdk

printable version:
ByteScout-Data-Extraction-Suite-VB-NET-Set-shrinktofit-for-cells-with-spreadsheet-sdk.pdf

How to set shrinktofit for cells with spreadsheet sdk in VB.NET and ByteScout Data Extraction Suite

Learning is essential in computer world and the tutorial below will demonstrate how to set shrinktofit for cells 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 set shrinktofit for cells with spreadsheet sdk in VB.NET can be executed by programmers of any level using ByteScout Data Extraction Suite. 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. It can set shrinktofit for cells with spreadsheet sdk in VB.NET.

Want to quickly learn? This fast application programming interfaces of ByteScout Data Extraction Suite for VB.NET plus the guidelines and the code below will help you quickly learn how to set shrinktofit for cells with spreadsheet sdk. Follow the instructions from scratch to work and copy the VB.NET code. This basic programming language sample code for VB.NET will do the whole work for you to set shrinktofit for cells with spreadsheet sdk.

ByteScout provides the free trial version of ByteScout Data Extraction Suite along with the documentation and source code samples.

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 Bytescout.Spreadsheet
Imports System.IO

Module Module1

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

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

        ' Set cell value
        worksheet.Cell(0, 0).Value = "Very, very, very, very long text"

        ' Shrink text
        worksheet.Cell(0, 0).ShrinkToFit = True


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

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

        ' Close Spreadsheet
        document.Close()

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

    End Sub

End Module