设置当前主题字体机制名
名称 | 类型 | 描述性 |
sName大全 | 字符串 | 主题字体方案名称 |
builder.CreateFile("pptx")!varoPresentation=api.GetpresentationvaroSlide=oPresentation.getSlideByIndex0varomasterssservations.GetMasters0varomeseVar oFontScheme=otheme.GetFontSchemesontScheme.SetFontsOFontScheme.SetSchemeNamevaroFinll =api.CreateSolidFillvarostroke=api.CreatestrokeVar Oshape = Api.CreateShapeoShape.SetPosition(608400, 1267200)!Shape.SetSize(300*36000,130*3600)varoccontent=oshape.getdoccontentvarodente=occontent.getEplement0oParagraph.SetJc("left")!odtext (新名设置为主题字体计划 )!oSlide.RemoveAllObjects()!oSlide.AddObject(oShape)!builder.SaveFile("pptx", "SetSchemeName.pptx")!builder.CloseFile();