Hello
Unfortunately, there is no such property for specifying a worksheet name.
You can do the following trick.
Copy file DBGridEhImpExp.pas into the folder of your project and make next changes.
(Let's say we want to change sheet1 to sheet999.)
Code:
ArrTarget: array [1 .. 3] of string = ('styles.xml', 'theme/theme1.xml',
'worksheets/sheet999.xml');
....
Node.AddChild('vt:lpstr').Text := 'Sheet999';
....
ArrAttributes: array [1 .. 11] of string = ('xl', '5', '5', '9303', '480',
'120', '27795', '12585', 'Sheet999', '1', 'rId1');
....
ArrExtension: array [1 .. 8] of string = ('rels', 'xml', '/xl/workbook.xml',
'/xl/worksheets/sheet999.xml', '/xl/theme/theme1.xml', '/xl/styles.xml',
'/docProps/core.xml', '/docProps/app.xml');
...
FZipFileProvider.AddFile(FSheetStr, 'xl/worksheets/sheet999.xml');
As a result of the export, a new name must be assigned.
Login
Register
FAQ
Search
