⑴ 如何在Word中批量插入圖片,分左右兩欄,左右各5張,或者圖片拼接軟體也可以。
三種方案:
一、用分欄工具。順次插入10張圖片,在第五張後面插入分欄符,第10張後面插入分節符。
二、用表格。插入一個2列5行的表格,把圖片依次插入到每個單元格中,表格邊框設置成「無」,單元個內四個邊距設置成0(或按自己喜好設置)。
三、photoshop。打開後算好高和寬,建個新圖片,把10張圖拽進去調整下大小,保存就可以。
⑵ word如何批量插入圖片
word中連續插入多張圖片方法:
1、單擊插入---->圖片,如圖所示;
4、在上圖中的高度和寬度輸入框中輸入需要的大小即可。
⑶ 如何實現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文檔中
將大量照片按照順序一次性導入word文檔中的方法如下(以windows10系統的word2016版為例,需要准備大量照片):
1、將宣傳冊的照片放入一個文件夾中,並將第一張圖片命名為1.jpg,第二頁命名為2.jpg,依次類推。
⑸ 如何在word中批量插入圖片
1、在文檔中插入剪貼畫的操作是通過執行「插入」→「圖片」→「剪貼畫」菜單命令實現的。
2、插入圖片文件的方法是:執行「插入」→「圖片」→「來自文件」菜單命令,在「插入圖片」對話框中,找到存放圖片的文件夾和相應的圖片後,單擊「插入」按鈕。
3、設置圖片格式的方法有兩種:一是執行「格式」→「圖片」菜單命令,出現「設置圖片格式」對話框,進行設置;二是可以使用「圖片」工具欄中的設置圖片格式按鈕。
4、插入藝術字可以通過執行「插入」→「圖片」→「藝術字」菜單命令實現。
5、文本框是一種包含文字的圖形對象,在文本框中可以輸入文本、插入圖片。
6、執行「插入」→「文本框」菜單命令,選擇「橫排」或「豎排」,將滑鼠指針移到需要插入文本框的起始點,按住並拖動滑鼠到需要的位置,松開滑鼠左鍵,就可在所選的位置插入文本框。然後在文本框中輸入文字。
⑹ 如何在word 的表格中批量插入圖片
1、例如:把網路經驗的LOGO批量插入到表格每一個單元格里。
⑺ 怎麼在word中連續插入多張圖片,且大小一致
工具:word2013
1、打開word 2013,選擇「頁面布局」選項卡,並單擊「頁邊距」按鈕。
⑻ 如何在word不同單元格中批量插入不同圖片
其實這個不是不可儀,雖然沒那麼靈便,但是可以先作個根本,
插入圖片,用連接的,注意圖片文件是可以替換的,但是文件名沒變,那麼這次一批,下次可以直接換一批,然後復制結果出來。
還有可能就是按做網頁的方法,文件可以批量放置。
重點可能就是搜集圖片名,用網頁方式做;用動態網站模式,……
細節別問我,如果是我自己的任務,才可能給找個技巧來,現在只能這么說說