PowerBuilder通过OLE操作Excel详解

"PB操作Excel涉及使用PowerBuilder (PB) 中的OLE自动化技术来与Microsoft Excel进行交互，实现对Excel文件的各种操作，如创建、打开、修改和设置工作表属性等。" 在PowerBuilder中，我们可以创建一个Excel对象，通过`create oleobject`和`connecttonewobject`方法连接到Excel应用程序。以下是一些关键的操作步骤： 1. 显示Excel窗口：通过设置`ExcelApp.Visible`为`True`，可以使Excel应用程序窗口可见，允许用户查看并交互。 2. 设置Excel标题：通过`ExcelApp.Caption`属性可以更改Excel窗口标题，例如设置为'应用程序调用Microsoft Excel'。 3. 添加新工作簿：使用`ExcelApp.WorkBooks.Add`方法可以在当前Excel实例中创建一个新的工作簿。 4. 打开已存在工作簿：通过`ExcelApp.WorkBooks.Open`方法，指定文件路径（如'C:\Excel\Demo.xls'），可以打开已存在的Excel文件。 5. 激活工作表：可以使用`ExcelApp.WorkSheets[index]`或`ExcelApp.WorkSheets[name]`来选择和激活特定的工作表。例如，`ExcelApp.WorkSheets[2].Activate`或`ExcelApp.WorkSheets['Sheet2'].Activate`将激活名为'Sheet2'或索引为2的工作表。 6. 设置单元格值：通过`ExcelApp.Cells[row, column].Value`可修改单元格的值，如`ExcelApp.Cells[1, 4].Value := '某一内容'`。 7. 调整列宽：利用`ExcelApp.ActiveSheet.Columns[column].ColumnWidth`可以改变列的宽度，例如`ExcelApp.ActiveSheet.Columns[1].ColumnWidth := 5`。 8. 调整行高：通过`ExcelApp.ActiveSheet.Rows[row].RowHeight`可以设定行的高度，如`ExcelApp.ActiveSheet.Rows[2].RowHeight := 1/0.035`，这里的高度单位转换是基于点（pt）到像素的计算。 9. 设置分页符：`ExcelApp.WorkSheets[1].Rows[8].PageBreak`用于设置分页符，值1表示插入分页符，0表示删除。 10. 清除单元格内容：`ExcelApp.ActiveSheet.Cells[row, column].ClearContents`可以清除指定单元格的内容。 11. 设置边框样式：利用`ExcelApp.ActiveSheet.Range[row_start:column_end].Borders[index].Weight`可以设定边框的粗细，例如`ExcelApp.ActiveSheet.Range['B3:D4'].Borders[2].Weight := 3`设置B3到D4区域的边框线粗细为3磅。 12. 清除单元格格式：`ExcelApp.ActiveSheet.Cells[row, column].ClearFormats`可以清除单元格的所有格式。 13. 设置字体样式：通过`ExcelApp.ActiveSheet.Rows[row].Font`属性可以修改字体样式，包括`Name`（字体类型）、`Color`（颜色）、`Bold`（是否加粗），例如`ExcelApp.ActiveSheet.Rows[1].Font.Name := ''; ExcelApp.ActiveSheet.Rows[1].Font.Color := clBlue; ExcelApp.ActiveSheet.Rows[1].Font.Bold := True;`将第一行的字体设为空，颜色设为蓝色，并加粗。 以上操作展示了如何利用PowerBuilder通过OLE自动化与Excel交互，实现对Excel文件的高级操作，这对于数据分析、报表生成和数据导入导出等任务非常有用。