如何一次性更改ppt中的全部字體-文庫(kù)吧資料
2024-08-18 05:21本頁(yè)面
【正文】 . Columns . Count
oShape . Table . Cell(i, j) . Shape . Fill . BackColor . RGB = RGB(Red : = 255 , Green : = 255 , Blue : = 255 )
With oShape . Table . Cell(i, j) . Shape . TextFrame . TextRange . Font
39。 文本框背景色用幻燈背景填充
oShape . TextFrame . TextRange . IndentLevel = 039。 斜
. Underline = msoFalse 39。 .Bold = msoFalse 39。 .Name = 宋體
39。 使用幻燈片母版背景
For Each oShape In oSlide . Shapes39。Sub myfont() Dim oShape As Shape
Dim oSlide As Slide
Dim oTxtRange As TextRange
On Error Resume Next 39?！ ≡谛麓a窗口中，刪除原來的內(nèi)容，并復(fù)制以下內(nèi)容，然后運(yùn)行宏（若不能運(yùn)行，請(qǐng)看下面）。還原普通視圖，這樣就去掉了幻燈片的模板背景。（以下演示版本為Office2007，其他版本的類似）背景模板的處理打開幻燈片母板，選擇插入新的幻燈片母板，得到一個(gè)空白的母板。 今天我一朋友來找我，說他想打印一個(gè)PPT，于是想把它變成白底黑字，并保存。改成你想要的字體顏色 End IfNext jNext iEnd Sub
答案補(bǔ)充
格式幻燈片設(shè)計(jì)“幻燈片設(shè)計(jì)配色方案” 選一個(gè)你要的顏色 文字和符號(hào)都會(huì)變顏色不過貌似對(duì)PPT背景也有影響 你先試下 不行我再研究研究在 視圖》母版》幻燈片母版 里面改。改成你想要的字體顏色 End If If InStr(
法律信息相關(guān)推薦
鄂ICP備17016276號(hào)-1