ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Appeding user data to the end of excel file (https://www.excelbanter.com/excel-programming/300622-appeding-user-data-end-excel-file.html)

Bharathi mohan

Appeding user data to the end of excel file
 
Hi friends,

I wrote a macro such that it will append some data at the end of th
excel file(I opened the file in binary mode and wrote the content)

The sample code will be like this

Open filename For Binary Access Write As #1
If startpos = 0 Then
startpos = LOF(1)
End If

Put #1, startpos, "my data"
Close #1

After closing the file and opening it in Notepad the data is stil
there.

But if i reopened it in excel and closed the file, the data is gone.
Excel overwrites the user defined data.

Assist me in keeping my data persistent so that i will retrieve th
contents and process it

--
Message posted from http://www.ExcelForum.com


Chip Pearson

Appeding user data to the end of excel file
 
You can't just write to Excel files using VBA's file write
procedures. Excel files are internally extremely complicated, and
VBA doesn't support the data types required to manipulate them
directly. You should use Excel itself to modify Excel files.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com




"Bharathi mohan "
wrote in message
...
Hi friends,

I wrote a macro such that it will append some data at the end

of the
excel file(I opened the file in binary mode and wrote the

content)

The sample code will be like this

Open filename For Binary Access Write As #1
If startpos = 0 Then
startpos = LOF(1)
End If

Put #1, startpos, "my data"
Close #1

After closing the file and opening it in Notepad the data is

still
there.

But if i reopened it in excel and closed the file, the data is

gone.
Excel overwrites the user defined data.

Assist me in keeping my data persistent so that i will retrieve

the
contents and process it.


---
Message posted from http://www.ExcelForum.com/




Tom Ogilvy

Appeding user data to the end of excel file
 
Some references:

http://support.microsoft.com/?id=253338
INFO: Office Developer Samples and Tools Available for Download

http://support.microsoft.com/?id=260410
OFF2000: Microsoft Office 2000 Automation Help File Available



--
Regards,
Tom Ogilvy

"Chip Pearson" wrote in message
...
You can't just write to Excel files using VBA's file write
procedures. Excel files are internally extremely complicated, and
VBA doesn't support the data types required to manipulate them
directly. You should use Excel itself to modify Excel files.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com




"Bharathi mohan "
wrote in message
...
Hi friends,

I wrote a macro such that it will append some data at the end

of the
excel file(I opened the file in binary mode and wrote the

content)

The sample code will be like this

Open filename For Binary Access Write As #1
If startpos = 0 Then
startpos = LOF(1)
End If

Put #1, startpos, "my data"
Close #1

After closing the file and opening it in Notepad the data is

still
there.

But if i reopened it in excel and closed the file, the data is

gone.
Excel overwrites the user defined data.

Assist me in keeping my data persistent so that i will retrieve

the
contents and process it.


---
Message posted from http://www.ExcelForum.com/






Jamie Collins

Appeding user data to the end of excel file
 
"Chip Pearson" wrote ...

You can't just write to Excel files using VBA's file write
procedures. Excel files are internally extremely complicated, and
VBA doesn't support the data types required to manipulate them
directly. You should use Excel itself to modify Excel files.


Another option is to use the Microsoft OLDB Provider for Jet i.e. ADO
and SQL to write data to an Excel file. Using SQL's INSERT INTO syntax
will append the new row to the bottom of the Excel range.

Jamie.

--


All times are GMT +1. The time now is 07:33 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com