工作表錄入宏後如何插入圖片

❶ 如何快速將大量圖片導入excel如何快速將大量圖片導入word並排版

要快速將大量圖片導入Excel，可以按照以下步驟進行操作：
1. 打開Excel並創建一個新的工作表。
2. 在工作表中選擇您想要插入圖片的單元格。
3. 在Excel菜單欄中選擇「插入」選項卡，然後點擊「圖片」按鈕。
4. 在彈出的對話框中，瀏覽並選擇您想要導入的圖片文件。
5. 選擇圖片文件後，點擊「插入」按鈕。
6. Excel會將選定的圖片插入到您選擇的單元格中。
如果您有大量的圖片需要導入，可以使用以下技巧來加快導入速度：
- 選擇多個單元格：在步驟2中，選擇多個單元格，然後按照步驟3至步驟6的操作將多個圖片一次性導入。
- 使用復制和粘貼：如果您的圖片已經保存在文件夾中，並且它們的文件名與Excel中的數據對應，您可以通過復制圖片文件路徑，然後在Excel中的單元格中粘貼路徑來快速導入多個圖片。
- 使用VBA宏：如果您對VBA編程有一定的了解，您可以編寫一個宏來自動導入大量圖片。這樣可以節省時間和精力。
請注意，插入大量圖片可能會增加Excel文件的大小，並且可能會影響文件的性能。因此，在導入大量圖片之前，請確保您的計算機具有足夠的內存和處理能力來處理這些圖片。
1、全選表格，調整表格的列寬行高。
2、點擊【插入】-【圖片】，將導入的圖片全部選擇插入進來。
3、在上方的圖片設置欄中設置圖片的大小寬度。
4、在最後一個單元中首先插入圖片。並再次選中所有圖片，在【排列】欄中選擇【對齊】-【左對齊】，這樣所有的圖片都會排列整齊。
5、再次點擊【對齊】-【縱向分布】，如此一來，所有的圖片都會規整的移動到自己的單元格中，無需你手動去一張一張的去拖動了。
可以按照以下步驟批量將圖片嵌入單元格：
1. 在 Excel 中，選擇要將圖像插入的單元格區域。
2. 點擊「插入」選項卡中的「圖片」按鈕。
3. 瀏覽您的計算機以找到所需的所有圖像。
4. 選擇並插入第一張圖像後，單擊圖像以顯示「格式」選項卡。
5. 在「格式」選項卡上，單擊「大小和屬性」組中的「鎖定縱橫比」復選框。
6. 然後，將「圖像切入單元格」設置為所需的行為，如「緊貼單元格」。
7. 重復以上步驟，直到所有需要插入的圖像都插入到單元格中。
8. 如果您需要更改任何圖像的大小或位置，請單擊該圖像，並使用「格式」選項卡上的「大小和屬性」組設置。
9. 保存工作表。

❷ excel表格如何使用宏在當前單元格內插入圖片

代碼如下先給你，我先聲明下，我也是之前需要這個操作在網上找的，可以實現你的功能，很好用。

具體用法：

1. 打開excel的VB，把代碼復制進去。

2. 在A列輸入需要插入照片的名稱，然後選定這些有名稱的單元格（重點！要選定）。

3. 然後運行宏，在彈出的對話框選【否】，意思就是在名稱的右邊插入圖片，上面的漢字應該也能看懂。

4. 然後會出來一個對話框讓你選擇路徑，選擇你放照片的那個文件夾，點擊文件夾里的任意一張照片點【打開】。

5. 然後照片就插進去了，而且是每張照片都填滿單元格。

6. 建議提前把單元格的大小設置好然後再運行宏。

   如下看我的示例，功能真雞兒強大，再次膜拜下VB大神。

7. 

Sub A()

Dim Rng As Range

Set Rng = Selection

K = MsgBox("Yes=按姓名行下插入，No=按姓名列右挿入,Cancel=直接覆蓋插入", vbYesNoCancel)

If K = vbYes Then

r = 1: c = 0

ElseIf K = vbNo Then

r = 0: c = 1

Else

r = 0: c = 0

End If

Pf = "ai,"

Pf = Pf & "bmp,bmz"

Pf = Pf & "cdr,cgm,"

Pf = Pf & "dib,dwg,dxf,"

Pf = Pf & "emf,emz,eps,exf,exif,"

Pf = Pf & "fpx,"

Pf = Pf & "gfa,gif,"

Pf = Pf & "hdr,"

Pf = Pf & "ico,"

Pf = Pf & "jfif,jpe,jpeg,jpg,"

Pf = Pf & "pcd,pct,pcx,pcz,pict,png,psd,"

Pf = Pf & "raw,rle,"

Pf = Pf & "svg,"

Pf = Pf & "tga,tif,tiff,"

Pf = Pf & "ufo,"

Picformat = Pf & "wdp,wmf,wmz,"

OpenFile = Application.GetOpenFilename("Picture Files(*.*),*.*", , "打開目的檔案夾後選擇任一圖片即可指定資料夾。或按取消則會將當前檔所在資料夾認作指定資料夾。")

If OpenFile = False Then

myDir = ThisWorkbook.Path & ""

Else

myDir = Left(OpenFile, InStrRev(OpenFile, ""))

End If

Application.ScreenUpdating = False

Filename = Dir(myDir)

Do While Filename <> ""

If InStr(Picformat, LCase(Right(Filename, Len(Filename) - InStrRev(Filename, ".")))) > 0 Then

PicName = Left(Filename, InStrRev(Filename, ".") - 1)

Rng.Select

On Error Resume Next

Selection.Find(What:=PicName, After:=ActiveCell, LookAt:=xlWhole).Activate

If Err.Number <> 0 Then

Err.Clear

Else

ActiveSheet.Pictures.Insert(myDir & Filename).Select

With Selection

.Placement = xlMoveAndSize

.ShapeRange.LockAspectRatio = msoFalse

.Top = ActiveCell.Offset(r, c).Top

.Left = ActiveCell.Offset(r, c).Left

.Height = ActiveCell.Offset(r, c).Height

.Width = ActiveCell.Offset(r, c).Width

End With

End If

End If

Filename = Dir

Loop

Rng.Select

End Sub

❸ 電子表格和文檔如何添加圖片自動排列

圖片插入部分操作步驟：

1、新建WORD文檔，設置為A4紙，並設置好邊界距離

2、計算好A4紙扣除邊界距離所剩下的空白空間

3、將需要載入WORD的圖片SIZE設置為A4剩餘空間除以3後的數字大小（實際SIZE須略小於這個數字）

4、在word菜單中選擇插入圖片，將所有圖片一次性插入文檔，圖片將會自動排列成3X3的版式。

5、效果如附圖

或者

1、新建EXCEL空白檔，設置好需要的邊界

2、打開工具選項，打開」宏「，新建一個」宏」命令

3、插入9張圖片，依次修正大小，排好版面

4、保存宏命令，設置執行宏命令快捷方式，架設為ctrl+1

5、在EXCEL的第二個工作標簽插入第二組9圖，執行ctrl+1宏命令，則電腦將會自動把工作表1的所有操作重復操作1次，直至自動排版完成。

6、最後保存為電子檔。

❹ 在EXCEL中怎麼用宏插入圖片

材料/工具：電腦、Excel2007

1、首先，打開Excel表格，點擊表格最左上邊office按鈕---excel選項 。