admin管理员组

文章数量:1531756

2024年6月28日发(作者:)

.

实用的EXCEL VBA编程小结:

最近单位内部的项目里要用到些报表EXCEL的生成,虽说JAVA 的POI可以有这能力,

但觉得还是可能比较麻烦,因此还是转用。net来搞,用Visual Studio2003配合office 2003,

用到了一些VBA,因此小结并归纳之,选了些资料归纳在这里,以备今后查考

首先创建 Excel 对象,使用ComObj:

Dim ExcelID as Excel。Application

Set ExcelID as new Excel。Application

1) 显示当前窗口:

ExcelID。Visible := True;

2) 更改 Excel 标题栏:

ExcelID。Caption := ’应用程序调用 Microsoft Excel’;

3) 添加新工作簿:

ExcelID。WorkBooks。Add;

.

.

4) 打开已存在的工作簿:

ExcelID。WorkBooks。Open( ’C:ExcelDemo。xls’ );

5) 设置第2个工作表为活动工作表:

ExcelID。WorkSheets[2].Activate;

或 eets[ ’Sheet2’ ].Activate;

6) 给单元格赋值:

ExcelID。Cells[1,4]。Value := ’第一行第四列';

7) 设置指定列的宽度(单位:字符个数),以第一列为例:

ExcelID。s[1].ColumnsWidth := 5;

8) 设置指定行的高度(单位:磅)(1磅=0。035厘米),以第二行为例:

ExcelID。[2]。RowHeight := 1/0.035; // 1厘米

9) 在第8行之前插入分页符:

ExcelID。WorkSheets[1]。Rows[8].PageBreak := 1;

.

本文标签: 工作编程单位归纳