Jumat, 28 Juni 2019

[belajar-excel] Digest Number 4785

2 Messages

Digest #4785
1a
1b
Re: copy sheet by "Mr. Kid" nmkid.family@ymail.com

Messages

Fri Jun 28, 2019 6:55 am (PDT) . Posted by:

"Agus"

Assalamu'alaikum warahmatullah,
Terima kasih Mas Kid, atas penjelasannya.
Sudah berhasil saya coba menggunakan context menu:
<contextMenu idMso="ContextMenuWorkbookPly">
<button id="Tombol1" label="Move or Copy"
 insertBeforeMso="SheetMoveOrCopy"
 onAction="Anyar"
 imageMso="HappyFace"/>
sebelumnya saya mengubah menggunakan Commands, ternyata tidak bisa
membuat yang baru.
Hanya saja ini tidak dapat digunakan di excel 2007, adakah cara lain
untuk menambahkan context menu di excel 2007?

Wasalamu'alaikum warahmatullah
Regard
NangAgus

On 6/28/2019 10:21, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] wrote:
>
> Tentang :
>
> Seandainya dibuatkan macro, bisa apa tidak yaa code untuk klik
> kanan dibuat sendiri?
>
> > hmmm.... dengan CustomUI terhadap context menu tab sheet, bisa
> dilakukan...
> > ribetnya, termasuk mengatur supaya hanya sheet tersebut saja yang
> akan mengerjakan prosedur VBA copy sheet values, sedang sheet lain
> tetap pakai defaultnya, akan ada keribetannya tersendiri.
> > secara umum, dimungkinkan... yaitu customui bagian context menu tab
> sheet.
>
> Regards,
> Kid
>
>  ============================================================
> 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
> <https://groups.yahoo.com/neo/groups/belajar-excel/info;_ylc=X3oDMTJmZWhxOWFuBF9TAzk3MzU5NzE0BGdycElkAzIwNjI3Njc4BGdycHNwSWQDMTcwODI5ODgyMQRzZWMDdnRsBHNsawN2Z2hwBHN0aW1lAzE1NjE2OTIxMDA->
>
>
> Yahoo! Groups
> <https://groups.yahoo.com/neo;_ylc=X3oDMTJlaXJnOGxrBF9TAzk3NDc2NTkwBGdycElkAzIwNjI3Njc4BGdycHNwSWQDMTcwODI5ODgyMQRzZWMDZnRyBHNsawNnZnAEc3RpbWUDMTU2MTY5MjEwMA-->
>
> • Privacy
> <https://info.yahoo.com/privacy/us/yahoo/groups/details.html> •
> Unsubscribe
> <mailto:belajar-excel-unsubscribe@yahoogroups.com?subject=Unsubscribe>
> • Terms of Use <https://info.yahoo.com/legal/us/yahoo/utos/terms/>
>
> SPONSORED LINKS
> .
>
>

Fri Jun 28, 2019 7:39 am (PDT) . Posted by:

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

Wa'alaikumussalam wr wb

Header xml nya dah disesuaikan untuk xl2007 ?
Kalau sudah dan belum bisa, ada kemungkinan nama object context menunya berbeda

Sent from my smart enough phone

> On Jun 28, 2019, at 20:55, Agus nangagus@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
> Assalamu'alaikum warahmatullah,
> Terima kasih Mas Kid, atas penjelasannya.
> Sudah berhasil saya coba menggunakan context menu:
> <contextMenu idMso="ContextMenuWorkbookPly">
> <button id="Tombol1" label="Move or Copy"
> insertBeforeMso="SheetMoveOrCopy"
> onAction="Anyar"
> imageMso="HappyFace"/>
> sebelumnya saya mengubah menggunakan Commands, ternyata tidak bisa membuat yang baru.
> Hanya saja ini tidak dapat digunakan di excel 2007, adakah cara lain untuk menambahkan context menu di excel 2007?
>
> Wasalamu'alaikum warahmatullah
> Regard
> NangAgus
>
>> On 6/28/2019 10:21, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] wrote:
>>
>>
>> Tentang :
>>> Seandainya dibuatkan macro, bisa apa tidak yaa code untuk klik kanan dibuat sendiri?
>> > hmmm.... dengan CustomUI terhadap context menu tab sheet, bisa dilakukan...
>> > ribetnya, termasuk mengatur supaya hanya sheet tersebut saja yang akan mengerjakan prosedur VBA copy sheet values, sedang sheet lain tetap pakai defaultnya, akan ada keribetannya tersendiri.
>> > secara umum, dimungkinkan... yaitu customui bagian context menu tab sheet.
>>
>> Regards,
>> Kid
>>
>> ============================================================
>> 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
>> ----------------------------------------------------------
>> .
>>
>>
>
>
============================================================
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
---------------------------------------------------------------------
READ MORE....

