Pak Hendrik, yang saya maksudkan mencegah orang lain untuk copy seluruh sheet, hanya bisa copy untuk paste values. walaupun caranya menggunakan klik kanan paste sheet, hasilnya tetap values.
Jadi bukan tanya caranya copy sheet dengan VBA.
salam
Kenang
On 6/27/2019 11:40, hendrik karnadi [email protected] [belajar-excel] wrote:

Ikutan ya mas Nang.

Coba pakai macro recording.

Salam,
HK


Sent from Yahoo Mail on Android <https://overview.mail.yahoo.com/mobile/?.src=Android>

    On Wed, Jun 26, 2019 at 20:35, Agus [email protected] [belajar-excel]
    <[email protected]> wrote:

    Assalamu'alaikum warahmatullah wabarakatuh,
    Mas Kid mau tanya:
    Kalau seandainya saya klik kanan di sheet, terus Move or copy ..
    pilih to_book :(newbook).
    bisa apa tidak diatur lewat vba hasil copyannya hanya values.
    Maksudnya mencegah orang lain untuk copy seluruh sheet, namun
    hanya copy values-nya saja.
    terima kasih
    Wasalamualaikum warahmatullah.
    Kenang Agus


    On 6/26/2019 10:34, 'Mr. Kid' [email protected]
    <mailto:[email protected]> [belajar-excel] wrote:
    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 <http://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 [email protected]
    <mailto:[email protected]> [belajar-excel]
    <[email protected]
    <mailto:[email protected]>> 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





Kirim email ke