作為大學的班委，在收集信息時，最頭疼的就是對收集的圖片進行分類存放和按要求命名。
例如要收集班上同學的紅、藍、白底的寸照，並且要求紅、藍和白底各放一個文件夾，名稱分別為紅底寸照、藍底寸照和白底寸照，還要對每一張照片以姓名+身份證號命名。
為此，我制作並優化了一個小軟件，現在能快速解決這個問題啦。之前發布過這個軟件的1.0版本，也介紹過這個軟件（戳此查看以前的介紹），但在圖片下載中極易崩潰。
在此基礎上，進行了進一步的優化，誕生了今天的下載器2.0版本，我們來看看演示效果吧！
【注：請一定看完文章最后的注意事項，否則軟件可能因為導入的Excel表格不規范而閃退和崩潰！！！】
演示效果
視頻演示效果如下（P1）：
視頻當中使用的VB代碼如下：
1 Function GetAdrs(Rng) 2 Application.Volatile True 3 With Rng.Hyperlinks(1) 4 GetAdrs = IIf(.Address = "", .SubAddress, .Address) 5 End With 6 End Function
復制上述代碼至模塊，使用GetAdrs()函數即可顯示藍字鏈接地址。
具體操作步驟
視頻完整版操作（P2）：
文字介紹操作步驟：
一、收集結果表格預處理
1.顯示圖片地址：開發工具 - VB - 插入 - 模塊 - 粘貼代碼 - 使用GetAdrs()函數顯示地址【如果收集結果圖片地址是直接顯示的，則該步驟可以跳過，最后的另存為xlsm也可以跳過】
插入VB代碼使超鏈接地址直接顯示
2.為同類圖片添加文件夾標題：在直接顯示地址一列的上方添加該類的標題，即分類文件夾的名稱，同一列的圖片將放置在該名稱的文件夾下
添加標題，即分類文件夾的名稱
3.根據命名規則獲得每一張圖片的名稱：單元格設置為常規模式，使用函數定義圖片名稱【如果本就存在圖片名稱列，比如要求是以姓名作為每一張圖的名稱，而B列就是姓名列，就可以跳過本步驟】
定義 姓名+身份證號 的每一張圖片的名稱
最后，因為使用了VB代碼，所以需要將文件另存為xlsm格式。
將文件另存為xlsm格式
二、設置軟件參數
1.首先需要導入收集結果表格，如前面保存的xlsm表格：
導入收集結果表格
2.第一個需要填的數字是指超鏈接所在的工作表數，此處為第一個工作表，所以用默認的1就行：
第一個數值：圖片地址（超鏈接）在的工作表數，此處為1
3.第二個需要填入的數字是圖片地址所在的列數：如果只有一列填一個數字即可，多列請用逗號分隔！此處為第6、8、10列，所以填6，8，10
圖片地址（超鏈接）在第6、8、10列，所以填6，8，10
4.第三個要填的數值是指分類文件夾名稱（同類的標題）在哪一行，此處（紅、藍、白底寸照）為第一行，所以使用默認的1
紅底寸照、藍底寸照、白底寸照 分類標題在第一行，所以填1
5.第四個要填的數值是指：告訴軟件給每一張圖片命名的信息列在哪一列，此處要求是姓名+身份證號，所以是在表格的第4列，這里填4。后面還可以修改保存圖片類型。
姓名+身份證號在表格的第4列，所以這里填4
6.最后，點擊瀏覽，選擇將要下載的文件保存的地方，點擊開始下載就可以啦！
點擊瀏覽，找到想要保存的地址
還有下面的注意事項哦，不然軟件極可能因操作不當崩潰！
導入的表格注意事項
導入的表格要求說明（P3）：
一、有分類文件夾名稱，即在直接顯示地址的那一列得有標題
二、圖片地址必須直接顯示，如果不能直接顯示（同左側藍字那樣），就按上面的預處理第一步操作將圖片地址在單元格直接顯示
三、圖片地址打開后是一張純圖片，不能有其他元素（如網頁按鈕等），同一列地址相鄰之間不允許有空白行！
簡單說一下，前面預處理的VB代碼作用就是使圖片地址顯示，而使用代碼就需要保存為啟用宏的xlsm格式。
所以如果你的表格圖片地址本就已經顯示，而且地址內容為純圖片，沒有雜七雜八其他網頁元素（因為有其它內容軟件就不能找到圖片，就會崩潰），而且也有分類的標題和每一張圖片的名稱信息列，那就直接用軟件導入表格，填入相關參數下載就好了。
軟件下載地址
藍奏雲（若無法訪問請將網址lanzous的s改成x或者i）
地址：https://billsheng.lanzous.com/iinS8m2ft7a
密碼：fmqf
百度網盤
鏈接：https://pan.baidu.com/s/16ejMQTTIA4tXcCwVl41ZPw
提取碼：swwl
歡迎關注微信公眾號【優秀物聯人】了解更多。