[smf_addin] Digest Number 4563

5 Messages

Digest #4563

Messages

Thu Jun 27, 2019 9:49 am (PDT) . Posted by:

jullien

For what it's worth, here is Yahoo's response to my trouble ticket:

Hi,

Thanks for reaching out to Yahoo Finance. I understand you are having a less than satisfactory user experience. At this moment our engineers are working tirelessly to address this issue.

We have had a couple of other users report similar problems and we have opened a ticket and added your information to the case. We appreciate your patience as we work through this issue.


If you have additional questions or concerns, please feel free to contact us again.

Best,
Erik
Yahoo Customer Care

Thu Jun 27, 2019 9:56 am (PDT) . Posted by:

"Randy Harmelink" rharmelink

I see updated options on the website now...

When I reported it on the UserVoice area the other night, they actually
claimed they couldn't replicate the problem. So I sent them a screenshot
yesterday.

On Thu, Jun 27, 2019 at 9:50 AM vjullien@... wrote:

>
> For what it's worth, here is Yahoo's response to my trouble ticket:
>
> Hi,
>
>
> Thanks for reaching out to Yahoo Finance. I understand you are having a
> less than satisfactory user experience. At this moment our engineers are
> working tirelessly to address this issue.
>
>
> We have had a couple of other users report similar problems and we have
> opened a ticket and added your information to the case. We appreciate your
> patience as we work through this issue.
>
> If you have additional questions or concerns, please feel free to contact
> us again.
>
>

Thu Jun 27, 2019 12:05 pm (PDT) . Posted by:

nicetime231

I use Elements 981, 991, 992, 4924, 4925, 4929 They broke from YahooKS
but I was confused cause 942,944,952,955,964,966,970,971 did not break which I also use and are YahooKS. So I went to yahoo and checked out the page.


Seems they are no longer listed under "FINANCIAL HIGHLIGHTS" but under "TRADING INFORMATION"


I created the "smf-elements-20.txt" file, copied the elements from #2 txt and edited to:



981;YahooKS;Shares Outstanding;https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING INFORMATION;SHARES OUTSTANDING; ; ;0;0;0;0
991;YahooKS;Dividend Date;https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING INFORMATION;DIVIDEND DATE; ; ;0;0;0;0
992;YahooKS;Ex-Dividend Date;https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING INFORMATION;EX-DIVIDEND DATE; ; ;0;0;0;0


4924;YahooKS;Forward Annual Dividend Rate;https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING INFORMATION;FORWARD ANNUAL DIVIDEND RATE; ; ;0;0;0;0
4925;YahooKS;Forward Annual Dividend Yield;https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING INFORMATION;FORWARD ANNUAL DIVIDEND YIELD; ; ;0;0;0;0
4929;YahooKS;Payout Ratio;https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING INFORMATION;PAYOUT RATIO; ; ;0;0;0;0


Closed the spreadsheet & excel reopened and plugged in a ticker and walla it worked...lol first time playing with the txt files. haha.


Not sure if this adds any value to the yahoo problem you are experiencing but the date is about the same when my spreadsheet broke.


Farv



Thu Jun 27, 2019 12:26 pm (PDT) . Posted by:

jullien

Option prices are currently updating on the Yahoo web site and the smfGetYahooPortfolioView function is now providing valid data.

Thu Jun 27, 2019 12:34 pm (PDT) . Posted by:

"Randy Harmelink" rharmelink

Thanks for the heads up. I've updated the element definitions file:

https://smf-add-in.blogspot.com/2019/06/alert-some-yahoo-element-definitions.html

Unrelated to the option quotes problem, as far as I know.

On Thu, Jun 27, 2019 at 12:05 PM nicetime231@... wrote:

