insert row to Excel spreadseet from VB

K

Ken Snell

You must use Automation to open the EXCEL file and to write to the specific
"row" of cells.

This is some generic code:

Dim xlsApp As Object, xlsWB As Object, xlsWS As Object, xlsRng As Object
Set xlsApp = CreateObject("Excel.Application")
Set xlsWB = xlsApp.Workbooks.Open("C:\FolderName\FileName.xls", , True)
Set xlsWS = xlsWB.Worksheets("WorkSheetName")
Set xlsRng = xlsWS.Range("A1")
xlsRng.Value = VariableName
Set xlsRng = Nothing
Set xlsWS = Nothing
xlsWB.Close True
Set xlsWB = Nothing
xlsApp.Quit
Set xlsApp = Nothing
 
A

Alex

Thanks, Ken.
-----Original Message-----
You must use Automation to open the EXCEL file and to write to the specific
"row" of cells.

This is some generic code:

Dim xlsApp As Object, xlsWB As Object, xlsWS As Object, xlsRng As Object
Set xlsApp = CreateObject("Excel.Application")
Set xlsWB = xlsApp.Workbooks.Open
Click to expand...
("C:\FolderName\FileName.xls", , True)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

insering a row to spreadsheet using VB 2
fill excel with format 1
Convert Excel contact list to Outlook 2002 contacts 1
Export Range Woes 2
Select multiple rows and apply changes all at once 6
Importing a spreadsheet 1
insert a value in an excel row 1
Editing an excel spreadsheet with the new data in colored text? 1

Top