以前用Excel2003做了些宏，在網上還有不少粉絲，因一些功能在Excel2010中無法使用，故重新整理，歡迎指正； 本Excel中的宏在Excel2010中測試表現出色; 運行宏前，要保證EXCEL沒有禁用宏。 Michael Ho QQ: 9900060 ----------------------- 本Excel有以下功能： 插入圖片1 1.點擊執行后，會出現文件夾選擇窗，請選擇你JPG圖片所在文件夾(選擇“文件夾”而不是選擇文件)； 2.宏會自動復制Sheet2到新工作簿，并插入你所選文件夾中的全部JPG圖片到B列，對應的圖片名自動填到C列； 3.圖片的大小會自動適應Sheet2的B3單元格，因此可以在點擊執行前調整Sheet2的B3單元格的大小來控制插入圖片的大小。 -------- 插入圖片2 1.點擊執行后，會出現文件夾選擇窗，請選擇你JPG圖片所在文件夾(選擇“文件夾”而不是選擇文件)； 2.宏會自動復制Sheet3到新工作簿，并插入你所選文件夾中的全部JPG圖片制作圖冊，對應的圖片名自動填到圖片下方； -------- 插入圖片3 如果用戶自己的Excel文件中有一列是型號，該宏可以插入指定文件夾里以型號命名的JPG圖片到另一列； 1.打開本Excel文件，不要關閉； 2.再另外打開你自己需要操作的另一個Excel文件，并保持你要操作的工作表做為當前活動工作表； 3.在你的文件中按Ctrl+I (或在你的文件中手動執行宏，然后選擇本EXCEL文件中的宏InsertPic3）； 4.然后會出現文件夾選擇窗，請選擇你JPG圖片所在文件夾(選擇“文件夾”而不是選擇文件)； 5.在彈出的對話框中指定型號在第幾列，圖片要插入到第幾列，以及從哪一行開始； 6.圖片的大小會自動適應你設定的第一行要插入圖片的單元格，因此提前調整那個單元格的大小可以控制插入圖片的大小。 ------------- 刪除活動工作表中所有圖片 Ctrl+d 刪除活動工作表里所有的JPG圖片，（不一定是本工作簿中的工作表）； 1.打開本Excel文件，不要關閉； 2.再另外打開你自己需要操作的另一個Excel文件，并保持你要操作的工作表做為當前活動工作表； 3.在你的文件中按Ctrl+d (或在你的文件中手動執行宏，然后選擇本EXCEL文件中的宏DelPic）； ------------- 導出活動工作表中被選中的一張JPG圖片 Ctrl+e 導出活動工作表中被選中的一張JPG圖片，（不一定是本工作簿中的工作表）； 1.打開本Excel文件，不要關閉； 2.再另外打開你自己需要操作的另一個Excel文件，并保持你要操作的工作表做為當前活動工作表； 3.請選中一張要導出的圖片； 4.在你的文件中按Ctrl+e (或在你的文件中手動執行宏，然后選擇本EXCEL文件中的宏OutputOnePic）； 5.在彈出的對話框中指定圖片要保存的名字； 1.不管圖片在Excel中是否被縮放過，導出的圖片是按圖片的原始尺寸進行保存。 2.在桌面上會自動新建一個"OutputPic"的文件夾，導出的圖片將會存在那個文夾里； 3.如果文件夾中已有相同名字的文件，則后面導出的文件會自動加上(v1), (v2), (v3)... ------------- 導出活動工作表中所有JPG圖片 Ctrl+f 導出活動工作表中所有JPG圖片，并且圖片名自動使用指定列中的圖片名； 1.打開本Excel文件，不要關閉； 2.再另外打開你自己需要操作的另一個Excel文件，并保持你要操作的工作表做為當前活動工作表； 3.在你的文件中按Ctrl+f (或在你的文件中手動執行宏，然后選擇本EXCEL文件中的宏OutputAllPic）； 4.在彈出的對話框中指定圖片所在列，圖片名所在的列； 1.不管圖片在Excel中是否被縮放過，導出的圖片是按圖片的原始尺寸進行保存； 2.在桌面上會自動新建一個"OutputPic"的文件夾，所有導出的圖片將會存在那個文夾里； 3.如果文件夾中已有相同名字的文件，則后面導出的文件會自動加上(v1), (v2), (v3)... ---------------- 對指定文件夾中的JPG圖片進行重命名 Ctrl+r 利用活動工作表中的所有圖片的舊名與新名的對照，對指定文件夾中JPG圖片進行重命名； 1.打開本Excel文件，不要關閉； 2.再另外打開你自己需要操作的另一個Excel文件，并保持你要操作的工作表做為當前活動工作表； 3.在你的文件中按Ctrl+r (或在你的文件中手動執行宏，然后選擇本EXCEL文件中的宏RenamePic）； 4.在彈出的對話框中指定圖片舊名所在列和圖片新名所在的列； 1.可以結合插入圖片的宏，