❶ 怎麼在電腦上把圖片壓縮需要的大小
用這個在線圖片壓縮工具,想把圖片文件的大小減到多少都行,比如你直接設置一下壓縮數值到500kb,幾秒鍾就能把圖片的文件大小壓縮到500kb了,你想要設定壓縮到多少kb,他壓縮完輸出的圖片就是多少kb,很方便吧。在線智能圖片壓縮,壓縮圖片體積大小,PNG|JPG大圖縮小
在線圖片智能壓縮使用步驟:
一、首先點擊加號添加需要壓縮的圖片。目前已知支持對jpg、png等多種常見的圖片格式進行壓縮,如果上傳圖片並壓縮成功,則代表支持該圖片格式。
二、可以自行修改圖片需要被壓縮到的最大寬高尺寸,默認為圖片原始的寬高尺寸,且寬高比例是自動鎖定的。
三、必須設置圖片被壓縮後,期望輸出的圖片文件的最大佔用空間。(必填項)
四、選擇圖片生成的演算法。默認為混合優先演算法,絕大多數情況下使用默認演算法即可。
五、壓縮的設定值不能小於1Kb,但圖片壓縮的最終效果可以小於1Kb。
❷ 如何在word中批量修改圖片大小 Word中怎麼批量修改圖片固定大小
如何在word中批量修改圖片大小
Word中怎麼批量修改圖片固定大小。相信很多人都使用過電腦中的word文檔功能,因為這對於很多人來說都會經常用到的,非常的具有實用性。
解決:按alt+F11。然後在project右鍵插入模塊,然後粘貼Sub
Macro()
Mywidth
=
4.13
Myheigth
=
5.48
For
Each
iShape
In
ActiveDocument.InlineShapesiShape.Height
=
28.345
*
Myheigth
iShape.Width
=
28.345
*
Mywidth
Next
iShape
End
Sub
再按F5,就行了。
其中Mywidth
=
4.13,Myheigth
=
5.48這里的數字你自己改大小。
固定長寬方法:
1、打開word,工具-宏-宏(或者直接按Alt+F8)進入宏的界面,如下面所示,輸入一個宏名,宏名自己起,能記住就行!
\
2、宏名起好了,單擊「創建」進入Visual
Basic
編輯器,輸入如下代碼並保存Sub
setpicsize()
'設置圖片大小
Dim
n
'圖片個數
On
Error
Resume
Next
'忽略錯誤
Forn
=
1
ToActiveDocument.InlineShapes.Count
'InlineShapes類型圖片ActiveDocument.InlineShapes(n).Height
=
400
'設置圖片高度為
400pxActiveDocument.InlineShapes(n).Width
=
300
'設置圖片寬度
300pxNextn
Forn
=
1
ToActiveDocument.Shapes.Count
'Shapes類型圖片ActiveDocument.Shapes(n).Height
=
400
'設置圖片高度為
400pxActiveDocument.Shapes(n).Width
=
300
'設置圖片寬度
300pxNextn
End
Sub
\
3、返回word,工具-宏-宏(或者直接按Alt+F8),再次進入宏的界面,選擇剛才編輯好的宏,並單擊「運行」按鈕,就可以了!(圖片多時,可能會花一些時間)按比例縮放方法
這部分要說的是把word中的所有圖片按比例縮放!
具體操作同上,只是代碼部分稍做修改,代碼如下:
Sub
setpicsize()
'設置圖片大小
Dim
n
'圖片個數
Dimpicwidth
Dimpicheight
On
Error
Resume
Next
'忽略錯誤
For
n
=
1
ToActiveDocument.InlineShapes.Count
'InlineShapes類型圖片picheight
=
ActiveDocument.InlineShapes(n).Heightpicwidth
=
ActiveDocument.InlineShapes(n).WidthActiveDocument.InlineShapes(n).Height
=
picheight
*
1.1
'設置高度為1.1倍ActiveDocument.InlineShapes(n).Width
=
picwidth
*
1.1
'設置寬度為1.1倍Nextn
For
n
=
1
To
ActiveDocument.Shapes.Count
'Shapes類型圖片picheight
=
ActiveDocument.Shapes(n).Heightpicwidth
=
ActiveDocument.Shapes(n).WidthActiveDocument.Shapes(n).Height
=
picheight
*
1.1
'設置高度為1.1倍ActiveDocument.Shapes(n).Width
=
picwidth
*
1.1
'設置寬度為1.1倍Nextn
End
Sub
若還想使所有圖片居中對齊,可在循環中加入下面的語句:
ActiveDocument.InlineShapes(n).Range.ParagraphFormat.Alignment=
wdAlignParagraphCenter『左對齊:wdAlignParagraphLeft
注意:這里的Shapes(InlineShapes)不僅僅是指圖片,也包含其它的,自選圖形、任意多邊形、OLE
對象、ActiveX
控制項、圖片等。
好了,word批量修改圖片大小的方法就是這樣的了,這兩種方法各有千秋,大家可以根據情況自行選擇哦!
❸ word文檔圖片太大怎麼變小
圖片佔用內存太大,會造成卡頓,可以用壓縮命令,將其變小,而且為可用的解析度,