>
> I use Elements
> 981, 991, 992, 4924, 4925, 4929 They broke from YahooKS
> but I was confused cause 942,944,952,955,964,966,970,971 did not break
> which I also use and are YahooKS. So I went to yahoo and checked out the
> page.
>
> Seems they are no longer listed under "FINANCIAL HIGHLIGHTS" but under
> "TRADING INFORMATION"
>
> I created the "smf-elements-20.txt" file, copied the elements from #2 txt
> and edited to:
>
> 981;YahooKS;Shares Outstanding;
> https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING INFORMATION;SHARES
> OUTSTANDING; ; ;0;0;0;0
> 991;YahooKS;Dividend Date;https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING
> INFORMATION;DIVIDEND DATE; ; ;0;0;0;0
> 992;YahooKS;Ex-Dividend Date;
> https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING INFORMATION;EX-DIVIDEND
> DATE; ; ;0;0;0;0
>
> 4924;YahooKS;Forward Annual Dividend Rate;
> https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING INFORMATION;FORWARD
> ANNUAL DIVIDEND RATE; ; ;0;0;0;0
> 4925;YahooKS;Forward Annual Dividend Yield;
> https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING INFORMATION;FORWARD
> ANNUAL DIVIDEND YIELD; ; ;0;0;0;0
> 4929;YahooKS;Payout Ratio;https://finance.yahoo.com/q/ks?s=~~~~~;1;TRADING
> INFORMATION;PAYOUT RATIO; ; ;0;0;0;0
>
> Closed the spreadsheet & excel reopened and plugged in a ticker and walla
> it worked...lol first time playing with the txt files. haha.
>
> Not sure if this adds any value to the yahoo problem you are experiencing
> but the date is about the same when my spreadsheet broke.
>
>
>
For the Add-in, Documentation, Templates, Tips and FAQs, visit http://ogres-crypt.com/SMF
READ MORE....

Kamis, 27 Juni 2019

[belajar-excel] Digest Number 4784

2 Messages

