Visual Foxpro中如何实现对EXCEL表格的操作.doc

Visual Foxpro中如何实现对EXCEL表格的操作.doc

ID:52884262

大小:662.50 KB

页数:71页

时间:2020-03-31

Visual Foxpro中如何实现对EXCEL表格的操作.doc_第1页
Visual Foxpro中如何实现对EXCEL表格的操作.doc_第2页
Visual Foxpro中如何实现对EXCEL表格的操作.doc_第3页
Visual Foxpro中如何实现对EXCEL表格的操作.doc_第4页
Visual Foxpro中如何实现对EXCEL表格的操作.doc_第5页
Visual Foxpro中如何实现对EXCEL表格的操作.doc_第6页
Visual Foxpro中如何实现对EXCEL表格的操作.doc_第7页
Visual Foxpro中如何实现对EXCEL表格的操作.doc_第8页
Visual Foxpro中如何实现对EXCEL表格的操作.doc_第9页
Visual Foxpro中如何实现对EXCEL表格的操作.doc_第10页
资源描述:

《Visual Foxpro中如何实现对EXCEL表格的操作.doc》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库

1、VisualFoxpro中如何实现对EXCEL表格的操作71VFP和Excel都可以用来进行处理数据库表格,如果巧妙地将二者的优点结合起来,将会大大方便我们的工作。比如我们可以利用VFP进行处理数据,而利用Excel的预览打印功能进行报表打印。这就需要我们在VFP中直接来控制Excel。下面就在开发VFP应用项目时对Excel的控制作一下介绍:1.创建Excel对象oExcel=CREATEOBJECT("Excel.application")2.添加新工作簿oExcel.Workbooks.add3.设置第3个工作表为激活工作表oExcel.Wor

2、ksheets("sheet3").Activate4.打开指定工作簿oExcel.Workbooks.Open("c:templl.xls")5.显示Excel窗口oExcel.visible=.t.6.更改Excel标题栏oExcel.Caption="VFP应用程序调用MicrosoftExcel"7.给单元格赋值oExcel.cells(1,4).value=XM(XM为数据库字段名)8.设置指定列的宽度(单位:字符个数)oExcel.ActiveSheet.Columns(1).ColumnWidth=59.设置指定行的高度(单位:磅)

3、oExcel.ActiveSheet.Rows(1).RowHeight=1(设定行高为1磅,1磅=0.035厘米)oExcel.ActiveSheet.Rows("50:100").RowHeight=1&&设置第50行至100行的高度10.在第18行之前插入分页符oExcel.Worksheets("Sheet1").Rows(18).PageBreak=111.在第4列之前删除分页符oExcel.ActiveSheet.Columns(4).PageBreak=012.指定边框线宽度(Borders参数如下)ole.ActiveSheet.Ra

4、nge("b3:d3").Borders(2).Weight=313.设置四个边框线条的类型oExcel.ActiveSheet.Range("b3:d3").Borders(2).LineStyle=1(其中Borders参数:1-左、2-右、3-顶、4-底、5-斜、6-斜/;LineStyle值:1与7-细实、2-细虚、4-点虚、9-双细实线)14.设置页眉oExcel.ActiveSheet.PageSetup.CenterHeader="报表1"14.设置页眉(字体大小)oExcel.ActiveSheet.PageSetup.CenterH

5、eader="&50报表1"&&'&'后面的50可以自定义,表示字体的大小15.设置页脚oExcel.ActiveSheet.PageSetup.CenterFooter="第&P页"15.设置页脚(字体大小)oExcel.ActiveSheet.PageSetup.CenterFooter="&28第&P页"&&'&'后面的28可以自定义,表示字体的大小16.设置页眉到顶端边距为2厘米oExcel.ActiveSheet.PageSetup.HeaderMargin=2/0.03517.设置页脚到底边距为3厘米oExcel.ActiveSheet.

6、PageSetup.FooterMargin=3/0.03518.设置顶边距为2厘米oExcel.ActiveSheet.PageSetup.TopMargin=2/0.03519.设置底边距为4厘米oExcel.ActiveSheet.PageSetup.BottomMargin=4/0.03520.设置左边距为2厘米oExcel.ActiveSheet.PageSetup.LeftMargin=2/0.03521.设置右边距为2厘米oExcel.ActiveSheet.PageSetup.RightMargin=2/0.03522.设置页面水平居

7、中oExcel.ActiveSheet.PageSetup.CenterHorizontally=.t.23.设置页面垂直居中oExcel.ActiveSheet.PageSetup.CenterVertically=.t.24.设置页面纸张大小(1-窄行851139-宽行14119:A4)oExcel.ActiveSheet.PageSetup.PaperSize=125.打印单元格网线oExcel.ActiveSheet.PageSetup.PrintGridlines=.t.26.拷贝整个工作表oExcel.ActiveSheet.Use

8、dRange.Copy27.拷贝指定区域oExcel.ActiveSheet.Range("A1:E2").

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。