PPT复制页面
def duplicate_slide(pres, index):source = pres.slides
try:
blank_slide_layout = pres.slide_layouts
except:
blank_slide_layout = pres.slide_layouts
dest = pres.slides.add_slide(blank_slide_layout)
for shp in source.shapes:
el = shp.element
newel = copy.deepcopy(el)
dest.shapes._spTree.insert_element_before(newel, 'p:extLst')
for key, value in source.rels.iteritems():
if not "notesSlide" in value.reltype:
dest.rels.add_relationship(value.reltype, value._target, value.rId)
return dest
页:
[1]