windows - 画像のリストを自動的にダウンロードして名前を付ける

Question

画像の xls/csv リストがあります。

Name        image url
test.jpg    http://test.com/232dd.jpg
test2.jpg   http://test.com/2390j.jpg

約 200 個あります...リストをダウンロードして、xls ファイルで識別されるように名前を付ける方法はありますか?

ここに私のExcel VBAがあります：

Private Declare Function URLDownloadToFile Lib "urlmon" _
    Alias "URLDownloadToFileA" (ByVal pCaller As Long, _
    ByVal szURL As String, ByVal szFileName As String, _
    ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

Private Sub download_pics()
  Dim rng As Range
  Dim cell As Variant

  Set rng = Range("A1:B10")
  For Each cell In rng
    ' Download the file.
    URLDownloadToFile 0, cell(rng, 2).Value, "C:\" & cell(rng, 1).Value, 0, 0
  Next
End Sub

URLDownloadToFile でタイプの不一致エラーが発生する