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

Kirim email ke