Word表格之VBA知识.doc

PAGE   = page 2-1 \* ROMAN I Word表格之VBA知识 Konggs 整理结束于2006年6月18日  目 录  TOC \o 1-3 \u Word表格之VBA知识  PAGEREF _Toc138379001 \h 1 Table 对象（因为是对象，所以用Set赋值）  PAGEREF _Toc138379002 \h 1 使用Table对象  PAGEREF _Toc138379003 \h 1 Cell 方法  PAGEREF _Toc138379004 \h 1 Split 方法  PAGEREF _Toc138379005 \h 2 Table属性  PAGEREF _Toc138379006 \h 2 Range 属性  PAGEREF _Toc138379007 \h 2 Borders 属性  PAGEREF _Toc138379008 \h 2 Columns 属性  PAGEREF _Toc138379009 \h 3 Rows 属性  PAGEREF _Toc138379010 \h 3 Column 对象  PAGEREF _Toc138379011 \h 3 使用 Column 对象  PAGEREF _Toc138379012 \h 3 Cell 对象  PAGEREF _Toc138379013 \h 4 使用 Cell 对象  PAGEREF _Toc138379014 \h 4 Row 对象  PAGEREF _Toc138379015 \h 5 使用 Row 对象  PAGEREF _Toc138379016 \h 5 访问表格行或列时产生的错误  PAGEREF _Toc138379017 \h 6 处理表格  PAGEREF _Toc138379018 \h 6  set ab  SECTIONPAGES \* MERGEFORMAT 2 2 Konggs整理 欢迎交流! 第  page 11 页 共  = NUMPAGES 13-ab 11 页 Word表格之VBA知识 （完全学习，按初学者的步骤至少用时：1－2天） Table 对象（因为是对象，所以用Set赋值） 该对象代表一个单独的表格。Table 对象是Tables集合的一个成员。Tables集合包含了指定的选定内容、范围或文档中的所有表格。 下面是Table的常用方法（注意是部分，不是全部，只例出重要的方法，下面的属性皆如此，如果详细面全部的了解，请看Word VBA自带的帮助。VBAWD10.chm） 使用Table对象 可使用 Tables(index) 返回一个 Table 对象，其中 index 为索引号。索引号代表选定内容、范围或文档中表格的位置。下例将活动文档中的第一个表格转换为文本。 ActiveDocument.Tables(1).ConvertToText Separator:=wdSeparateByTabs 使用Add方法可以在指定范围内新增一表格。下例在活动文档的起始处添加一 3 x 4 表格。 Set myRange = ActiveDocument.Range(Start:=0, End:=0) ActiveDocument.Tables.Add Range:=myRange, NumRows:=3, NumColumns:=4 Cell 方法 返回一个 Cell 对象，该对象代表表格中的一个单元格。 expression.Cell(Row, Column) expression 必需。该表达式返回一个Table对象。 Row Long 类型，必需。指返回的表格行数。可以是介于 1 和表格行数之间的任意整数。 Column Long 类型，必需。指返回的表格单元格数目。可以是介于 1 和表格列数之间的任意整数。 示例 本示例在新文档中创建一个 3ｘ3 表格，并在表格的第一个和最后一个单元格中插入文本。 Dim docNew As Document Dim tableNew As Table Set docNew = Documents.Add Set tableNew = docNew.Tables.Add(Selection.Range, 3, 3) With tableNew .Cell(1,1).Range.InsertAfter First cell .Cell(tableNew.Rows.Count, _ tableNew.Colu