XLSReadWriteII 4: Excel 97 file with more than 57344 rows

[digitalcamera]

Dear Axolot-Team,

this problem I've always posted as a mail, but didn't receive an answer. Because it's very important for me to solve the problem I decided to post the problem also here:

while using version 4 of XLSReadWriteII I'm encountering a problem when saving a file with 57.345 rows or more.

I've simplified the problem by writing only a counter to the file instead of real data.

The sample file was created by Creating an XLSReadWriteII4, appending a work sheet und than writing a counter in a simple 'for'-construction:

ActiveSheet.AsString [0, 0] := 'Counter';
for i := 1 to Count do begin
ActiveSheet.AsString [0, i] := IntToStr (i)
end;

ActiveSheet is a simple synonym for the appended worksheet. After this the data are saved with Filename property and Write method of XLSReadWriteII class.

If I try to open this file in Excel2000 there's no problem. Trying to open the file with Excel2003 results in an error message:

"File error: there may be data loss" (the original german message is: "Dateifehler: Daten sind möglicherweise verloren gegangen").

It seems that there are no data loss indeed but the error message shows that there's something wrong with the file.

The problem also occurs if I load a file created by Excel or by DTS of MS SQL Server 2000 und saving the file with XLSReadWrite - so it seems to be a problem in the Write-method.

The sample file for this problem was enclosed as attachement to the mail I sent Monday 07/21/2008 12:18

Many thanks and best regards

[vga]

procedure TForm1.btn1Click(Sender: TObject);
var
i: Integer;
begin
xls.Filename := 'c:\aa.xls';
xls.Sheets[0].AsString [0, 0] := 'Counter';
for i := 1 to 65535 do
begin
xls.sheets[0].AsString [0, i] := IntToStr (i);
xls.sheets[0].AsString [1, i] := 'Knappensee-Gro? S?rchen';
end;
xls.Write;
end;

[digitalcamera]

Dear Axolot-Team,

is there any idea for solving this problem.

I cannot see any help in the reply of vga except he has the same problem.

It is very important for us because we want to use the new autofilter and comment functions but we also need to write a large number of rows.

We wait for replay as soon as possible.

Many thanks and best regards

[digitalcamera]

Dear Axolot-Team,

We still haven't receive any reply for the problem. But why?

Can you please give us any reaction?

Can you reproduce the failure or not?

If not: how can we help you to do so?

It's indeed very important for us to solve the problem.

Many thanks and best regards

[larsa]

Hello

I can't reproduce this. I create a file with 65500 rows and open it with Excel 2003. There are no errors. Do you have the latest version of the component installed?

[digitalcamera]

Hello,

many thanks for reply.

We are using version 4.00.00 of XLSReadWriteII.

The problem remains the same, but I have tested it on other machines. It seems that the problem is service pack 3 for Office2003. On two machines which have yet installed only service pack 2 I can open the file without problems.

Only with Excel2003 SP3 this error seems to occur. Unfortunately our client has installed this service pack.

Best regards

[larsa]

Hello

I have tested this with Excel 2003 and SP3, and I can't reproduce this. Please install the latest update.

[digitalcamera]

Hello,

I've downloaded the latest version and it works. Thank you.

But now I have another problem:

When assigning a formula to a cell like 'IF(ISERROR(AVERAGE(B7:I7));"";AVERAGE(B7:I7))'
the resulting formula in the cell is 'IF(ISERROR(AVERAGE(B7:I7));"";AVERAGE(B7:I7);"";AVERAGE(B7:I7);AVERAGE(B7:I7))'
which results in a #VALUE#-error in Excel.

Kind regards