我又想吃麻辣烫了
有什么办法能在word里批量设置插入图片大小？
操作步骤：1、单击office---->Word选项，如图所示；2、弹出Word选项对话框，单击高级---->剪切、复制和粘贴---->将图片插入/粘贴为后面的输入框，在弹出的选项中选择四周型，如图所示；（注：因默认为嵌入型，不能同时选中多个图片）3、按住Ctrl键，单击图片，选中需要设成大小的多张图片；4、单击图片工具格式选项卡右下角如图所示的标记；5、弹出大小对话框，选择大小选项卡，去掉锁定纵横比和相对原始图片大小复选框中的对勾，在高度、宽度输入框中输入所需要的数值即可，如图所示；
在Word中表格批量插入图片并排序
新建一个文档，文档中插入图片采用附件中的拖拽插入方法（可以保证插入的图片顺序），然后用替换功能将所有图片后面添加一个回车符【ctrl+h调出替换对话框查找内容输入：（？）替换为输入：\1^p高级或更多选择“使用通配符”，点击全部替换】然后ctrl+a选中所有图片，点击插入→表格→表格，即可将所有图片放到一个表格的一列中，然后复制这个表格，并选择你现在问的中需要插入图片的列（最好复制的图片列和选中的需要插入图片的列的行数相同），然后粘贴即可。
word怎么让批量插入的图片每页为一张图片,我插入后一页里有两张...
如果你使用word2003版的就有办法解决，方法如下【先看最后一条】：1、新建word文档一个2、选中所有图片，用鼠标拖拽第一张图片并保持拖拽状态，按alt+tab组合键切换到word文档，鼠标拖拽到正文部分，放开鼠标左键，即可将所有图片一次性插入word文档中；3、ctrl+h调出替换对话框，查找内容输入：（^g）替换为输入：\1^t^p高级或更多选择“使用通配符”，点击全部替换4、ctrl+a选中全文，点击“表格”→“插入”→“表格”即可将所有图片放到一个两列的表格的第一列中，然后在第一个第一个中输入你的文字。
5、文字输入完成后按住shift键的同时按方向键的→键选中该单元格，ctrl+c复制6、鼠标放到第一行第二列上边线上一点点，鼠标变成向下的黑箭头时点击鼠标左键，ctrl+v粘贴即可【7、图片大小的调整，你可以先用ps软件的批处理功能将图片提前处理到符合你要求的尺寸，然后再用上述方法操作】
如何批量缩小word中已插入的图片
将文档另存为时，点击左下角的工具，有个压缩图片，点进去，点选项，看自己需求！可以都尝试一下，看哪一个大小和图片质量都满足自己要求。
想在word页面中,批量插入图片,使得每页有4张图片均匀分布在页...
这是统一设置word文档中的图片样式，你的问题我不会，但是希望这个例子会对你有点提示。
使用宏：一，在word中按alt+f11组合键，进入VBA模式 二，在左边的工程资源管理器中找到你的word文档，在其上右键/添加/模块 三，把下面代码复制，粘贴进去. 四，更改数值， 改一下宽度和高度数值（10），点运行（类似播放按钮.）或f5，即可设置文档中全部图片 Sub Macro() Mywidth=10'10为图片宽度（厘米） Myheigth=10'10为图片高度（厘米） For Each iShape In ActiveDocument.InlineShapes iShape.Height = 28.345 * Myheigth iShape.Width = 28.345 * Mywidth Next iShape End Sub
将多套图片批量分别插入对应的word中
打开word插入——图片——来自文件选定所有需要的插入后用回车键在各图片间建立空行新建一个空白的word文档。
工具——》宏——》vb编辑器——》打开this document ——》把下面代码粘入编辑窗口——》保存打开这个word文档——》工具——》宏——》执行 下面的不用我说了，最后记得通配符批量替换照片就可以一行显示多张了。
Sub InsertPic()Dim myfile As FileDialogSet myfile = Application.FileDialog(msoFileDialogFilePicker)With myfile.InitialFileName = ＂F:\＂If .Show = -1 ThenFor Each fn In .SelectedItemsSet mypic = Selection.InlineShapes.AddPicture(FileName:=fn, SaveWithDocument:=True)'按比例调整相片尺寸WidthNum = mypic.Widthc = 10 '在此处修改相片宽，单位厘米mypic.Width = c * 28.35mypic.Height = (c * 28.35 / WidthNum) * mypic.HeightIf Selection.Start = ActiveDocument.Content.End - 1 Then '如光标在文末Selection.TypeParagraph '在文末添加一空段ElseSelection.MoveDownEnd IfSelection.Text = Basename(fn) '函数取得文件名Selection.EndKeyIf Selection.Start = ActiveDocument.Content.End - 1 Then '如光标在文末Selection.TypeParagraph '在文末添加一空段ElseSelection.MoveDownEnd IfNext fnElseEnd IfEnd WithSet myfile = NothingEnd SubFunction Basename(FullPath) '取得文件名Dim x, yDim tmpstringtmpstring = FullPathx = Len(FullPath)For y = x To 1 Step -1If Mid(FullPath, y, 1) = ＂\＂ Or _Mid(FullPath, y, 1) = ＂:＂ Or _Mid(FullPath, y, 1) = ＂/＂ Thentmpstring = Mid(FullPath, y + 1)Exit ForEnd IfNextBasename = Left(tmpstring, Len(tmpstring) - 4)End Function
word里需要插入大量图片,如何实现批量自适应表格大小,而不用每张...
都是瞎扯，你先定下第一张图片铺满全部表格，看看这个表格的大小，在将这一列列宽固定，再调整表格属性，固定列高。
导入图片自然都会铺满，整个表格会很协调。
如果有一部分由于原照片的尺寸不能铺满，比如说竖着排的照片和横着拍的肯定不协调，那你就在照片工具中修改他的数据。
其实这是很没有必要的，不好看。