Digest #4784
1a
Re: copy sheet by "hendrik karnadi" hendrikkarnadi
2a
Re: copy sheet [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com

Messages

Thu Jun 27, 2019 3:48 pm (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Maaf mas Nang, saya salah menafsirkan pertanyaan.
Salam,
HK

Sent from Yahoo Mail on Android

On Thu, Jun 27, 2019 at 13:20, Agus nangagus@gmail.com [belajar-excel]<belajar-excel@yahoogroups.com> 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 hendrikkarnadi@yahoo.com [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 nangagus@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> 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' mr.nmkid@gmail.com [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 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



#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

Thu Jun 27, 2019 8:21 pm (PDT) . Posted by:

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

Tentang :

> Seandainya dibuatkan macro, bisa apa tidak yaa code untuk klik kanan
> dibuat sendiri?

> hmmm... dengan CustomUI terhadap context menu tab sheet, bisa dilakukan...
> ribetnya, termasuk mengatur supaya hanya sheet tersebut saja yang akan
mengerjakan prosedur VBA copy sheet values, sedang sheet lain tetap pakai
defaultnya, akan ada keribetannya tersendiri.
> secara umum, dimungkinkan... yaitu customui bagian context menu tab sheet.

Regards,
Kid

On Thu, Jun 27, 2019 at 12:30 PM Agus nangagus@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com> wrote:

>
>
> Assalamu'alaikum warahmatullah wabarakatuh
> Terima kasih mas Kid,
> Kesimpulannya tidak bisa diatur agar klik kanan sheet, move or copy
> hasilnya values.
> Seandainya dibuatkan macro, bisa apa tidak yaa code untuk klik kanan
> dibuat sendiri?
>
> Ilustrasi:
> Sebuah icon pada sebuah group dapat kita nonaktifkan dengan customUI,
> kemudian icon tersebut kita ganti dengan icon yang baru namun gambarnya
> persis sama dengan icon yang lama.
> icon yang baru kita jalankan dengan macro.
> sebagai pengguna awam, saya menganggap tidak ada perubahan apapun pada
> tab, walaupun sebenarnya ada icon dengan perintah baru.
>
> Mas Kid, dapat atau tidak klik kanan pada sheet diubah seperti ilustrasi
> di atas?
>
> Terima kasih.
> Regard
> Wasalamu'alaikum warahmatullah wabarakatuh
>
> NangAgus
>
> On 6/26/2019 23:54, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] wrote:
>
>
> Wa'alaikumussalam wr wb
>
> mas Nang,
>
> melalui proses tersebut tidak dimungkinkan..
> begini :
> [image: imgVBAcopysht.gif]Dari gambar di atas :
> 1. Proses copy sheet di workbook yang sama dengan context menu milik tab
> sheet
> yaitu proses klik kanan tab sheet -> move or copy -> ke workbook yang
> sama sebelum sheet tertentu -> centang create a copy -> OK
> > hasilnya seperti gambar pojok kiri atas <myData.xlsx:1 [baca: file
> myData.xlsx window 1 (yaitu di sheet DATA)]> ke gambar pojok kiri bawah
> (myData.xlsx:2)
> > sheet akan di-copy secara utuh (formula, format [termasuk
> conditional formatting], dsb)
> > memanfaatkan VBA, bisa dengan kode berbunyi seperti ini : (sesuaikan
> object dengan keadaan setempat)
> Sheet1.Copy after:=Sheets(Sheets.Count)
> > jadi, ketika ingin hasilnya values tapi tetap menjaga semua format,
> maka hasil copy sheet tersebut yang di-values dengan kode :
> Sheets(Sheets.Count).usedrange.copy
> Sheets(Sheets.Count).usedrange.pastespecial xlpastevalues
>
> 2. Proses copy sheet ke workbook baru dengan context menu milik tab sheet
> yaitu proses klik kanan tab sheet -> move or copy -> pilih (new book)
> -> centang create a copy -> OK
> > hasilnya seperti gambar pojok kiri atas <myData.xlsx:1 [baca: file
> myData.xlsx window 1 (yaitu di sheet DATA)]> ke gambar atas kedua dari kiri
> (book2)
> > sheet akan di-copy secara utuh (formula, format [termasuk
> conditional formatting], dsb) ke workbook baru
> > memanfaatkan VBA, perlu 2 proses, yaitu :
> 1. membuat workbook baru sebagai target
> 2. copy sheet dari file sumber ke workbook baru
> > hal ini dimungkinkan karena workbook baru dibuat di instance Excel
> yang sama (lihat gambar task manager), yaitu :
> pada instance Microsoft Excel (3) berisi workbook bernama book2
> (hasil buat workbook baru sebagai target lokasi paste) dan workbook
> myData.xlsx (file sumber)
> > terkadang, perlu juga untuk membuang sheets yang dibuat Excel saat
> membentuk workbook baru.
> > secara umum, baris kodenya begini :
>
> Dim wbkb As Workbook, shta As Worksheet
> Set shta = Sheet1
> Set wbkb = Workbooks.Add
> shta.Copy after:=wbkb.Sheets( wbkb.Sheets.count)
>
> > jika butuh mem-values formula, maka lakukan copy paste values
> terhadap object wbkb.Sheets( wbkb.Sheets.count)
>
> 3. Proses copy sheet ke workbook baru langsung hanya values-nya (tanpa
> formula, tanpa conditional format, dsb)
> > dilakukan dengan cara melakukan copy paste ke workbook baru yang ada
> di-instance Excel yang berbeda
> > hasilnya seperti gambar pojok kiri atas <myData.xlsx:1 [baca: file
> myData.xlsx window 1 (yaitu di sheet DATA)]> ke gambar kanan bawah (book1)
> > pada task manager, workbook myData.xlsx berada di instance Microsoft
> Excel (3) [yang bawah], sedangkan workbook book1 berada di instance
> Microsoft Excel [yang atas]
> > memanfaatkan VBA, perlu 4 proses, yaitu :
> 1. membentuk Excel Application baru (instance Excel yang baru)
> 2. membentuk workbook baru dalam instance baru tersebut
> 3. meng-copy area range data di file sumber (instance Excel sumber)
> 4. mem-paste ke sheet target di workbook baru yang ada di instance
> Excel yang baru
> > secara umum, bunyi baris kode-nya begini :
>
> Dim shta As Worksheet, xlapp2 As Excel.Application, wbkb As Workbook
> Set shta = Sheet1
> Set xlapp2 = New Excel.Application
> xlapp2.Visible = True
> Set wbkb = xlapp2.Workbooks.Add
> shta.UsedRange.Copy
> wbkb.Sheets(1).Paste
> Set xlapp2 = Nothing
>
>
> Dari uraian diatas, maka perlu penanganan tersendiri untuk mencegah
> munculnya menu move or copy sheet di dalam context menu tab sheet.
> Hal ini bisa dilakukan dengan cara mem-protect struktur workbook (cukup
> strukturnya saja).
> Proses proteksi pertama kali bisa dilakukan secara manual melalui menu
> Review -> grup menu Protect -> Protect Workbook -> isi password -> centang
> hanya Structure -> OK -> save workbook
> Kemudian dalam proses copy sheet oleh VBA, diawali dengan baris :
> thisworkbook.unprotect "passwordnya"
> lalu sebelum proses selesai, dilakukan protek workbook kembali :
> thisworkbook.protect "passwordnya", structure:=true
>
> Kira-kira demikianlah...
>
> Wassalamu'alaikum wr wb
> Kid
>
>
> On Wed, Jun 26, 2019 at 7:34 PM Agus nangagus@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com> 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' mr.nmkid@gmail.com [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 monexdani@gmail..com
>> <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
>>>
>>
>>
>
>
============================================================
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
---------------------------------------------------------------------
READ MORE....