Maksudnya save as ?
Workbook yang VBA nya sedang bekerja :
Thisworkbook.saveas "nama baru file fullname", enumFileFormat
Workbook yang sedang terbuka di-instance excel application yang sama bernama kid.xlsx
Workbooks("kid.xlsx").saveas
"nama baru file fullname", enumFileFormat
Workbook kid.xlsx yang ada di D:\folder\subfolder tapi akan dikerjakan di instance excel application yang berbeda dengan yang vba nya sedang bekerja :
dim wbkApp as workbook, xlAppLain as application, wbkLain as workbook
set wbkapp=thisworkbook
set xlapplain=new excel.application
set wbklain=xlapplain.workbooks.open("d:\folder\subfolder\kid.xlsx",2,true) 'dibuka tanpa update file dan dalam keadaan read only
wbklain.saveas
"nama baru file fullname", enumFileFormat
wbklain.close false 'tutup tanpa di-save (setelah save-as)
xlapplain.quit
wbkapp.activate
Untuk enumFileFormat bisa dilihat dan dipilih
disini sesuai kebutuhan.
Regards,
Kid