摘要: Sub SplitTextFrame() '多段落文本框拆为多文本框一段落,加上(#)编号 Dim pre As Presentation Dim sld As Slide Dim shp As Shape Dim shp2 As Shape Set pre = ActivePresentation 阅读全文
posted @ 2022-05-06 23:50 wangway 阅读(69) 评论(0) 推荐(0) 编辑