word表格里批量加圖片

㈠ word批量導入圖片並自動排版

word批量導入圖片並自動排版方法如下：

工具：聯想筆記本電腦e460、Windows10系統答帶、WPS Office 2018.8.24.20794。

1、打開一個需要批量圖片知鏈排版的word文檔，文檔中圖片排版無序，需要調整排版。

㈡ 如何在word 的表格中批量插入圖片

1、例如：把網路經驗的LOGO批量插入到表格每一個單元格里。

㈢ word表格怎麼批量插圖

在資源管理器中按住Ctrl鍵。
word表格批量插圖的方法如下：首先打開word文檔，點擊「插入」-「圖片」-「此設備指凳前」；最後打開資源管理器，按住Ctrl鍵，依次點擊選中圖片，點擊「插入」，即可把全部的圖片插粗悄入到word文檔中。
word頁面鋪滿圖片可以進入圖片工具中的圖片格式菜單，點擊環繞文字選項，再選擇襯於文字下方後通過拖動圖片四周的端點將圖片鋪滿唯清頁面即可。

㈣ 如何實現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

㈤ SOS 緊急~~~在word表格里怎麼一次性的插入多張圖片

1.菜單「插入-圖片-繪制新圖形」，
2.菜單「插入-圖片-來自文件」，一次選擇多個要插入的文件，「插入」。
3.在「繪圖」工具欄中點「選擇對象」工具（即「繪圖」兩字右面的箭頭），框選剛才插入的全部圖片。
4.菜單「格式-圖片」，「大小」選項卡中不勾選「鎖定縱橫比」，再輸入高度、寬度（如2厘米、1厘米），最後確定。

㈥ 怎麼把多個照片放到word表格里怎麼把多個照片放到word表格里

您可以按照以下步驟將多個照片放到 Word 表格中：
1. 打開 Word 文檔並創建一個新的表格。在「插入」選項卡下方找到「表格」部分，然後選擇合適大小的表格。
2. 在表格中單擊要插入圖片的單元格，然後在「插入」選項卡下方找到「圖片」部分。
3. 在「圖片」部分中選擇「圖片」，然後從您的計算機或互聯網上選擇第一張要插入的圖片。
4. 調整圖片大小和位置以適應所選單元格。重復以上步驟，直到您將所有需要插入的圖片都添加到表格中。
5. 如果您需要對圖像進行進一步調整，例如更改大小或添加邊框等效果，您可以使用 Word 中的「格式」選項卡。
6. 最後，保存您的文檔並查看結果。
請注意，如果您將多個大型圖像放置在單個 Word 表格中，則可能會導致文檔變得笨重或響應緩慢。為了避免這種情況，請確保您的圖像不太大，並盡可能將它們分布在多個表格中。