ExcelCopy
简述
把指定的Excel中的指定的Sheet的内容复制到剪贴板中。主要用于报告生成模板中,将Excel的数据和样式同时拷贝出来,再黏贴到word中。
ExcelCopy ( ExcelFileName:String; ExcelSheetName:String; [StartRow; StartCol; EndRow; EndCol: Integer=0]): Boolean;
名称 | 类型 | 说明 |
---|
ExcelFileName | String | 字符串类型。指定的Excel文件名。 |
ExcelSheetName | String | 字符串类型。指定的Sheet名。 |
StartRow | Integer=0 | 整数。指定所拷贝的开始行,缺省为0。如果值为0,则表示有数据的起始行号;如果值为负数,则表示有数据开始的行的前N行;如果为正数,则表示第N行。注:第一行为1。 |
StartCol | Integer=0 | 整数。指定所拷贝的开始列,缺省为0。如果值为0,则表示有数据的起始列号;如果值为负数,则表示有数据开始的列的前N列;如果为正数,则表示第N列。注:第一列为1。 |
EndRow | Integer=0 | 整数。指定所拷贝的结束行,缺省为0。如果值为0,则表示最末有数据的行;如果值为负数,则表示最末有数据的行的前N行;如果为正数,则表示第N行。注:第一行为1。 |
EndCol | Integer=0 | 整数。指定所拷贝的结束列,缺省为0。如果值为0,则表示最末有数据的列;如果值为负数,则表示最末有数据的列的前N列;如果为正数,则表示第N列。注:第一列为1。 |
返回 | Boolean | 如果成功则返回真,如果文件不存在或者Sheet不存在或者复制数据失败则返回假。 |
//word模板范例
//在c:\tsl\下新建一个word,如test.doc,word中代码:
[TSL]
ExcelName := 'c:\\tsl\\tmp.xls';
ExcelCopy(ExcelName,'Data',1,1,10,3);
WordPaste();
[/TSL]
//(用tsl编译执行)在c:\tsl\下新建一个tsl文件test.tsl,tsl代码:
wordtemplate('','c:\\tsl\\test.doc');
//在dos下执行语句:
tsl.exe test.tsl
//注意:c:\tsl目录是tsl的编译目录,必须有tsl的编译执行文件(tsl.exe)。
//结果将指定Excel的结果和样式都复制到了word中。