vba建工作的簿学习指导.doc

新建工作簿
参阅特性
若要在 Visual Basic 中创建新的工作簿,请使用 Add 方法。下述过程创建了新的工作簿。Microsoft Excel 自动将该工作簿命名为“BookN”,其中“N”是下一个可用的数字。新工作簿将成为活动工作簿。
Sub AddOne()

End Sub

创建新工作簿更好的方法是将其分配给一个对象变量。下例中,由 Add 方法返回的 Workbook 对象分配给了对象变量 newBook。然后,又设置了 newBook 的若干属性。使用对象变量可以很容易地控制新工作簿。
Sub AddNew()
Set NewBook =
With NewBook
.Title = "All Sales"
.Subject = "Sales"
.SaveAs Filename:=""
End With
End Sub

打开工作簿
参阅特性
用 Open 方法打开一个工作簿时,该工作簿将成为 Workbooks 集合的成员。下述过程打开 C 盘上名为 MyFolder 的文件夹中的 工作簿。
Sub OpenUp()
("C:\MyFolder\")
End Sub

按索引编号引用工作表
参阅特性
编号是分配给工作表的连续数字,基于其工作表标签在同一类型的工作表之间的位置(按从左到右计数)。下述过程使用 Worksheets 属性激活活动工作簿上的第一张工作表。
Sub FirstOne()
Worksheets(1).Activate
End Sub

如果要处理所有类型的工作表(工作表、图表、模块和对话框编辑表),可使用 Sheets 属性。下述过程激活工作簿中的第四张工作表。
Sub FourthOne()
Sheets(4).Activate
End Sub

注释  如果移动、添加或删除工作表,则编号顺序将会更改。
按名称引用工作表
参阅特性
使用 Worksheets 属性和 Charts 属性可通过名称来标识工作表。下述语句激活活动工作簿中的不同工作表。
Worksheets("Sheet1").Activate
Charts("Chart1").Activate

DialogSheets("Dialog1").Activate

可用 Sheets 属性返回工作表、图表、模块或对话框编辑表;Sheets 集合包含了所有这些表。下例激活活动工作簿中的“Chart1”。
Sub ActivateChart()
Sheets("Chart1").Activate
End Sub

注释   嵌入到工作表中的图表是 ChartObjects 集合的成员,而那些位于单独的工作表上的图表则属于 Charts 集合。
将文档保存为网页
参阅特性
在 Microsoft Excel 中,可以将工作簿、工作表、图表、区域、查询表、数据***表、打印区域或自动筛选区域保存到网页中。也可以直接在 Excel 中编辑 HTML 文件。
将文档保存为网页
将文档保存为网页是一个创建并保存 HTML 文件及任何支持文件的过程。若要完成此过程,请使用 SaveAs 方法,如下例所示,此示例将活动工作簿保存为“C:\Reports\”。
_
Filename:="C:\Reports\", _
FileFormat:=xlHTML

自定义网页
通过设置 DefaultWebOptions 对象和 WebOptions 对象的属性,用户可以自定义 HTML 文档的外观、内容、浏览器支持、编辑支持、图形格式、屏幕分辨率、文件组织和编码。DefaultWebOptions 对象包含应用程序级的属性。而任何具有相同名称的工作簿级属性设置(包含在 WebOptions 对象中)将优先于这些设置。
设置完属性后,可使用 Publish 方法将工作簿、工作表、图表、区域、查询表、数据***表、打印区域或自动筛选区域保存到网页中。下例设置了不同的应用程序级属性,然后设置了活动工作簿的 AllowPNG 属性,而此设置将优先于应用程序级的默认设置。最后,本示例将区域保存为“C:\Reports\”。
With
.RelyonVML = True
.Allo