Macro yang anda lampirkan tidak jalan mungkin karena DIR nya tidak sesuai.
Saya coba modifikasi macronya, dimana DIR dan NAMA Filenya saya tempatkan pada
sel B1 dan B2.
seperti berikut ini :
ActiveWorkbook.SaveAs Filename:= _
Range("B1") & Range("B2") & ".xlsm"Alhasil, macronya bisa dijalankan. Kalimat "saya pikir ketika file ini saya open bisa langsung buka itu perintah macro open-file untuk select ke sheets P7" kayaknya kurang pas, karena "macro open-file" maupun "sheet P7" tidak saya temukan dalam file yang dilampirkan. Adapun bedanya format XLS, XLSX, XLSM adalah - XLS extension untuk file Excel sebelum 2007 - XLSX adalah extension untuk file Excel 2007 (tanpa macro) - XLSM adalah extension untuk file Excel 2007 (dengan macro) atau dikenal dengan "Excel Macro-Enabled Workbook. Pada Excel 2007, format ini dapat dibuat "Default" melalui pilihan Excel Options, Save, Save fie in this format. Semoga penjelasan di atas bisa dipahami dan tidak membuat anda tambah bingung. Seperti pepatah mengatakan "Hidup harus terus berjalan" maka Excelpun terus mengembangkan dirinya dan telah sampai pada Excel 2010. Salam, Hendrik Karnadi ________________________________ From: Kusnadi DS <[email protected]> To: xl-mania <[email protected]> Sent: Sunday, August 29, 2010 21:18:53 Subject: ]] XL-mania [[ macro xl2007 yg memusingkan Dear Exceller saya sungguh pusing dg XL-2007 yang dirombak habis2an dari versi sebelumnya yang sudah banayak dikuasai para user... ( sebel deh I hate xl2007 ) sering sekali saya kehilangan macro yg saya tulis dg susah payah..... sungguh menyebalkan. terpaksa saya harus minta advice para pakar disini bagaimana sih seharusnya saya harus simpan macro tsb. terlampir saya kirimkan file xlsm yg saya pikir ketika file ini saya open bisa langsung buka itu perintah macro open-file untuk select ke sheets P7, seperti xl-2003 pendahulunya.... ternyata tidak bisa, mengapa ya ? Lantas apa sih bedanya format XLS, XLSX, XLSM dll itu ? terima kasih ..::kusnadi::.. www.cepak05.blogspot.com www.kopkarlamina.blogspot.com www.nilawood.co.id ####081@@@229@@@711@@@@76#### www.facebook.com/kusnadi.dians
TES.xlsm
Description: Binary data
