❶ 將多套圖片批量分別插入對應的word中
摘要 親您好,打開word
❷ 如何在WORD一次插入多張圖片且圖片順序不變
打開word文檔後縮小窗口,再打開圖片文件夾,選中多個圖片,然後滑鼠放第一個圖片上,將多個圖片拖動到WORD窗口中。這樣就能在WORD一次插入多張圖片且圖片順序不變。具體操作請參照以下步驟。
1、在電腦上打開一個word文檔,在界面右上角點擊「向下還原」按鈕縮小word窗口大小。
❸ 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 中批量插入圖片
Sub批量添加圖片()
'程序功能:批量添加圖片宏
'作者Q:766110727
'日期:2017.06.07
'使用步驟1:word中ALT+11進入VBA宏界面;
'使用步驟2:將本段代碼從sub到endsub,全部粘到代碼框最後的空白處;
'使用步驟3:按F5執行代碼。
'說明:代碼按最直觀的邏輯寫的,也方便大家使用修改。
'OnErrorResumeNext
Dimn,圖片路徑1(),圖片路徑2(),圖片路徑3(),圖片路徑4(),圖片數量最大值
DimmyTableAsTable
'###################################################################
'#######第一部分:獲取每個文件夾下所有jpg圖片名,寫入相應數組#######
'###################################################################
n=0
圖1=Dir("I: tjbt插入圖片圖片*.jpg")
DoWhile圖1<>""
n=n+1
ReDimPreserve圖片路徑1(1Ton)
圖片路徑1(n)="I: tjbt插入圖片圖片"&圖1
圖1=Dir()
Loop
Ifn>圖片數量最大值Then圖片數量最大值=n
n=0
圖2=Dir("I: tjbt插入圖片圖片2*.jpg")
DoWhile圖2<>""
n=n+1
ReDimPreserve圖片路徑2(1Ton)
圖片路徑2(n)="I: tjbt插入圖片圖片2"&圖2
圖2=Dir()
Loop
Ifn>圖片數量最大值Then圖片數量最大值=n
n=0
圖3=Dir("I: tjbt插入圖片圖片3*.jpg")
DoWhile圖3<>""
n=n+1
ReDimPreserve圖片路徑3(1Ton)
圖片路徑3(n)="I: tjbt插入圖片圖片3"&圖3
圖3=Dir()
Loop
Ifn>圖片數量最大值Then圖片數量最大值=n
n=0
圖4=Dir("I: tjbt插入圖片圖片4*.jpg")
DoWhile圖4<>""
n=n+1
ReDimPreserve圖片路徑4(1Ton)
圖片路徑4(n)="I: tjbt插入圖片圖片4"&圖4
圖4=Dir()
Loop
Ifn>圖片數量最大值Then圖片數量最大值=n
'###################################################################
'##################第二部分:插入圖片到word表格中###################
'###################################################################
'新建一個一行兩列表格
SetmyTable=ActiveDocument.Tables.Add(Range:=ActiveDocument.Range(Start:=0,End:=0),NumRows:=1,NumColumns:=2)
'設定後續操作的目標表格為文檔的第一個表格
SetmyTable=ActiveDocument.Tables(1)
n=0
DoWhilen<圖片數量最大值
n=n+1
之前表格行數=myTable.Rows.Count
myTable.Rows.Last.Select
Selection.InsertRowsBelow4'下方插入4行
'第一行兩列,圖片序號12
myTable.Cell(Row:=之前表格行數+1,Column:=1).Range.InsertAfterText:="圖片1"
myTable.Cell(Row:=之前表格行數+1,Column:=2).Range.InsertAfterText:="圖片2"
myTable.Cell(Row:=之前表格行數+3,Column:=1).Range.InsertAfterText:="圖片3"
myTable.Cell(Row:=之前表格行數+3,Column:=2).Range.InsertAfterText:="圖片4"
'第二行兩列,插入圖片並設置圖片大小
myTable.Cell(Row:=之前表格行數+2,Column:=1).Range.InlineShapes.AddPictureFileName:=_
圖片路徑1(n),LinkToFile:=False,SaveWithDocument:=True
myTable.Cell(Row:=之前表格行數+2,Column:=2).Range.InlineShapes.AddPictureFileName:=_
圖片路徑2(n),LinkToFile:=False,SaveWithDocument:=True
myTable.Cell(Row:=之前表格行數+4,Column:=1).Range.InlineShapes.AddPictureFileName:=_
圖片路徑3(n),LinkToFile:=False,SaveWithDocument:=True
myTable.Cell(Row:=之前表格行數+4,Column:=2).Range.InlineShapes.AddPictureFileName:=_
圖片路徑4(n),LinkToFile:=False,SaveWithDocument:=True
Loop
ActiveDocument.Tables(1).Rows(1).Delete'剛開始建的表格中第一行是空行,刪掉
'###################################################################
'######################第三部分:圖片格式處理#######################
'###################################################################
'統一設置圖片長寬,美化文檔。這里會卡好久時間,按需要是否添加本段代碼
Forn=1ToActiveDocument.InlineShapes.Count
ActiveDocument.InlineShapes(n).Height=210'設置高度
ActiveDocument.InlineShapes(n).Width=110'設置寬度
Nextn
EndSub
❺ word里的表格怎樣批量插圖片並調整大小
你可以打開你的這一個相應的words,然後把它的一個事先選擇好的圖片,點擊批量插入進來,然後直接全部選中調整為統一的大小,這樣就可以了。
❻ word如何批量插入圖片
word中連續插入多張圖片方法:
1、單擊插入---->圖片,如圖所示;
4、在上圖中的高度和寬度輸入框中輸入需要的大小即可。
❼ Word 里批量插入圖片 全重疊在第一頁
更改圖片版式,在圖片上點右鍵,然後點設置圖片格式,如下圖,改為嵌入型點確定。
❽ 怎樣往word文件上批量添加圖片(要每頁一張的)
①批量插入圖片。這個都會,不用詳細介紹了。
②快速分頁,每張圖片一頁。用宏來處理。
工具→宏→錄制新宏→鍵盤(單擊選鍵盤這個按鈕)→請按新快捷鍵(我指定的是ctrl+L),直接用鍵盤上的組合鍵按下去即可→單擊「指定」→關閉→用方向箭頭,把游標移到第一張圖片的右側,按一下ctrl+enter(這個組合鍵是插入分頁符),然後將游標用方向箭頭移到第二張圖片的右側。單擊停止錄制。
然後聯系按
ctrl+L即可將無論多少張的圖片均單獨設置為一頁。
❾ 怎麼在word中連續插入多張圖片,且大小一致
工具:word2013
1、打開word 2013,選擇「頁面布局」選項卡,並單擊「頁邊距」按鈕。