A. 怎樣批量縮小圖片大小
問散數圓題一:怎樣把圖片在電腦上批量的縮小 鑒此,我貼上一個比較簡便的批量縮小圖片的方法,原來要花2小時完成的圖片處理現在不到2分鍾就能搞定,我也是一個偶然的機會發現的,現在發上來僅供大家參考,請高手不要笑我
希望能給新手們一點點的幫助,如果覺得還可以的話別忘了頂下貼。讓更多的朋友看到,到時候能夠幫到更多的朋友,也為了讓我以後能夠寫更多的貼增加點信心 以下具體操作:
第一步:建一個文件夾,放入所有要縮小上傳的圖片文件,我的文件夾名稱為「大圖」。
第二步:全部選擇所有的圖片文件,然後點右鍵點擊――「郵件接受者」
第三步:在桌面顯示的通過電子郵件發送照片的對話框中選擇――「縮小所有照片」
第四步:點擊前面圖片里的「顯示更多選項」,選擇上面的大小(有三種模式可供海擇)。選擇自己想要的大小就OK了。
最後新建一個文件夾,然後全部選擇剛才outlook裡面的附件,把縮小後的圖片直接拖到新
建文件夾里就可以了。打開文件夾你就可以使用縮小後的圖片了。
好了,看到結果了吧,圖片變的很小了,可以成功上傳到自己的相冊了。
問題二:怎麼批量把照片文件大小減小 在我的電腦里找到你要壓縮的圖片,然後選中他們,會在左邊的「文件和文件夾任務」里看到一個選項: 「以電子郵件形式發送所選項目」 ,圖1,這個時候點擊這個菜單。會出現圖2所示的情況。點確定後會彈出一個收件人的對話框,看到了裡面的附件了吧?就是壓縮完的兩張照片。只有 36K和 39K大小了。壓縮比率很高。這個時候,就是把它們保存沖塌下來就可以了,而不用真的發送郵件。滑鼠點選圖片 0162 之後,按 ctrl+A 全選。然後右鍵菜單里有一個: 「復制」的選項。你可以復制。 。然後找個文件夾子。粘貼就可以了。你可以選中任意張數的照片。對它們進行批量的大壓縮比的壓縮,而不借用 acdsee 等工具軟體。這個方法的優點是簡單實用,壓縮比高。不用考慮在不同的電腦上是不是安裝了acdsee 等。因為所有的電腦上都有 outlook express。隨便一台電腦你都可以完成這個操作。這個方法的缺點也正是他的優點之一,就是壓縮比很高。沒有辦法較高質量地壓縮一張圖片,沒有更低的壓縮比率可選用。想有更高的壓縮後圖片質量,可以選用 acdsee 軟體來做。那個軟體可選壓縮參數較全一些。
問題三:用PPT可以批量縮小圖片大小? 左下角的空心箭頭,就是那個選擇按鈕,將所有圖片(同一頁)選中,直接拖動改小就行。
問題四:excel怎麼批量修改圖片大小 你按F5---定位條件--對象
確定後可以選擇所有圖片
然後右擊選中的圖片--設置圖片格式--屬性
問題五:ps批量修改圖片大小,怎麼控制像素大小? 你好!
那你在錄制動作的時候再添加「另存為」命畢配令,選擇路徑(保存目標文件夾),點擊確定,會有一個JPEG選項,調整品質大小,直到你要的文件大小為止,點擊確定,這樣在批處理的時候,就會調整文件量的大小了。剛才我試過了,是可以的。有問題,可追問。
希望我的回答會幫到你。
問題六:word文檔如何批量修改圖片大小? 用宏可以輕松完成:
Sub FormatPics()
Dim iSha As InlineShape
For Each iSha In ActiveDocument.InlineShapes
If iSha.Type = wdInlineShapePicture Then
iSha.LockAspectRatio = msoFalse '不鎖定縱橫比
iSha.Width = CentimetersToPoints(5) '寬5CM
iSh搐.Height = CentimetersToPoints(5) '高5CM
End If
Next
End Sub
問題七:如何批量縮小word中已插入的圖片 按shift(多選)選中所有圖片(如果是剛插入的圖片,需撫設置一下圖片的版式,例:四周型、緊密型……,反正不能是嵌入型,設置了以後才能多選),點右鍵,選設置圖片格式――大小――在對話框里設置圖片統一的大小就可以了
問題八:在EXCEL中插入圖片後,如何快速縮小圖片尺寸 先將圖片都插入進表格,完成後,可用按住shift點圖片全部選中圖片(或編輯-定位-定位條件-圖釘),統一設置圖片大小
問題九:怎樣批量把圖片變小? 方法/步驟
1.打開圖片選用qq影像查看器編輯
2.選擇你要改變圖片的文件選中
3.返回圖庫選批量編輯中的圖片批量壓縮
4.選壓縮方式中的保證圖片大小,輸入你想要每張圖片的大小。左邊有壓縮後約( ).選擇開始壓縮,就行了!
B. word如何統一調整圖片大小
1、新建一個Word文檔,然後點擊菜單欄上的「布局」菜單
C. 如何批量修改word文檔中圖片的大小
一次性調節word所有圖片方法如下:
打開WORD,在」工具「菜單下,選擇」選項「命令,在」選項「窗口中,」編輯」選項卡下,將插入圖片的格式選擇為「四周型」。在「插入」菜單中選擇「圖片」/「來自文件」,在「插入圖片「對話框中選擇要插入的圖片。
然後在「繪圖」工具欄中的「添加或刪除按鈕」中選擇「選中多個對象」,使用「選中多個對象」,將所有插入的圖片全部選中。雙擊任意一圖片,在彈出的對余雹話框中,就可以統一批量設置了,完成。
在word中,默認插入的嵌入式圖片是不能批量統一設置,只有將默認修改為四周型後,才可以批差毀皮量修改圖片版式或大小。
用宏命令虛差最省心:
代碼1如下:
Sub setpicsize()
Dim iSha As InlineShape
For Each iSha In ActiveDocument.InlineShapes
If iSha.Type = wdInlineShapePicture Then
iSha.LockAspectRatio = msoFalse '不鎖定縱橫比
iSha.Width = CentimetersToPoints(5) '寬5CM
iSha.Height = CentimetersToPoints(5) '高5CM
End If
Next
End Sub
代碼2如下:
Sub setpicsize()
Dim j '計數圖片個數
For j = 1 To ActiveDocument.InlineShapes.Count '文件中圖片總個數,圖片類型為inlineshapes
ActiveDocument.InlineShapes(j).Height = 300 '設置高度10.58cm
ActiveDocument.InlineShapes(j).Width = 510 '設置寬度17.99cm
Next j
End Sub
D. word批量修改圖片大小教程:固定長寬+按比例縮放
word批量修改圖片大小方法:
固定長寬方法:
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
'設置圖片高度為
400px
Nextn
Forn
=
1
ToActiveDocument.Shapes.Count
'Shapes類型圖片
ActiveDocument.Shapes(n).Height
=
400
'設置圖片高度為
400px
ActiveDocument.Shapes(n).Width
=
300
'設置圖片寬度
300px
Nextn
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).Height
picwidth
=
ActiveDocument.InlineShapes(n).Width
ActiveDocument.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).Height
picwidth
=
ActiveDocument.Shapes(n).Width
ActiveDocument.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未保存如何恢復?word文檔未保存恢復方法匯總
word文檔如何畫線條?word快速畫出5種線條小技巧
E. 如何批量調整word的圖片大小
分析:由於Word不能像excel一樣多選圖片,所以不能多選圖片後統一縮放,所以考慮可以重復多次一樣動作的宏功能:
打開視圖-宏-輸入一個名字-創建
2.輸入以下代碼,注意替換內有的內容和尺寸不是下面的5cm可以直接更改。
Sub
FormatPics()
Dim
iSha
As
InlineShape
For
Each
iSha
In
ActiveDocument.InlineShapes
If
iSha.Type
=
wdInlineShapePicture
Then
iSha.LockAspectRatio
=
msoFalse
'不鎖定縱橫比
iSha.Width
=
CentimetersToPoints(5)
'寬5CM
iSha.Height
=
CentimetersToPoints(5)
'高5CM
End
If
Next
End
Sub
3.宏-運行,可以直接批量縮放圖片尺寸,左邊為最終效果圖。
F. 怎樣在word批量修改圖片大小
1、打開word,工具-宏-宏(或者直接按alt+f8)進入宏的界面,如下面所示,輸入一個宏名,宏名自己起,能記住就行!
2、宏名起好了,單擊「創建」進入visual
basic
編輯器,輸入如下代碼並保存
sub
setpicsize()
'設置圖片大小
dim
n
'圖片個數
on
error
resume
next
'忽略錯誤
for
n
=
1
to
activedocument.inlineshapes.count
'inlineshapes類型圖片
activedocument.inlineshapes(n).height
=
400
'設置圖片高度為
400px
activedocument.inlineshapes(n).width
=
300
'設置圖片寬度
300px
next
n
for
n
=
1
to
activedocument.shapes.count
'shapes類型圖片
activedocument.shapes(n).height
=
400
'設置圖片高度為
400px
activedocument.shapes(n).width
=
300
'設置圖片寬度
300px
next
n
end
sub
這樣就可以了!
G. Word中批量修改圖片大小和縮放比例方法
最近小編遇到一個問題:需要將一篇word文檔中的所有圖片全部縮小比例。一張張改太麻煩了。於是從網上搜羅了一下,還真找到了解決辦法。需要注意的地方
就是注意厘米與像素的換算關系。一般情況下1厘米=28px
。這個換算關系其實可以用計算器計算出來。計算公式為圖片改變之後的像素除以改變之後圖片的大小厘米。
固定長寬篇
這部分要說的是把word中的所有圖片修改成固定的並且相同的長和寬!
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
'設置圖片高度為
400px
ActiveDocument.InlineShapes(n).Width
=
300
'設置圖片寬度
300px
Nextn
Forn
=
1
ToActiveDocument.Shapes.Count
'Shapes類型圖片
ActiveDocument.Shapes(n).Height
=
400
'設置圖片高度為
400px
ActiveDocument.Shapes(n).Width
=
300
'設置圖片寬度
300px
Nextn
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).Height
picwidth
=
ActiveDocument.InlineShapes(n).Width
ActiveDocument.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).Height
picwidth
=
ActiveDocument.Shapes(n).Width
ActiveDocument.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
控制項、圖片等。
H. Word怎樣批量修改圖片大小
Word怎樣批量修改圖片大小
Word批量修改圖片大小要怎麼批量修改?很多朋友在使用word的時候不知道如何批量修改圖片大小,下面就教大家word批量修改圖片大小方法,不會的朋友收藏下吧,以備不時之需!
固定長寬方法:
步驟一、打開word,工具-宏-宏(或者直接按Alt+F8)進入宏的界面,如下面所示,輸入一個宏名,宏名自己起,能記住就行!
步驟二、宏名起好了,單擊「創建」進入Visual Basic 編輯器,輸入如下代碼並保存
Sub setpicsize() 設置圖片大小
Dim n 圖片個數
On Error Resume Next 忽略錯誤
Forn = 1 ToActiveDocument.InlineShapes.Count InlineShapes類型圖片
ActiveDocument.InlineShapes(n).Height = 400 設置圖片高度為 400px
ActiveDocument.InlineShapes(n).Width = 300 設置圖片寬度 300px
Nextn
Forn = 1 ToActiveDocument.Shapes.Count Shapes類型圖片
ActiveDocument.Shapes(n).Height = 400 設置圖片高度為 400px
ActiveDocument.Shapes(n).Width = 300 設置圖片寬度 300px
Nextn
End Sub
步驟三、返回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).Height
picwidth = ActiveDocument.InlineShapes(n).Width
ActiveDocument.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).Height
picwidth = ActiveDocument.Shapes(n).Width
ActiveDocument.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批量修改圖片大小的方法就是這樣的了,這兩種方法各有千秋,大家可以根據情況自行選擇。 ;