日日操夜夜添-日日操影院-日日草夜夜操-日日干干-精品一区二区三区波多野结衣-精品一区二区三区高清免费不卡

公告:魔扣目錄網(wǎng)為廣大站長(zhǎng)提供免費(fèi)收錄網(wǎng)站服務(wù),提交前請(qǐng)做好本站友鏈:【 網(wǎng)站目錄:http://www.ylptlb.cn 】, 免友鏈快審服務(wù)(50元/站),

點(diǎn)擊這里在線咨詢客服
新站提交
  • 網(wǎng)站:51998
  • 待審:31
  • 小程序:12
  • 文章:1030137
  • 會(huì)員:747

調(diào)整PPT文字段落中的行間距,可以改善PPT的美觀效果。那么,PPT的行間距該如何調(diào)整呢?如果PPT內(nèi)只有一兩行文字,我們可以通過(guò)行間距命令來(lái)完成,但如果幾百?gòu)圥PT,都需要調(diào)整行間距,那么使用VBA代碼會(huì)更加明智快捷。

ppt行間距設(shè)置方法一:

選中需要調(diào)整的文字——單擊菜單“格式”——“行距”命令。打開(kāi)行距對(duì)話框,按需設(shè)置行間距就OK。

ppt行間距設(shè)置方法二:

ppt行間距也可以通過(guò)組合鍵來(lái)打開(kāi)行距對(duì)話框,ALT+O+S。

ppt行間距設(shè)置方法三:

如果是好幾百?gòu)圥PT就使用下面的代碼完成。按下ALT+F11,打開(kāi)VBE對(duì)話框,單擊插入——模塊,復(fù)制下面的代碼,按F5鍵運(yùn)行就可以完成PPT行間距設(shè)置。

Sub ChangeTextFont()Set pages = ActivePresentation.Slides.RangepageCount = pages.Count'第一頁(yè)和最后一頁(yè)跳過(guò)For i = 2 To pageCount – 1DoEventsActiveWindow.View.GotoSlide Index:=ishapeCount = ActiveWindow.Selection.SlideRange.Shapes.CountFor j = 1 To shapeCountActiveWindow.Selection.SlideRange.Shapes(j).SelectshapeType = ActiveWindow.Selection.SlideRange.Shapes(j).Type'1 – 自選圖形'7 – 公式'13 – 圖片'14 – 占位符'15 – 藝術(shù)字'17 – 文本框'19 – 表格'Debug.Print shapeTypeSelect Case shapeTypeCase 1, 14, 17Set txtRange = ActiveWindow.Selection.ShapeRange.TextFrame.TextRangetxtRange.SelectIf txtRange.Text <> "" Then'設(shè)置字體為宋體, 24號(hào)With txtRange.Font.Name = "宋體".Size = 24End With'設(shè)置段落格式為1.3倍行距With txtRange.ParagraphFormat.SpaceWithin = 1.3End WithEnd IfCase 7, 13, 15Case 19End SelectNext jNext iEnd Sub

分享到:
標(biāo)簽:
用戶無(wú)頭像

網(wǎng)友整理

注冊(cè)時(shí)間:

網(wǎng)站:5 個(gè)   小程序:0 個(gè)  文章:12 篇

  • 51998

    網(wǎng)站

  • 12

    小程序

  • 1030137

    文章

  • 747

    會(huì)員

趕快注冊(cè)賬號(hào),推廣您的網(wǎng)站吧!
最新入駐小程序

數(shù)獨(dú)大挑戰(zhàn)2018-06-03

數(shù)獨(dú)一種數(shù)學(xué)游戲,玩家需要根據(jù)9

答題星2018-06-03

您可以通過(guò)答題星輕松地創(chuàng)建試卷

全階人生考試2018-06-03

各種考試題,題庫(kù),初中,高中,大學(xué)四六

運(yùn)動(dòng)步數(shù)有氧達(dá)人2018-06-03

記錄運(yùn)動(dòng)步數(shù),積累氧氣值。還可偷

每日養(yǎng)生app2018-06-03

每日養(yǎng)生,天天健康

體育訓(xùn)練成績(jī)?cè)u(píng)定2018-06-03

通用課目體育訓(xùn)練成績(jī)?cè)u(píng)定