ByteScout Barcode Suite – VB.NET – Validate data in cell and mark wrong with color with spreadsheet sdk

Home
/
Articles
/
ByteScout Barcode Suite – VB.NET – Validate data in cell and mark wrong with color with spreadsheet sdk

printable version:
ByteScout-Barcode-Suite-VB-NET-Validate-data-in-cell-and-mark-wrong-with-color-with-spreadsheet-sdk.pdf

validate data in cell and mark wrong with color with spreadsheet sdk in VB.NET using ByteScout Barcode Suite

validate data in cell and mark wrong with color with spreadsheet sdk in VB.NET

This page explains the steps and algorithm of implementing validate data in cell and mark wrong with color with spreadsheet sdk and how to make it work in your application. ByteScout Barcode Suite was created to assist validate data in cell and mark wrong with color with spreadsheet sdk in VB.NET. ByteScout Barcode Suite is the set that includes three different SDK products to generate barcodes, read barcodes and read and write spreadsheets: Barcode SDK, Barcode Reader SDK and Spreadsheet SDK.

Save time on writing and testing code by using the code below and use it in your application. 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 validate data in cell and mark wrong with color with spreadsheet sdk in your app.

Trial version can be downloaded from our website for free. It contains this and 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 Bytescout.Spreadsheet
Imports System.IO

Module Module1

    Sub Main()
        ' Create new Spreadsheet
        Dim document As New Spreadsheet()
document.LoadFromFile("Data.xls")

        ' Get worksheet by name
        Dim worksheet As Worksheet = document.Workbook.Worksheets.ByName("Sample")

        ' Spellcheck words
        For i As Integer = 0 To 4
            ' Set current cell
            Dim currentCell As Cell = worksheet.Cell(0, i)

            ' Spellcheck current cell
            If currentCell.Value = "Simpsan" Then
                ' Set fill pattern
                currentCell.FillPattern = Bytescout.Spreadsheet.Constants.PatternStyle.Solid

                ' Markup wrong word by red color
                currentCell.FillPatternForeColor = System.Drawing.Color.Red
            End If
        Next


        ' 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