Kan sebelum buat workbook baru sudah diubah dulu jumlah sheet bawaan excel ketika buat workbook baru dengan properti sheetsinnewworkbook. Coba deh dibaca ulang.
contoh : dim lBuiltInSht as long lbuiltinsht=application.sheetsinneworkbook 'simpan dulu settingan kesenangan user application.sheetsinneworkbook=1 'buat workbook baru disini 'copas sheet disini dengan opsi selalu after application.displayalerts=false wbkt.sheets(1).delete application.displayalerts=true application.sheetsinneworkbook=lbuiltinsht 'simpan workbook baru disini 'tutup sekalian juga boleh 'selesai deh Wassalam, Kid. 2012/11/14 him mah <himmah....@gmail.com> > application.sheetsinneworkbook