Maaf mas Nang, saya salah menafsirkan pertanyaan.
Salam,
HK
Sent from Yahoo Mail on Android
On Thu, Jun 27, 2019 at 13:20, Agus [email protected]
[belajar-excel]<[email protected]> wrote:
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
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] [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="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]
[belajar-excel] <[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
#yiv9050906467 #yiv9050906467 -- #yiv9050906467ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv9050906467
#yiv9050906467ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv9050906467
#yiv9050906467ygrp-mkp #yiv9050906467hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv9050906467 #yiv9050906467ygrp-mkp #yiv9050906467ads
{margin-bottom:10px;}#yiv9050906467 #yiv9050906467ygrp-mkp .yiv9050906467ad
{padding:0 0;}#yiv9050906467 #yiv9050906467ygrp-mkp .yiv9050906467ad p
{margin:0;}#yiv9050906467 #yiv9050906467ygrp-mkp .yiv9050906467ad a
{color:#0000ff;text-decoration:none;}#yiv9050906467 #yiv9050906467ygrp-sponsor
#yiv9050906467ygrp-lc {font-family:Arial;}#yiv9050906467
#yiv9050906467ygrp-sponsor #yiv9050906467ygrp-lc #yiv9050906467hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv9050906467
#yiv9050906467ygrp-sponsor #yiv9050906467ygrp-lc .yiv9050906467ad
{margin-bottom:10px;padding:0 0;}#yiv9050906467 #yiv9050906467actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv9050906467
#yiv9050906467activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv9050906467
#yiv9050906467activity span {font-weight:700;}#yiv9050906467
#yiv9050906467activity span:first-child
{text-transform:uppercase;}#yiv9050906467 #yiv9050906467activity span a
{color:#5085b6;text-decoration:none;}#yiv9050906467 #yiv9050906467activity span
span {color:#ff7900;}#yiv9050906467 #yiv9050906467activity span
.yiv9050906467underline {text-decoration:underline;}#yiv9050906467
.yiv9050906467attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv9050906467 .yiv9050906467attach div a
{text-decoration:none;}#yiv9050906467 .yiv9050906467attach img
{border:none;padding-right:5px;}#yiv9050906467 .yiv9050906467attach label
{display:block;margin-bottom:5px;}#yiv9050906467 .yiv9050906467attach label a
{text-decoration:none;}#yiv9050906467 blockquote {margin:0 0 0
4px;}#yiv9050906467 .yiv9050906467bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv9050906467
.yiv9050906467bold a {text-decoration:none;}#yiv9050906467 dd.yiv9050906467last
p a {font-family:Verdana;font-weight:700;}#yiv9050906467 dd.yiv9050906467last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv9050906467
dd.yiv9050906467last p span.yiv9050906467yshortcuts
{margin-right:0;}#yiv9050906467 div.yiv9050906467attach-table div div a
{text-decoration:none;}#yiv9050906467 div.yiv9050906467attach-table
{width:400px;}#yiv9050906467 div.yiv9050906467file-title a, #yiv9050906467
div.yiv9050906467file-title a:active, #yiv9050906467
div.yiv9050906467file-title a:hover, #yiv9050906467 div.yiv9050906467file-title
a:visited {text-decoration:none;}#yiv9050906467 div.yiv9050906467photo-title a,
#yiv9050906467 div.yiv9050906467photo-title a:active, #yiv9050906467
div.yiv9050906467photo-title a:hover, #yiv9050906467
div.yiv9050906467photo-title a:visited {text-decoration:none;}#yiv9050906467
div#yiv9050906467ygrp-mlmsg #yiv9050906467ygrp-msg p a
span.yiv9050906467yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv9050906467
.yiv9050906467green {color:#628c2a;}#yiv9050906467 .yiv9050906467MsoNormal
{margin:0 0 0 0;}#yiv9050906467 o {font-size:0;}#yiv9050906467
#yiv9050906467photos div {float:left;width:72px;}#yiv9050906467
#yiv9050906467photos div div {border:1px solid
#666666;min-height:62px;overflow:hidden;width:62px;}#yiv9050906467
#yiv9050906467photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv9050906467
#yiv9050906467reco-category {font-size:77%;}#yiv9050906467
#yiv9050906467reco-desc {font-size:77%;}#yiv9050906467 .yiv9050906467replbq
{margin:4px;}#yiv9050906467 #yiv9050906467ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv9050906467 #yiv9050906467ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv9050906467
#yiv9050906467ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv9050906467
#yiv9050906467ygrp-mlmsg select, #yiv9050906467 input, #yiv9050906467 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv9050906467
#yiv9050906467ygrp-mlmsg pre, #yiv9050906467 code {font:115%
monospace;}#yiv9050906467 #yiv9050906467ygrp-mlmsg *
{line-height:1.22em;}#yiv9050906467 #yiv9050906467ygrp-mlmsg #yiv9050906467logo
{padding-bottom:10px;}#yiv9050906467 #yiv9050906467ygrp-msg p a
{font-family:Verdana;}#yiv9050906467 #yiv9050906467ygrp-msg
p#yiv9050906467attach-count span {color:#1E66AE;font-weight:700;}#yiv9050906467
#yiv9050906467ygrp-reco #yiv9050906467reco-head
{color:#ff7900;font-weight:700;}#yiv9050906467 #yiv9050906467ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv9050906467 #yiv9050906467ygrp-sponsor
#yiv9050906467ov li a {font-size:130%;text-decoration:none;}#yiv9050906467
#yiv9050906467ygrp-sponsor #yiv9050906467ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv9050906467
#yiv9050906467ygrp-sponsor #yiv9050906467ov ul {margin:0;padding:0 0 0
8px;}#yiv9050906467 #yiv9050906467ygrp-text
{font-family:Georgia;}#yiv9050906467 #yiv9050906467ygrp-text p {margin:0 0 1em
0;}#yiv9050906467 #yiv9050906467ygrp-text tt {font-size:120%;}#yiv9050906467
#yiv9050906467ygrp-vital ul li:last-child {border-right:none
!important;}#yiv9050906467
