找回密码
 立即注册
搜索

VBA之PPT里面的Row和Rows集合对象

2
回复
927
查看
[复制链接]

5

主题

9

帖子

70

幻币

江湖少侠

Rank: 2

积分
164
QQ
2017-10-13 10:16:05 显示全部楼层 |阅读模式
        一、Row 对象
  代表表格中的一行。Row 对象是 Rows 集合中的成员。Rows 集合中包含指定表格中的所有行。
  使用 Row 对象
  使用 Rows(index) 可返回一个 Row 对象,其中,index 是一个数字,它代表表格中行所在的位置。本示例删除表格(当前演示文稿中第二张幻灯片上的第五个形状)中的第一行。
  ActivePresentation.Slides(2).Shapes(5).Table.Rows(1).Delete
  使用 Select 方法可从表格中选择一行。本示例选择指定表格中的第一行。
  ActivePresentation.Slides(2).Shapes(5).Table.Rows(1).Select
  说明
  使用 Cells 属性可修改 Row 对象中的各个单元格。本示例选择表格中的第二行,并对其下框线应用虚线样式。
  ActiveWindow.Selection.ShapeRange.Table.Rows(2) .Cells.Borders(ppBorderBottom).DashStyle = msoLineDash
  二、Rows 集合对象 
  Row 对象的集合,代表表格中的行。
  使用 Rows 集合
  使用 Rows 属性可返回 Rows 集合。本示例把指定表格中所有行的高度更改为 160 磅。
  Dim i As Integer
  With ActivePresentation.Slides(2).Shapes(4).Table
  For i = 1 To .Rows.Count
   .Rows.Height = 160
   Next i
  End With
  使用 Add 方法可向表格中添加一行。本示例在被引用表格的第二行之前插入一个新行。
  ActivePresentation.Slides(2).Shapes(5).Table.Rows.Add (2)
  使用 Rows(index) 可返回一个 Row 对象,其中,index 是一个数字,它代表表格中行所在的位置。本示例将删除表格(第二张幻灯片上的第五个形状)中的第一行。
  ActivePresentation.Slides(2).Shapes(5).Table.Rows(1).Delete

PPT学习论坛
回复

使用道具 举报

1

主题

7

帖子

48

幻币

一流武者

Rank: 3Rank: 3

积分
258
QQ
2017-10-14 14:22:44 显示全部楼层
真好。。。。。。。。。  
PPT学习论坛
回复 支持 反对

使用道具 举报

0

主题

5

帖子

54

幻币

一流武者

Rank: 3Rank: 3

积分
219
QQ
2017-10-16 00:19:20 显示全部楼层
好啊,,不错、、、、  
PPT学习论坛
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册