9久久伊人精品综合,亚洲一区精品视频在线,成 人免费va视频,国产一区二区三区黄网,99国产精品永久免费视频,亚洲毛片多多影院,精品久久久无码人妻中文字幕,无码国产欧美一区二区三区不卡
學(xué)習(xí)啦 > 學(xué)習(xí)電腦 > 工具軟件 > 辦公軟件學(xué)習(xí) > word排版教程 > Word常見(jiàn)問(wèn)題 > word如何設(shè)置圖片大小一樣的

word如何設(shè)置圖片大小一樣的

時(shí)間: 宇能938 分享

word如何設(shè)置圖片大小一樣的

  批量將圖片調(diào)整到大小一致,PS也不是很好操作的。word文檔卻能很輕易的做到這一點(diǎn),對(duì)于常用word的朋友就再熟悉不過(guò)了,下面讓學(xué)習(xí)啦小編為你帶來(lái)如何設(shè)置word圖片大小一致的方法。

  word設(shè)置圖片大小一致的方法

  1、打開(kāi)word,工具-宏-宏(或者直接按Alt+F8)進(jìn)入宏的界面,如下面所示,輸入一個(gè)宏名,宏名自己起,能記住就行!

  2、宏名起好了,單擊“創(chuàng)建”進(jìn)入Visual Basic 編輯器,輸入如下代碼并保存

  Sub setpicsize() '設(shè)置圖片大小

  Dim n '圖片個(gè)數(shù)

  On Error Resume Next '忽略錯(cuò)誤

  For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes類(lèi)型圖片

  ActiveDocument.InlineShapes(n).Height = 400 '設(shè)置圖片高度為 400px

  ActiveDocument.InlineShapes(n).Width = 300 '設(shè)置圖片寬度 300px

  Next n

  For n = 1 To ActiveDocument.Shapes.Count 'Shapes類(lèi)型圖片

  ActiveDocument.Shapes(n).Height = 400 '設(shè)置圖片高度為 400px

  ActiveDocument.Shapes(n).Width = 300 '設(shè)置圖片寬度 300px

  Next n

  End Sub

  3、返回word,工具-宏-宏(或者直接按Alt+F8),再次進(jìn)入宏的界面,選擇剛才編輯好的宏,并單擊“運(yùn)行”按鈕,就可以了!(圖片多時(shí),可能會(huì)花一些時(shí)間)

  word批量修改圖片大小——按比例縮放篇

  這部分要說(shuō)的是把word中的所有圖片按比例縮放!

  具體操作同上,只是代碼部分稍做修改,代碼如下:

  Sub setpicsize() '設(shè)置圖片大小

  Dim n '圖片個(gè)數(shù)

  Dim picwidth

  Dim picheight

  On Error Resume Next '忽略錯(cuò)誤

  For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes類(lèi)型圖片

  picheight = ActiveDocument.InlineShapes(n).Height

  picwidth = ActiveDocument.InlineShapes(n).Width

  ActiveDocument.InlineShapes(n).Height = picheight * 1.1 '設(shè)置高度為1.1倍

  ActiveDocument.InlineShapes(n).Width = picwidth * 1.1 '設(shè)置寬度為1.1倍

  Next n

  For n = 1 ToActiveDocument.Shapes.Count 'Shapes類(lèi)型圖片

  picheight = ActiveDocument.Shapes(n).Height

  picwidth = ActiveDocument.Shapes(n).Width

  ActiveDocument.Shapes(n).Height = picheight * 1.1 '設(shè)置高度為1.1倍

  ActiveDocument.Shapes(n).Width = picwidth * 1.1 '設(shè)置寬度為1.1倍

  Next n

  End Sub

猜你感興趣:

1.怎么利用WORD里的表格讓插入的圖片保持一致的大小

2.word2013如何設(shè)置圖片大小

3.如何設(shè)置word圖片大小一致

4.word怎樣統(tǒng)一設(shè)置圖片大小

5.word中怎樣任意調(diào)整圖片大小

2575519 主站蜘蛛池模板: 久久这里都是精品二| 亚洲综合天堂一区二区三区| 婷婷久久香蕉五月综合加勒比 | 国产精品疯狂输出jk草莓视频| 极品蜜臀黄色在线观看| 97亚洲熟妇自偷自拍另类图片| 成人资源网亚洲精品在线| 午夜成人无码免费看网站| 国内精品自国内精品自久久| 亚洲AV永久无码嘿嘿嘿嘿| 亚洲乱码精品中文字幕| 亚洲欧美牲交| 久久99热成人精品国产| 国产97人人超碰CAO蜜芽PROM| 国产视色精品亚洲一区二区| 福利视频一区二区在线| 国产黄色三级三级看三级| 国产精品中文字幕久久| 国产精品中文字幕自拍| 亚洲永久精品日本久精品| 无线乱码一二三区免费看| 他掀开裙子把舌头伸进去添视频| 国产免费福利网站| 67194熟妇在线观看线路| 狠狠色噜噜狠狠狠狠777米奇| 日本欧美一区二区三区在线播放| 熟女精品国产一区二区三区| 中文字幕在线日韩一区| 成年女人免费毛片视频永久| av深夜免费在线观看| 亚洲国产日韩精品久久| 久久久久亚洲av成人网址| 中文字幕国产日韩精品| 起碰免费公开97在线视频| 国产高清在线精品一区不卡| 日本丶国产丶欧美色综合| 日韩在线视频线观看一区| 精品国产一区二区三区大| 亚洲欧美激情在线一区| 亚洲男人成人性天堂网站| 在线看片免费不卡人成视频|