The sample source code below will teach you how to add images advanced with spreadsheet sdk in VB.NET. ByteScout Data Extraction Suite: 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. It can add images advanced 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 add images advanced with spreadsheet sdk. Simply copy and paste in your VB.NET project or application you and then run your app! This basic programming language sample code for VB.NET will do the whole work for you to add images advanced with spreadsheet sdk.
You can download free trial version of ByteScout Data Extraction Suite from our website to see and try many others 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)
Imports System.Collections.Generic Imports System.Diagnostics Imports System.IO Imports System.Text Imports Bytescout.Spreadsheet Imports Bytescout.Spreadsheet.MSODrawing Namespace AddImages Class Program Friend Shared Sub Main(args As String()) ' Create spreadsheet Dim doc As New Spreadsheet() ' Add worksheet Dim worksheet As Worksheet = doc.Worksheets.Add() ' Put an image to "C3" cell Dim shape As PictureShape = worksheet.Pictures.Add(2, 2, "image1.jpg") ' Make the picture "floating". It will be not moved if you move or resize the "C3" cell shape.PlacementType = Placement.FreeFloating ' Make the picture brighter shape.Brightness = 0.8F ' Put second image to "K11" cell shape = worksheet.Pictures.Add(10, 10, "image2.jpg") ' Make the picture bound to the cell. It will be moved alonf with the "K11" cell shape.PlacementType = Placement.Move ' Crop 10% from left and right side of the image shape.CropFromLeft = 0.1F shape.CropFromRight = 0.1F ' Delete output file if exists If File.Exists("output.xls") Then File.Delete("output.xls") End If ' Save document doc.SaveAs("output.xls") ' Close spreadsheet doc.Close() ' Open generated XLS document in default application Process.Start("output.xls") doc.Dispose() End Sub End Class End Namespace
60 Day Free Trial or Visit ByteScout Data Extraction Suite Home Page
Explore ByteScout Data Extraction Suite Documentation
Explore Samples
Sign Up for ByteScout Data Extraction Suite Online Training
Get Your API Key
Explore Web API Docs
Explore Web API Samples
60 Day Free Trial or Visit ByteScout Data Extraction Suite Home Page
Explore ByteScout Data Extraction Suite Documentation
Explore Samples
Sign Up for ByteScout Data Extraction Suite Online Training
Get Your API Key
Explore Web API Docs
Explore Web API Samples
also available as: