用VB操作Excel(VB6.0)(整理)
全面控制Excel:
首先创建Excel对象,使用ComObj: Dim ExcelID as Excel.Application Set ExcelID as new Excel.Application ?
1)显示当前窗口: ? ExcelID.Visible:=True; 2)更改Excel标题栏:
? ExcelID.Caption:='应用程序调用MicrosoftExcel'; 3)添加新工作簿:
4)打开已存在的工作簿:
5)设置第2个工作表为活动工作表:
? ExcelID.WorkSheets[2].Activate; 或ExcelID.WorkSheets['Sheet2'].Activate; 6)给单元格赋值:
? ExcelID.Cells[1,4].Value:='第一行第四列';
7)设置指定列的宽度(单位:字符个数),以第一列为例:
8)设置指定行的高度(单位:磅)(1磅=0.035厘米),以第二行为例:
9)在第8行之前插入分页符:
? ExcelID.WorkSheets[1].Rows[8].PageBreak:=1; 10)在第8列之前删除分页符:
11)指定边框线宽度:
? 1-左 2-右 3-顶4-底 5-斜(\\) 6-斜(/)
12)清除第一行第四列单元格公式:
13)设置第一行字体属性:
14)进行页面设置: a.页眉: b.页脚:
c.页眉到顶端边距2cm:
d.页脚到底端边距3cm: