win7系統(tǒng)下載
當(dāng)前位置: 首頁(yè) > 硬件軟件教程 > 詳細(xì)頁(yè)面

Word如何大局部更改圖片環(huán)繞方式與統(tǒng)一尺寸大小

發(fā)布時(shí)間:2025-03-16 文章來(lái)源:xp下載站 瀏覽:

辦公軟件是指可以進(jìn)行文字處理、表格制作、幻燈片制作、圖形圖像處理、簡(jiǎn)單數(shù)據(jù)庫(kù)的處理等方面工作的軟件。目前辦公軟件朝著操作簡(jiǎn)單化,功能細(xì)化等方向發(fā)展。辦公軟件的應(yīng)用范圍很廣,大到社會(huì)統(tǒng)計(jì),小到會(huì)議記錄,數(shù)字化的辦公,離不開辦公軟件的鼎力協(xié)助。另外,政府用的電子政務(wù),稅務(wù)用的稅務(wù)系統(tǒng),企業(yè)用的協(xié)同辦公軟件,這些都屬于辦公軟件。

前提:一份Word文檔里面有100張圖片,有大有小,需要將100張圖片更改為統(tǒng)一大小,寬度與高度均為5厘米,同時(shí)環(huán)繞方式也需要改成四周型。

Word批量更改圖片環(huán)繞方式與統(tǒng)一尺寸大小

默認(rèn)Word圖片的默認(rèn)環(huán)繞方式為嵌入型,需要統(tǒng)一更改為四周型,然后才能批量更改大小,而批量更改大小方式需要使用VBA代碼。

第一步:打開 Word 文檔,并按下 Alt + F11 鍵(筆記本電腦按alt+fn+f11),打開 Visual Basic for Applications (VBA) 編輯器。在 VBA 編輯器中,選擇 "插入" -> "模塊",創(chuàng)建一個(gè)新的模塊,如下圖所示輸入對(duì)應(yīng)的代碼。

 Word批量更改圖片環(huán)繞方式與統(tǒng)一尺寸大小

第二步:在(VBA) 編輯器輸入對(duì)應(yīng)的過(guò)程代碼:

VBA代碼:

   ' 作用:循環(huán)遍歷所有的環(huán)繞方式為嵌入型圖片,將其更改為四周型

Sub ConvertInlineToSquareWrap()

    Dim pic As InlineShape

    

    ' 循環(huán)遍歷所有的嵌入型圖片

    For Each pic In ActiveDocument.InlineShapes

        ' 檢查是否為圖片類型

        If pic.Type = wdInlineShapePicture Then

            ' 設(shè)置為四周型

            pic.Select

            Selection.ShapeRange.WrapFormat.Type = wdWrapSquare

        End If

    Next pic

End Sub

 

VBA代碼:

   ' 作用:更改圖片大。▽(duì)環(huán)繞方式為四周型或上下型起作用,如果是嵌入型不起作用)

Sub ResizeImages()

    Dim shp As Shape

    

    ' 更改下面的寬度和高度為所需的尺寸(以厘米為單位)

    Dim targetWidth As Single

    targetWidth = CentimetersToPoints(5) ' 例如,將圖片寬度調(diào)整為5厘米

     Dim targetHeight As Single

    targetHeight = CentimetersToPoints(5) ' 例如,將圖片高度調(diào)整為5厘米

    

    ' 循環(huán)處理文檔中的所有圖片

    For Each shp In ActiveDocument.Shapes

        If shp.Type = msoPicture Then

            ' 更改圖片大小

            shp.LockAspectRatio = msoFalse

            shp.Width = targetWidth

            shp.Height = targetHeight

        End If

    Next shp

End Sub

說(shuō)明:在  targetWidth = CentimetersToPoints(5) ,這個(gè)地方可以更改對(duì)應(yīng)的最終目標(biāo)圖片的寬度; targetHeight = CentimetersToPoints(5) 可以更改對(duì)應(yīng)的最終目標(biāo)圖片的高度;

運(yùn)行宏:在 VBA 編輯器中,選擇 "運(yùn)行" -> "運(yùn)行子過(guò)程",或按下 F5 鍵。

第三步:關(guān)閉VBA 編輯器回到Word中,選擇 "開發(fā)工具" -> "宏",在彈出的宏對(duì)話框,如下圖所示,宏對(duì)話框列表就會(huì)出現(xiàn)創(chuàng)建的過(guò)程,依次選定單擊運(yùn)行即可批量更改圖片大小。

 Word批量更改圖片環(huán)繞方式與統(tǒng)一尺寸大小


Office辦公軟件是辦公的第一選擇,這個(gè)地球人都知道。

本文章關(guān)鍵詞: Word 如何 大局部 更改 圖片 環(huán)繞 方式  統(tǒng)一  
當(dāng)前原文鏈接:http://m.91mp3.cn/soft/soft-65359.html
主站蜘蛛池模板: 91精品欧美综合在线观看| 国产成人亚洲综合| 国产精品无码久久综合网| 日韩欧美亚洲综合久久影院d3| 亚洲综合色婷婷在线观看| 亚洲VA欧美va国产va综合| 热综合一本伊人久久精品| 伊人久久成人成综合网222| 在线综合亚洲中文精品 | 综合色就爱涩涩涩综合婷婷| 色噜噜成人综合网站| 欧美日韩国产综合视频一区二区二| 亚洲av综合色区| 7国产欧美日韩综合天堂中文久久久久| 综合激情五月综合激情五月激情1 综合久久国产九一剧情麻豆 | 狠狠色丁香婷婷综合| 俺来也俺去啦久久综合网| 国产91色综合久久免费分享| 亚洲综合在线视频| 精品福利一区二区三区精品国产第一国产综合精品| 香蕉99久久国产综合精品宅男自| 伊人色综合九久久天天蜜桃| 99久久婷婷免费国产综合精品| 香蕉99久久国产综合精品宅男自| 91欧美一区二区三区综合在线| 色欲天天婬色婬香视频综合网| 久久综合九色欧美综合狠狠| 伊人久久综合成人网| 亚洲AV综合色一区二区三区| 狠狠色丁香婷婷久久综合| 色综合久久88色综合天天 | 伊人色综合久久| 亚洲综合精品网站在线观看| 色狠狠久久综合网| 国产成人亚洲综合无码| 久久综合亚洲色HEZYO社区| 狠狠色综合网站久久久久久久| 国产色综合一二三四| 老色鬼久久亚洲AV综合| 色综合久久88色综合天天| 久久久久亚洲AV综合波多野结衣|