2015-08-16 2 views
0

Я хочу создать копию книги Excel и сохранить ее с новым именем файла.Создать копию книги excel

Просьба предоставить мне код.

Приведенный ниже код скопировать текущую книгу, а не другой файл.

ThisWorkbook.Sheets("Sheet1").Copy 
    ActiveWorkbook.SaveAs "C:\Target.xlsx",  FileFormat:=51 

ответ

0

Постарайся ActiveWorkbook.SaveCopyAs "C:\Target.xlsx"

+0

Я хочу, чтобы создать копию другого файла, который не является ни активным, ни текущая книга –

+0

Ах, это было не ясно, в вашем вопросе. Поскольку вы просто копируете файл (факт, что он является другим документом Excel, не имеет значения) просто используйте 'FileSystemObject' (http://stackoverflow.com/questions/tagged/filesystemobject) для работы с файлом (переместите, создайте копию , и т.д) – Tim

Смежные вопросы