连接EXCEL.docVIP

****************************************************************************************** 39bar excel.39bar(col;row;barstr;Headstr;FootStr;Height) align 改变当前选中数据单元格的数据排列方式 excel.align(hAlign;vAlign) 参数说明: ..halign : 水平方向排列方式 ..valign : 垂直方向排列方式 其中hAlign : 0表示按系统缺省方式排列; 1表示居左排列; 2表示居中排列;3表示居右排列 其中valign : 0表示按系统缺省方式排列; 1表示居顶排列; 2表示居中排列; 3表示居底排列 excel.Align(2;2) //水平和垂直均居中排列 autofit excel.autofit 当前选中区域中的内容按缩小字体方式填充 无参数 autowrap excel.Autowrap 当数据量大于当前单元格时,允许自动换行 batchstart1 batchstatt2 batchcancel batchend 与EXCEL批量数据交换 excel.batchstart1(col;row) 批处理开始(方法1) excel.batchstart2(col;row) 批处理开始(方法2) excel.Batchcancel 取消批处理 excel.batchend 批处理结束 当有大量的数据需要与EXCEL进行交换时,如果仍采用常规的数据交换方式,则需要大量的处理时间.如果采用这一组批处理控制命令,则会极大地提高处理速度. 使用方法是,首先定义批处理开始点,然后执行常规的数据交换命令,最后通过excel.batchend命令执行数据交换.例: ... excel.batchstart1(2;3) //在cells[2,3]开始批处理 excel.cells(2;3)=321 //对CELLS进行赋值 excel.cells(2;4)=100 qry_emp.toexcel = 3;5 ... excel.batchend //完成批处理,执行真正的数据交换 ... Bottomline excel.BottomLine 无参数 EXCEL选择区域画底边框线 leftline excel.leftline 无参数 EXCEL选择区域画左边框线 Rightline excel.Rightline 无参数 EXCEL选择区域画右边框线 Topline excel.Topline 无参数 EXCEL选择区域画顶边框线 Cells(col;row) excel.cells(col;row) = Value 参数调用: ..Col: EXCEL单元格列坐标 ..Row: EXCEL单元格行坐标 ..Value: 单元格中的值 向EXCEL指定的单元格中赋值 close excel.close 无调用参数 关闭EXCEL color Excel.Color = value 调整EXCEL当前选中的单元格的背景色 Excel.Select(1;1;1;10) Excel.Color = clGreen Colwidth excel.Colwidth(col)=Colwidth 参数调用: ..Col: EXCEL列坐标 ..ColWidth: 列宽度值 调整EXCEL指定列的宽度 Copy Excel.Copy 无调用参数 执行EXCEL中的拷贝命令,将所选内容拷贝到剪切板中 CopyCols Excel.CopyCols(Col;ColCount) 参数调用: ..Col: EXCEL列坐标 ..ColCount: 需要拷贝的列数 多列整列拷贝 CopyRows Excel.CopyRows(Row;RowCount) 参数调用: ..Row: EXCEL行坐标 ..RowCount: 需要拷贝的行数 多行整行拷贝 DeleteRow Excel.DeleteRow(Row) 参数调用: ..Row: 需要删除的EXCEL行坐标 整行删除 Font Excel.Font = 字体;字号;粗否;斜否;字体色 调整EXCEL当前选中的单元格的字体 Excel.Select(1;1;1;10) Excel.Font = 宋体;16;True;False;clRed 请参阅字体 Frame Excel.Frame 无调用参数 EXCEL当前选中的单元格画外框 GridAll Excel.GridAll 无调用参数 EXCEL当前选中的单元格画表格线 InsertCol Exc