[megaloman]

TPOJIb_55, куда копировать и почему надо переименовывать, не проще ли копировать с новым именем? Как расположен список ID В XLS файле. ИМХО, ваш вопрос не совсем в тему cmd/bat. Почему бы не написать в файл.xls макрос, который выполнит эту задачу?

[TPOJIb_55]

megaloman, Файлы в одной папке и необходимо в эту же папку сложить тоже количество файлов что и id в файле. Файлы могут меняться, и в содержание "файл.xls" меняется список id. С макросами вообще не дружу, поэтому не знаю как это реализовать и отработает ли он если необходимо создать 1000 файлов по списку. В файле список в колонку.

[megaloman]

Вот vbs-скрипт с решением Вашей задачи.

Код:

Book = "файл.xls"
NFile = "картинка.jpg"                              ' Имя размножаемого файла
NewPref = "p"                                       ' Префикс нового имени
NewSuff = "-0mw"                                    ' Суффикс нового имени
    
First = "A1"                                        ' Верхняя клетка с данными в столбце

Where=CreateObject("WScript.Shell").CurrentDirectory+"\"
PBook=Where+Book

' MsgBox PBook

Set XL = CreateObject("Excel.Application")

XL.Visible = False    ' True
XL.Workbooks.Open PBook
    
PName = Where + NFile

Set FSO = CreateObject("Scripting.FileSystemObject")
    
If FSO.FileExists(PName) Then
    Ext = FSO.GetExtensionName(PName)

    i = 0
    With XL.Range(First)
        Do
            RR = CStr(.Offset(i, 0))
            If Len(Trim(CStr(.Offset(i, 0)))) = 0 Then Exit Do
            i = i + 1
            aaa = FSO.CopyFile(PName, Where + "\" + NewPref + RR + NewSuff + "." + Ext, True)
        Loop
        MsgBox "Файл" + vbCrLf + PName + vbCrLf + "скопирован " + CStr(i) + " раз"
    End With
Else
    MsgBox "Файл" + vbCrLf + PName + vbCrLf + "не найден"
End If

XL.Quit

Скрипт должен быть расположен в той же папке, что картинка.jpg и файл.xls. В тексте скрипта настройте реальные имена файлов и адрес ячейки, с которой начинаются данные в столбце файл.xls.

Во вложенном файле присутствует таблица с примером использования макроса. Открываете таблицу, Меню - Сервис - Макросы - Макрос назвал rrr, изменяете его: пИшите реальные имена файлов и указываете начальную клетку. Сохраняете, запускаете на выполнение.

[TPOJIb_55]

megaloman, Огромное вам спасибо! Все работает как часы!