[belajar-excel] Digest Number 4782

Milis Belajar Microsoft Excel Group

1 Message

Digest #4782

1a

Re: copy sheet by "Mr. Kid" nmkid.family@ymail.com

Message

1a

Re: copy sheet

Tue Jun 25, 2019 8:34 pm (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Hai Budi Priyo,

1. apakah ada protec nya menggunakan macro juga. dan apakah protec tsb
tidak berpengaruh dengan macro yg ada
*** yang ini terkait proteksi sheet dan proteksi cells
> pastikan sheet tidak dalam keadaan ter-protect
> blok seluruh cells (atau hanya cells tertentu yang akan disembunyikan
formulanya) -> klik kanan cells terpilih -> format cells -> tab Protection
-> centang Locked dan Hidden -> OK
> lalu protect sheet secara manual
> atau dengan baris kode berbunyi (jalankan di intermediate window [tekan
ctrl G -> tulis baris kodenya -> tekan enter])
sheets("nama sheetnya").protect "passwordnya"
> jika ingin agar VBA bisa bekerja pada sheet terproteksi tanpa perlu
membuka proteksi sheet, gunakan baris kode berikut ini :
sheets("nama sheetnya").protect "passwordnya", userinterfaceonly:=true
> save workbook

2. apa bila sheet tersebut di copy (copysheet) formula yg ada dalam sheet
tersebut tidak ikut alias values secara otomatis,
*** yang ini terkait copy values sheet
> buat sebuah general module -> buat sebuah blok prosedur jenis sub, misal
bernama CopasValueSheet
> jika sheet diproteksi secara manual atau dengan VBA tanpa opsi
userinterfaceonly:=true, maka perlu di-unprotect dulu dengan baris kode :
sheets("nama sheetnya").unprotect "passwordnya"
> proses akan terdiri dari 2 bagian utama, yaitu copy sheet menjadi sheet
baru, kemudian copy values nilai yang ada di hasil copy sheet tadi
'jika copy di workbook yang sama
sheets("nama sheetnya").copy before:=sheets(1) 'copy sheet
'copy paste values hasil copy sheet
sheets(1).usedrange.copy
sheets(1).usedrange.pastespecial xlpastevalues

'jika copy ke workbook baru :
dim wbka as workbook, wbkb as workbook
set wbka=thisworkbook
set wbkb=workbooks.add
with wbkb
wbka.sheets("nama sheetnya").copy before:= .sheets(1) 'copy
sheet
.sheets(1).usedrange.copy
.sheets(1).usedrange.pastespecial xlpastevalues
end with
wbka.activate

3. dijalankan dengan macro di sheet
*** ini tentang pemicu (event) yang digunakan agar VBA copy sheet diproses
> sebaiknya diletakkan di modul Thisworkbook dengan event yang sesuai,
misal event ketika cells a1 di double click (sila disesuaikan dengan
kebutuhan setempat)
> pada modul Thisworkbook -> di object Workbook -> buat event
bernama Workbook_SheetBeforeDoubleClick -> isi dengan baris kode berikut
(sesuaikan dengan keadaan setempat)
if sht.name="nama sheetnya" then
'jalankan prosedur copy sheet, misal prosedur CopasValueSheet hasil
nomor 2 di atas
CopasValueSheet
cancel=true
endif
> dengan begini, maka VBA code yang ada di sheet yang di-copy tidak akan
terbawa ke hasil copy sheet

Regards,
Kid

On Thu, Jun 20, 2019 at 11:28 AM Budi Priyo monexdani@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

>
>
> Salam kenal, saya baru bergabung di sini dan ingin menanyakan,
> Saya punya dokument yg dijalankan dengan macro di sheet dan apa bila sheet
> tersebut di copy (copysheet) formula yg ada dalam sheet tersebut tidak ikut
> alias values secara otomatis, apakah ada protec nya menggunakan macro juga.
> dan apakah protec tsb tidak berpengaruh dengan macro yg ada, karena
> dokument tersebut terdapat formula rahasianya.
> Mohon rekan milis mungkin ada yg bisa bantu.
> Sayaucapkan terima kasih
>
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (2) . Top ^

============================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
bergabung ke milis (subscribe), kirim mail kosong ke: belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke: belajar-excel@yahoogroups.com
berkunjung ke web milis : http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran : http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di : http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe), kirim mail kosong ke : belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

Visit Your Group

• Privacy • Unsubscribe • Terms of Use