1.提了一个问题,请大家帮我解答
第一种方案: 1、将文档另存为。
,点击右上方“工具” 2、在“更改分辨率”下选择“Web/屏幕”→确定 第二种方案: 1、点击图片,如果图片工具栏未出现,则在图片击右键,选'显示“图片”工具栏(L)' 2、点击“设置图片格式”(从右向左第3个图标) 3、击“图片”,点“压缩”→在“应用于”选“文档中的所有图片”→在“更改分辨率”下选择“Web/屏幕”→确定 第三种方案: (如果图片较少,可用截图的方法效果更好) 如果以上三步还不能解决,请把word文件转换成PDF文件,压缩一定会把文件变下的。
2.word中如何将大量图片批处理统一的尺寸大小
选择工具——宏——宏(Alt+F8调出宏编辑窗口),输入宏名——(非数字)——创建;在Sub 宏名()与End Sub之间编写如下代码:(之后单击运行即可)Dim n '图片个数On Error Resume Next '忽略错误For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes类型图片ActiveDocument.InlineShapes(n).Height = 99 '设置图片高度为 99pxActiveDocument.InlineShapes(n).Width = 71 '设置图片宽度 71pxNext nFor n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片ActiveDocument.Shapes(n).Height = 99 '设置图片高度为 99pxActiveDocument.Shapes(n).Width = 71 '设置图片宽度 71pxNext n。
3.求个WORD批量处理宏要求:将一个文件夹里的所有WORD文件(当
这个其实非常简单,编几行代码便可瞬间完成,根本不用一个文件一个文件地来,全部批量自动化操作并保存关闭。
以Word2003为例。Word2007类似。
首先你可以用Word打开所有的DOC文档,然后菜单“工具---宏”,输入宏名:全部文档小五号,在“宏的位置”选择“Norma t(共用模板),再点“创建”,把以下代码复制粘贴到里面就可以了。 不论你是打开20还是50个文档,可以说是瞬间完成。
本方法是通过一个循环遍历所有打开的文档进行操作。 将变量doc定义为一个文档类型document,而Documents代表所有打开的文档,然后通过For Each循环遍历所有打开的文档,全选每一个文档并将字体设为9号字(即小五号)。
为了以后方便使用,你可以选择菜单“工具---自定义”,点“命令”选项卡,在左边的“类别”中找到“宏”,将右边的这个宏命令拖放到工具栏,以后点一下工具栏这个按钮就可以了,还可以点击这个窗口下边的“键盘”按钮,找的方法同上,给这个宏命令设定一个快捷方式。 以后想用时绝对超级方便快捷。
是否保存或既保存并关闭由你自己决定(修改代码即可),如果某个文档是新建的文档且从未保存过文件名,则弹出“另存为”对话框,如果全部是打开的文档,则自动保存并全部关闭。 Sub 全部文档小五号() On Error Resume Next Dim doc As Document For Each doc In Documents With doc 。
Activate 。Application。
Selection。WholeStory '全选 。
Application。Selection。
Font。Size = 9 '字体大小设为9号(即小五号) 。
Save '保存文档 。Close '关闭文档 End With Next doc End Sub 。
4.如何批量处理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》中的一些批量处理功能。
5.word怎样批量处理图片大小啊
使用VBA:
Dim i
On Error Resume Next
For i=1 To ActiveDocument.InlineShapes.Count
ActiveDocument.InlineShapes(i).Height=300 '修改为自己需要的值
ActiveDocument.InlineShapes(i).Width=200 '修改为自己需要的值
Next
For i=1 To ActiveDocument.Shapes.Count
ActiveDocument.Shapes(i).Height=300 '修改为自己需要的值
ActiveDocument.Shapes(i).Width=200 '修改为自己需要的值
Next
6.如何在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 '文件中图片总个数,图片类型为inlineshapesActiveDocument.InlineShapes(j).Height = 362 '设置高度ActiveDocument.InlineShapes(j).Width = 481.87 '设置宽度Next jEnd Sub3、保存退出,点运行setpicsize宏,word中所有的图片统一调整为宽17cm,高12.77cm----------------------------------------Sub setpicsize()'设置图片大小' 宏在 2008-3-31 由 hero_thm 录制'Dim j '计数图片个数For j = 1 To ActiveDocument.InlineShapes.Count '文件中图片总个数,图片类型为inlineshapesIf ActiveDocument.InlineShapes(j).Width > 480 ThenActiveDocument.InlineShapes(j).Width = 400 '设置宽度End IfNext jEnd Sub。
7.用什么软件来批处理图片的大小和转换格式会比较好
ImgBat批量图片处理 2009 build 090325 软件详细信息 Image batch dispose批量图片处理工具,支持对批量图片的加文字,批量改变图片大小,批量更名,可以批量旋转图片,可以批量压缩图片文件大小,可以批量锐化图片,批量转换图片格式(bmp,jpg,gif,png,。
tiff等)为Jpg格式。特别适用于含有上千种商品图片信息的电子商务网站管理人员和家庭中对数码照片的处理等。
批量添加水印:电子商务网站上的商品信息图片特别容易被其它网站直接拿去使用,为了保护自己的图片不被盗用,或者要对图片进行标识,则我们有必要在图片上添加些文字信息或图片信息。 批量修改图片尺寸:当前数码相机像素越来越高,缺省情况下拍出来的照片非常大,不适合在电脑上直接浏览,有必要批量处理成比较小的照片。
本软件支持三种缩放方式,按比例缩放,按绝对大小缩放,按最大高或宽缩放,满足客户不同的处理要求。 批量修改图片文件名:我们拍出来的数码照片,每次需要一张张改名,特别麻烦,本软件支持批量更名。
批量格式转换:不同的图片格式有不同的优缺点,适用于不同的应用场合,本软件可以将bmp,jpg,gif,png,。tiff等格式的图片转换为Jpg。
可以批量旋转图片:有时我们需要将图片旋转。 可以批量压缩图片文件大小:图片文件太大不利于存储和传输,在不修改图片尺寸的情况下,我们可以调整图片的质量来达到压缩图片文件大小,以便于存储和传输。
可以批量锐化图片:拍出来的照片有点模糊,或者本来清晰的图片在经过放大或缩小尺寸后图片内容经常会变得有一点模糊,我们可以利用锐化图片的功能让图片内容更加清楚。 。
转载请注明出处51数据库 » word照片批量处理