<

VB.Net To Excel Usual Stuff

Published on
10,224 Points
4,124 Views
1 Endorsement
Last Modified:
Approved
Avinash Desai
I am normal programmer with skill list consisting of .Net programming for desktop apps and Excel addin devs..
It’s quite interesting for me as I worked with Excel using vb.net for some time.
Here are some topics which I know want to share with others whom this might help.
First of all if you are working with Excel then you need to Download the Following

http://www.microsoft.com/downloads/details.aspx?familyid=c41bd61e-3060-4f71-a6b4-01feba508e52&displaylang=en

And then extract it and then add Microsoft.Office.Interop.Excel as reference then start writing the things you want to accomplish using .net and Excel.

This Blog or Article helps you to write values to excel,Merge Cells,Protect Excel sheet with Passwords and Many more stuffs.
Import the Statement in to your form or Class
Imports Microsoft.Office.Interop.Excel
 
Private Sub WorkingWithExcel()

'Declaring variable for Excel sheet
Dim xlApp As New Microsoft.Office.Interop.Excel.ApplicationClass
Dim xlWorkBook As Microsoft.Office.Interop.Excel.Workbook
Dim xlWorkSheet As Microsoft.Office.Interop.Excel.Worksheet
'Set the File path
xlWorkBook = xlApp.Workbooks.Open("File Path")
xlWorkSheet = xlWorkBook.Worksheets("Sheet1$")
With xlWorkSheet
'ASSIGN VALUE TO A CELL. Here below the value is assigned to 8th Row 12th 'column
.Cells(8, 12).Value ="This is test sentence."

'Add Rows to the Excel sheet.Here it inserts the row at 10th position
.Range("A10").EntireRow.Insert()

'Delete Rows to the Excel sheet.Here it Deletes the 10th Row
.Range("A10").EntireRow.Delete()


'Below code Merges the Entire row
.Range("A" & RowNo).EntireRow.MergeCells = True

'If you want to Merge only Cells not rows then Below code does it.
'Below merges Cells from C to F of 10th ROW
.Range("C10:F10").MergeCells = True


End With

'Before Saving if you want to Protect the Excel sheet with Password then
'below code tells how to assign the password for Excel workbook
xlWorkBook.Password = "TEST"

'Save the WORKBOOK..
xlWorkBook.Save()

'Close the WorkBook
xlWorkBook.Close()
xlApp.Quit()
'Below Releases the Excel sheet from the system process.
releaseObject(xlApp)
releaseObject(xlWorkBook)
releaseObject(xlWorkSheet)
End  Sub
''' <summary>
''' Releases the excel from the system process
''' </summary>
''' <param name="obj">
</param>

''' <remarks></remarks>
Private Sub releaseObject(ByVal obj As Object)
Try
System.Runtime.InteropServices.Marshal.ReleaseComObject(obj)
obj = Nothing
Catch ex As Exception
obj = Nothing
Finally
GC.Collect()
End Try
End Sub

Open in new window


If you have any query or suggestion to the code please send me a message or leave comment here..

Hope you liked this code .
1
Comment
1 Comment
 
LVL 3

Author Comment

by:Avinash Desai
Thanks for publishing ...

Dear Readers

If any question or any errors please let me know so that i can correct it

Regards
Avinash Desai
0

Featured Post

[Webinar] Kill tickets & tabs using PowerShell

Are you tired of cycling through the same browser tabs everyday to close the same repetitive tickets? In this webinar JumpCloud will show how you can leverage RESTful APIs to build your own PowerShell modules to kill tickets & tabs using the PowerShell command Invoke-RestMethod.

Join & Write a Comment

The Relationships Diagram is a good way to get an overall view of what a database is keeping track of. It is also where relationships are defined. A relationship specifies how two tables connect to each other. As you build tables in Microsoft Ac…
Enter Foreign and Special Characters Enter characters you can't find on a keyboard using its ASCII code ... and learn how to make a handy reference for yourself using Excel ~ Use these codes in any Windows application! ... whether it is a Micr…
Suggested Courses
Course of the Month3 days, 5 hours left to enroll

Keep in touch with Experts Exchange

Tech news and trends delivered to your inbox every month