oExcel = CreateObject("Excel.Application")
WITH oExcel
.WorkBooks.Add
WITH .Cells(1,1).Resize(5,5)
.Value = "ABC"
.Borders.LineStyle = 1
.BorderAround(-4119,, 37) && 加外框及颜色,此行代码也可以不要。
ENDWITH
.Visible = .T.
ENDWITH
保存对不同文件中的工作表的更改。
语法
expression.SaveAs(FileName, FileFormat, Password, WriteResPassword, ReadOnlyRecommended, CreateBackup, AccessMode, ConflictResolution, AddToMru, TextCodepage, TextVisualLayout, Local)
expression 必需。该表达式返回上述对象中一个对象。
参数
Filename 字符型,可选。
该字符串表示要保存的文件名。一定要包含完整路径。如果不指...
关闭对象。
语法
object.Close(SaveChanges, Filename, RouteWorkbook)
参数
SaveChanges 逻辑型,可选。
如果工作簿没有改变则忽略此参数;
如果工作簿发生了改变并且在另外的窗口中也打开了该工作簿,则仍然忽略此参数;
如果工作簿发生了改变并且没有在另外的窗口中打开,则此参数将指定是否在工作簿中保存所发生的更改。
取值与操作如下表所示:
值 作用
.T. 将改变保存到工作簿。如果该工作簿尚未命名,则使用 FileName 指定的名称。如果省略 FileName 参数,则要求用户输...
打开一个工作簿。返回一个 Workbooks 对象。
语法
object.Open(FileName, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMru, Local, CorruptLoad)
参数
FileName 字符型,必需。要打开的工作簿的文件名。
UpdateLinks 整型,可选。指定文件中链接的更新方式。
如...
新建工作簿。新建的工作簿将成为活动工作簿。返回 Workbook 对象。
语法
object.Add(Template)
该表达式返回一个 Workbooks 对象。
参数
Template 字符型或整型,可选。确定如何创建工作簿。
如果本参数指定为一现有 Microsoft Excel 文件名的字符串,那么创建新工作簿将以该指定的文件作为模板。
如果本参数为常量,新工作簿将包含指定类型的单张工作表。可为下表 XlWBATemplate 枚举中常量之一。XlWBATemplate 枚举
常量 值 描述
xlWBATChart -410...
新建工作表、图表或宏表。新建的工作表将成为活动工作表。使用 Add 方法可创建一个新的工作表并将它添加到集合。
语法
表达式 .Add( Before, After, Count, Type )
表达式 一个代表 Sheets 对象的变量。
参数
名称 必需/可选 数据类型 说明
Before 可选 对象型 指定工作表的对象,新建的工作表将置于此工作表之前。
After 可选 对象型 指定工作表的对象,新建的工作表将置于此工作表之后。
Count 可选 数值型 要添加的工作表数。默认值为 1。
Type 可选 数值型 指定工作表类型。可以...
实现仅包含 9 X 9 个单元格区域的窗口界面。
oExcel=CreateObject("Excel.Application")
WITH oExcel
.WorkBooks.Add
oRange = .Range("A1:I9")
WITH .ActiveWindow
.DisplayHeadings = .F.
.DisplayHorizontalScrollBar = .F.
.DisplayVerticalScrollBar = .F.
.DisplayWorkbookTab...
oExcel=CreateObject("Excel.Application")
WITH oExcel
.WorkBooks.Add
.DisplayFullScreen = .T.
.CommandBars(1).Enabled = .F.
.CommandBars("Full Screen").Controls(1).Onaction = "RestoreWindow"
WITH .ActiveWindow
.DisplayHeadings = .F.
.DisplayHorizontalScr...
在 Excel 中使用 Window 对象的 WindowState 属性返回或设置窗口的状态,该属性取值可为 XlWindowState 枚举常量之一,分别对应着窗口的 3 种状态。
XlWindowState 枚举
指定窗口的状态。
名称 值 描述
xlMaximized -4137 最大化
xlMinimized -4140 最小化
xlNormal -4143 正常
oExcel=CreateObject("Excel.Application")
WITH oExcel
.WorkBooks.Add
.WindowState = x...
oExcel=CreateObject("Excel.Application")
WITH oExcel
.WorkBooks.Add
.Caption = "XXXX信息管理系统"
.ActiveWindow.Caption = ""
.Visible = .T.
ENDWITH