Sub SaveAllSheetsAsBook() Dim Lembar As Worksheet For Each Lembar In ThisWorkbook.Worksheets Lembar.Copy ActiveWorkbook.SaveAs Filename:=Lembar.Name ActiveWorkbook.Close ThisWorkbook.Activate Next End Sub
Prosedur tsb ditulis dlm *Module Standar* Semua workbook hasil dari makro tsb akan tersimpan se-Folder (pada folder yg sama) dengan folder beradanya workbook ini (workbook yg berisi makro tsb) -Markonah- *2012/5/24 Iskandar Caca <[email protected]> > > , Bagaimanakah cara penulisan macro excelnya untuk permasalahan > saya.Saya punya beberapa sheet dgn penamaan : sheet1 (mtm), sheet2 (wil) > kemudian dr tiap sheet tersebut ingin saya simpan ke file baru sesuai dgn > nama masing2 sheet tadi.Terima kasih atas bantuan para master excel, > > Tks ca2* >
