打开WORD,在”工具“菜单下选择”选项“命令。
在”选项“窗口中,在”编辑”选项卡下,将插入图片的格式选择为“四周型”,为什么要这么操作,因为默认插入图片的方式是嵌入式,使用“选择多个对象”命令时无法选择。
在“插入”菜单中选择“图片”/“来自文件”
在“插入图片“对话框中选择要插入的图片。
在“绘图”工具栏中的“添加或删除按钮”中选择“选中多个对象”
使用“选中多个对象”,将所有插入的图片全部选中。
双击任意一图片,在弹出的对话框中,将图片设置一固定尺寸,并取消下方的”锁定纵横比“命令。
这个时候会发现所有的图片都变成了统一尺寸大小了。
那么怎么样将这些图片导出来 在”文件“菜单中选择”另存为“命令。
在”另存为“对话框中将保存类型设置为”网页“,最后点击”确定“按钮保存文件。
打开刚刚保存的文件,右击在弹出的菜单选择以”大小“进行排序。
可以发现,修改的后的图片都是相同的尺寸了。
如何在word中批量处理图片
如何批量处理Word中的图片大小
用宏批量定位word中图片位置
我有一个word文档,里面有多幅图,但图片的缩进位置不统一,有些靠右,有些居中,有些靠左等等。
能否通过编制宏一次完成调整,让所有图片靠左,或居中。
我知道通过宏可以批量完成一个word中所有图片大小的修改,在次与大家共享,也希望可以给大家参考。
1、Alt+F8调出宏编辑窗口
2、点创建按钮,创建新宏,setpicsize,内容如下:
Sub setpicsize()
'设置图片大小
' 宏在 2008-3-31 由 hero_thm 录制
'
Dim j '计数图片个数
For j = 1 To ActiveDocument.InlineShapes.Count '文件中图片总个数,图片类型为inlineshapes
ActiveDocument.InlineShapes(j).Height = 362 '设置高度
ActiveDocument.InlineShapes(j).Width = 481.87 '设置宽度
Next j
End Sub
3、保存退出,点运行setpicsize宏,word中所有的图片统一调整为宽17cm,高12.77cm
----------------------------------------
Sub setpicsize()
'设置图片大小
' 宏在 2008-3-31 由 hero_thm 录制
'
Dim j '计数图片个数
For j = 1 To ActiveDocument.InlineShapes.Count '文件中图片总个数,图片类型为inlineshapes
If ActiveDocument.InlineShapes(j).Width > 480 Then
ActiveDocument.InlineShapes(j).Width = 400 '设置宽度
End If
Next j
End Sub
怎样批量设置word文档里图片大小
材料/工具:word2016
1、打开Word,在插入图片之前先做一个设置,进入【WPS文字】-【选项】
2、点击【编辑】-【将图片插入为四周型】。
3、点击工具栏中的【插入】-【图片】-【来自文件】
4、在电脑中找到要插入的图片,可以按住ctrl键批量选择多张图片。
5、按住Ctrl键,用鼠标选定所有图片。
6、选择工具栏中的【图片工具】,下方可以直接输入高度和宽度进行大小调整,因为每张比例不同,所以锁定纵横比前面的勾勾要去掉。
7、点击【图片工具】调整大小设置项右下角的小方框图标,还可以做其他形式的大小调整。
8、【布局】设置框中选择【大小】,这里高度和宽度的调整还可以根据页面的相对值来调整,即占页面的比例,这里我们输入25%
9、效果就如下图所示。
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.宏-运行,可以直接批量缩放图片尺寸,左边为最终效果图。
处理word文档中有很多图片,想批量把嵌入式改为浮于文字上方,怎么办啊!!打印的时候打印不出图片啊
如果都改为浮于文字上方,可能图片及文字的位置就会乱了。建议你全选(或选取一部分文档内容--包括图片),然后,格式--段落-单倍行距--确定,这样可能有些与图片同一段落的文字,行距看起来也就大了,你可以在该段文字后面加个回车--也就是使图片单独为一行。
word文档如何批量处理?可以自动生成文档并改其中的几个数字吗?
我QQ远程教你。24278528
如何批量处理word中图片的格式,调节亮度和对比度?
还是让我帮你来出点子吧,怎么前面的都答非所问呢。
新建一个宏,将如下代码原样复制粘贴进入后按F5执行即可。
'Sub Macro1()
For i = 1 To ActiveDocument.InlineShapes.Count
ActiveDocument.InlineShapes(i).PictureFormat.Brightness = 0.5 '将嵌入型图片的亮度设置为50
ActiveDocument.InlineShapes(i).PictureFormat.Contrast = 1#
'将嵌入型图片的对比度设置为100
Next i
For i = 1 To ActiveDocument.Shapes.Count
If ActiveDocument.Shapes(i).Type = msoPicture Then '假设浮动型对象是图片时才处理
ActiveDocument.Shapes(i).PictureFormat.Brightness = 0.5
'将浮动型图片的亮度设置为50
ActiveDocument.Shapes(i).PictureFormat.Contrast = 1#
'将浮动型图片的对比度设置为100
End If
Next i
Msgbox "处理完毕!"
'End Sub
今后也推荐你使用我开发的《文件批量处理百宝箱V8.0》中的一些批量处理功能。
批量处理word文档?
按照你所说我觉得最适合的方法是建个word模板。一般模板文件在C:\Documents and Settings\Administrator\Application Data\Microsoft\Templates文件夹下,双击打开就可以了,比如你想首页顶部加个图片,把图片放在模板首页就行了。然后保存关闭,以后你建个word首页顶部就都有这个图片了。在模板里面加上页眉和页角,以后你新建word就都有页眉和页角了
转载请注明出处51数据库 » word文档图片批量处理 word批量处理图片