VFP下的SQL和EXCEL技术 2

来源:百度文库 编辑:神马文学网 时间:2024/04/26 14:40:23
SKIP

 

ENDFOR

调整单元格宽度:

MYEXCEL.ACTIVEWORKBOOK.SHEETS(1).CELLS(1,1).columnwidth=30

调整单元格对齐方式:

MYEXCEL.ACTIVEWORKBOOK.SHEETS(1).CELLS(1,1).horizontalalig=1

1为默认方式,2为左对齐,3为中对齐,4为右对齐。

如何将数据存储:

MYEXCEL.SAVE()

注:可以用Save(FileName)指定预存储文件名, 则可不用激活SAVE AS 窗口

如何打印表格:

MYEXCEL.ActiveWorkBook.PrintOut &&默认打印增个Sheet

如何指定打印表格:

MYEXCEL.ActiveWorkBook.PrintOut(1,1,1,.T.) &&默认打印增个Sheet

PrintOut有四个参数

A. 数值:,表示指定的工作簿中进行打印的Sheet 的开始编号

B. 数值:,表示指定的工作簿中进行打印的Sheet 的结束编号

C.打印分数.

D.是否进行 Preview, .T.,预览, .F.打印

如何产生统计图

CURROW=MYEXCEL.ACTIVESHEET.ROWS.COUNT

RANGESTRING='A1:'+'B'+ALLTRIM(STR(CURROW))

MYEXCEL.RANGE(RANGESTRING).SELECT

MYEXCEL.CHARTS.ADD

结束EXCEL

MYEXCEL.QUIT

EXCEL.ActiveWindow.SelectedSheets.PrintPreview &&预览打印

EXCEL.ActiveWorkbook.SaveAs("C:\My Documents\Book1.xls") &&另存为

EXCEL.ActiveWorkbook.Close &&关闭一个工作表,如果有修改则提示

EXCEL.ActiveWorkbook.Close(.t.) &&提示另存为

EXCEL.ActiveWorkbook.Close(.f.) &&关闭一个工作表不用提示是否存盘