將永恆君的百寶箱設為星標 精品文章第一時間讀

有的時候我們在excel記錄班級同學、公司員工的檔案資訊的時候，會需要插入人物的照片。

Excel裡面一張一張的插入照片，還需要手工的將每張圖片調整和單元格一樣的長寬，相信這個工作量就很趕人~~~

不過還好有VBA！！！

今天這篇文章就來分享一下用VBA幫你快速搞定Excel批次插入圖片並完美匹配單元格大小。

問題背景

如下圖，我們想實現的效果是，將提前收集準備好的圖片插入到excel表格當中去，姓名就是插入圖片的名字。

實操過程

1、提取所有圖片的名字

這裡我們可以使用之前介紹過的bat方法，新建一個txt文件，將下面的程式碼複製進去，儲存為filename。bat

然後將bat檔案放入圖片所在的資料夾內，雙擊，會自動生成一個list。txt的文件。

這樣，我們就提取到了所有圖片的名字。

2、用VBA批次插入圖片

將上一步的涉及到的所有圖片名字都複製到excel表當中去

然後執行下面的VBA程式碼

效果演示：

這樣圖片就自動插入進去了，並且自動將大小調整好和單元格匹配。

覺得不好或者需要更新照片的話，可以點選刪除，然後再重新插入。

3、用“查詢和替換”功能，將B2列姓名後面的副檔名刪除掉。

這樣就大功告成。

值得一說的地方

上面的程式碼裡面，和值得注意，這裡說明一下。

VBA裡的和不是同一個單位，至於為啥我也說不清楚，應該是個long story。

我們平常使用也不用糾結這麼多，只需要參照永恆君調整好的這個比例就差不多。

如下圖，：=76：12=6。33

比如，你的excel表格裡面放圖片的單元格列寬是18，那麼圖片寬度需要設定為18*6。33=113。9即可。將程式碼裡的這兩個變數修改一下就可以了。

好了，以上就是今天的全部分享內容。

如果你對上面這些感興趣的話，可以在公號內回覆「

插入圖片

」獲取vba檔案進行試用吧~~

大家的點贊、在看和轉發對我非常重要，如文章對你有幫助還請支援下，謝謝各位！

END

歡迎交流！