2007中，如何设置文本框为图案填充？

hechunhualiu 发表于: 2008-6-24 15:47 来源: 扑奔PPT网

原来在2003中可以将文本框设置成PPT中已有的一些图案来填充，比如用斜纹填充或砖块状的图案填充，但在2007中却找不到怎么操作了，请问了高手知道吗？麻烦赐教一下啊！！！

大家对 2007中，如何设置文本框为图案填充？的评论

4kcoast 发表于 2008-6-24 17:03:42: 2007ppt的败笔在2007的word中有图案填充但是ppt中却没有···
4kcoast 发表于 2008-6-24 17:04:34: 解决的方法是在2003中填充图案或在2007的word中填充后复制到ppt中
laose 发表于 2008-6-24 20:29:04: '其实，07中还是可以实现的，要用VBA，ALT+F11,进入VBE，插入一模块，将下面的代码复制下来，回到，PPT界面，选中要做图案填充的的对象，运行宏，看看效果，当然，这种方法不是很方便。
Sub ShpFill()
Dim shp As Shape
Set shp = ActivePresentation.Slides(1).Shapes(1)  'Slides(1)和Shapes(1)后的数字分别是指第一张幻灯片第一个对象，可根据需要修改
With shp.Fill
      .Visible = msoTrue
      .BackColor.RGB = RGB(204, 102, 0)
      .ForeColor.RGB = RGB(95, 95, 95)
      .Patterned msoPattern90Percent  '可将鼠标定位在MSO中的M前按空格键调出提示框更换样式
End With
End Sub

[ 本帖最后由 laose 于 2008-6-24 20:32 编辑 ]
yaofengxu 发表于 2008-6-24 21:55:35: 感谢楼主，学习一下
sethyou 发表于 2008-6-24 22:35:52: 2007可以用图案填充文本框,选中文本框,右键,最后一项,"format picture"(format Shape) - " fill" -"Picture or Texture fill",选你喜欢的图案,done.

[ 本帖最后由 sethyou 于 2008-6-24 22:43 编辑 ]
sethyou 发表于 2008-6-24 22:37:42: 具体内容看图

[ 本帖最后由 sethyou 于 2008-6-24 22:39 编辑 ]

YY{5MV7Y~3$CO{A4NK9S@4Q.jpg
hechunhualiu 发表于 2008-6-25 10:59:15: 谢谢各位了，我还是采用了三楼的方法，不过把PPT中做好的文本框拷到WORD中时，会成图片格式，我得在WORD中新建文本框，才能进行图案填充的设置。
zhujun2121 发表于 2008-6-25 11:22:42: 哇，学习到了！！我一直也有这个困惑！
luos 发表于 2008-7-10 01:40:14: 解决的方法是在2003中填充图案或在2007的word中填充后复制到ppt中