找出其存在的问题，并提出解决方案。针对要开发的系统进行人事系统调研，提出开发系统的可行性分析。在系统结构设计中先后用数据流图、数据字典、系统的功能结构图分析了系统所需的各种数据。在系统的设计中，详细的展现了系统的各个功能模块、所需的数据库表及表字段、系统菜单的设计等。
在系统的实现中，给出了系统的界
最近正好有空，看到不少人对VFP控制EXCEL有兴趣，现将上次的“精华贴”重新整理一下，供各位爱好者参考！
oExcel.Selection.NumberFormatLocal = "@" &&把被选定的单元格设为文本格式
1、对象的创建与关闭 *******************************
eole=CREATEOBJECT('Excel.application') && 创建Excel对象
eole.Workbooks.add && 添加新工作簿
eole.Worksheets("sheet3").Activate && 设置第3个工作表为激活工作表
eole.Workbooks.Open("D:\ABC\11.xls") && 打开指定工作簿
eole.visible=.t. && 显示Excel窗口
eole.visible=.F. && 不显示Excel窗口
eole.Caption="VFP应用程序调用Microsoft Excel" && 更改Excel标题栏
eole.ActiveWorkbook.SaveAs("D:\ABC\22.xls") && 工作表另为
eole.ActiveWorkbook.saved=.t. && 放弃存盘
页脚内容1
找出其存在的问题，并提出解决方案。针对要开发的系统进行人事系统调研，提出开发系统的可行性分析。在系统结构设计中先后用数据流图、数据字典、系统的功能结构图分析了系统所需的各种数据。在系统的设计中，详细的展现了系统的各个功能模块、所需的数据库表及表字段、系统菜单的设计等。
在系统的实现中，给出了系统的界
edRange.Copy && 拷贝整个工作表
eole.ActiveSheet.Range("A1:E2").Copy && 拷贝指定区域
eole.WorkSheet("Sheet2").Range("A1").PasteSpecial && 粘贴
eole.ActiveWorkbook.Save && 存盘（自动存盘不提问）
eole.Workbooks.close && 关闭工作簿
eole.quit && 退出Excel
2、单元格的设置 ***********************************
eole.ActiveSheet.Columns("D:D").Delete && 删除列
eole.ActiveSheet.Columns("A:B").Delete && 删除列
eole.ActiveSheet.Columns(1).ColumnWidth=20 && 列的宽度(单位：字符个数)
eole.ActiveSheet.Columns(2).ColumnWidth=30
页脚内容2
找出其存在的问题，并提出解决方案。针对要开发的系统进行人事系统调研，提出开发系统的可行性分析。在系统结构设计中先后用数据流图、数据字典、系统的功能结构图分析了系统所需的各种数据。在系统的设计中，详细的展现了系统的各个功能模块、所需的数据库表及表字段、系统菜单的设计等。
在系统的实现中，给出了系统的界
eole.ActiveSheet.Columns("C:BE").ColumnWidth=9.5
eole.Selection.Columns.AutoFit && 最适合的列宽
eole.ActiveSheet.Range("b3:d3").Borders(2).Weight=3 && 指定边框线宽度
(其中Borders参数：1－左、2－右、3－顶、4－底、5－斜、6－斜/；
LineStyle值：1与7－细实、2－细虚、4－点虚、9－双细实线)
eole.ActiveSheet.Range("A1:BE29").Borders(1).LineStyle=1 && 设置四个边框线条的类型
eole.ActiveSheet.Range("A1:BE29").Borders(2).LineStyle=1 && 设置四个边框线条的类型
eole.ActiveSheet.Range("A1:BE29").Borders(3).LineStyle=1 && 设置四个边框线条的类型
eole.ActiveSheet.Range("A1:BE29").Borders(4).LineStyle=1 && 设置四个边框线条的类型
eole.ActiveSheet.Rows(1).Insert && 在第1行之前插入一行
eole.ActiveSheet.Columns(2).Insert && 在第2列之前插入一列
页脚内容3
找出其存在的问题，并提出解决方案。针对要开发的系统进行人事系统调研，提出开发系统的可行性分析。在系统结构设计中先后用数据流图、数据字典、系统的功能结构图分析了系统所需的各种数据。在系统的设计中，详细的展现了系统的各个功能模块、所需的数据库表及表字段、系统菜单的设计等。
在系统的实现中，给出了系统的界
eole.cells(1,2).value="ABTMC" && 给单元格赋值
eole.cells(2,2).value="&BBBB" && 给单元格赋值
eole.ActiveSheet.Cells(1,4).ClearContents && 清除单元格公式
eole.ActiveSheet.Rows(1).RowHeight=1/0.035 && 设置指定行的高度(单位：磅)
*(行高为1厘米，1磅=0.035厘米)
eole.ActiveSheet.ROWS(1)="黑体" && 设置字体
eole.ActiveSheet.ROWS(1).Font.Size=14 && 设置字体大小
eole.ActiveSheet.ROWS(1).Font.Bold=.t. && 设置整行字体为粗体
eole.ActiveSheet.Cells(1,1).Font.Italic=.t. && 设置字体为斜体
eole.Range("A3:BE3").select
eole.selection.WrapText = .T. && 自动换行
eole.selection.HorizontalAlignment=3 && 水平方向2左对齐，3居中，4右对齐
eole.selection.VerticalAlignment = 2 && 垂直方向1靠上，2居中，3靠下
页脚内容4
