Hello!

I'm fairly new to VB, but I have some C, C++ background.

I'm trying to open an existing Excel Document, and add data in specific ranges from Text box inputs in my VB program. However I cannot seem to be able to do this.

The closest I've gotten was to Open the document, and save data, but it erases the items that were already in that document.

Can anyone help me out with this?

Here's what I have so far, haven't incorporated getting the data from the Text boxes yet - as I wanted to ensure the saved document would have the added information, along with the pre-existing data.

Dim oExcel As Excel.Application = New Excel.Application
oExcel.Workbooks.Open("C:\J\Test.xls")
Dim oBook As Object
Dim oSheet As Object

oBook = oExcel.Workbooks.Add

'Add data to cells of the first worksheet in the new workbook.
oSheet = oBook.Worksheets(1)
oSheet.Range("A1").Value = "Last Name"
oSheet.Range("B1").Value = "First Name"
oSheet.Range("A1:B1").Font.Bold = True
oSheet.Range("A2").Value = "Doe"
oSheet.Range("B2").Value = "John"

'Save the Workbook and quit Excel.
oBook.SaveAs("C:\J\Test3.xls")
oSheet = Nothing
oBook = Nothing
oExcel.Quit()
oExcel = Nothing
GC.Collect()


Thank you for any help you can provide!

(it wouldn't surprise me if the above is completely wrong..)

Recommended Answers

All 2 Replies

y don u try postin ur thread in VB Section.. i do hav a solution for dis in VB.net but not for VB..

What's the solution for vb.net? I actually might be using VB.net instead, it's the VB Express 2005 edition..? (yea, I'm that new to it I don't even know) :)

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.