8 Messages
Digest #3436
Messages
Tue May 19, 2015 3:01 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Aji,
Misal hasil di B1. Record mulai baris ke-4 sampai baris ke-25. Yang akan
dihitung cacah berdasar 2 kriteria, yaitu kolom A yang berisi Actual Kirim
(diawali karakter A) dan kolom B dan seterusnya per kolom yang bernilai
lebih dari 0.
Formula di B1 :
=CountIFs( $a$4:$a$25 , "a*" , b$4:b$25 , ">0" )
copy range B1 ke kolom lainnya yang sebaris (C1,D1,dst)
*** Jika regional setting komputer setempat adalah Indonesian, ganti
seluruh karakter koma dalam formula dengan titik koma
Wassalam,
Kid
2015-05-19 16:53 GMT+10:00 'Achmad R. Azie' ar.azie@yahoo.co.id
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Dear master excel
>
> mohon bantuannya rumus apa yang tepat untuk menghitung jumlah item yang
> dikirim tiap harinya
> file terlampir,
>
> terimakasih
> salam
> aji
>
>
>
Misal hasil di B1. Record mulai baris ke-4 sampai baris ke-25. Yang akan
dihitung cacah berdasar 2 kriteria, yaitu kolom A yang berisi Actual Kirim
(diawali karakter A) dan kolom B dan seterusnya per kolom yang bernilai
lebih dari 0.
Formula di B1 :
=CountIFs( $a$4:$a$25 , "a*" , b$4:b$25 , ">0" )
copy range B1 ke kolom lainnya yang sebaris (C1,D1,dst)
*** Jika regional setting komputer setempat adalah Indonesian, ganti
seluruh karakter koma dalam formula dengan titik koma
Wassalam,
Kid
2015-05-19 16:53 GMT+10:00 'Achmad R. Azie' ar.azie@yahoo.co.id
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Dear master excel
>
> mohon bantuannya rumus apa yang tepat untuk menghitung jumlah item yang
> dikirim tiap harinya
> file terlampir,
>
> terimakasih
> salam
> aji
>
>
>
Tue May 19, 2015 8:11 pm (PDT) . Posted by:
"Achmad R. Azie" ar.azie
Dear Mr. Kid Terimakasih atas bantuanya, smga kebaikan dan ilmu yang telah diamalkan Mr. Kid dibalas oleh Tuhan YME, Salamaji
Pada Selasa, 19 Mei 2015 17:01, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Hai Aji,
Misal hasil di B1. Record mulai baris ke-4 sampai baris ke-25. Yang akan dihitung cacah berdasar 2 kriteria, yaitu kolom A yang berisi Actual Kirim (diawali karakter A) dan kolom B dan seterusnya per kolom yang bernilai lebih dari 0.
Formula di B1 :
=CountIFs( $a$4:$a$25 , "a*" , b$4:b$25 , ">0" )
copy range B1 ke kolom lainnya yang sebaris (C1,D1,dst)
*** Jika regional setting komputer setempat adalah Indonesian, ganti seluruh karakter koma dalam formula dengan titik koma
Wassalam,
Kid
2015-05-19 16:53 GMT+10:00 'Achmad R. Azie' ar.azie@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:
Dear master excel mohon bantuannya rumus apa yang tepat untuk menghitung jumlah item yang dikirim tiap harinyafile terlampir, terimakasihsalamaji
#yiv1690258415 -- #yiv1690258415ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1690258415 #yiv1690258415ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1690258415 #yiv1690258415ygrp-mkp #yiv1690258415hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv1690258415 #yiv1690258415ygrp-mkp #yiv1690258415ads {margin-bottom:10px;}#yiv1690258415 #yiv1690258415ygrp-mkp .yiv1690258415ad {padding:0 0;}#yiv1690258415 #yiv1690258415ygrp-mkp .yiv1690258415ad p {margin:0;}#yiv1690258415 #yiv1690258415ygrp-mkp .yiv1690258415ad a {color:#0000ff;text-decoration:none;}#yiv1690258415 #yiv1690258415ygrp-sponsor #yiv1690258415ygrp-lc {font-family:Arial;}#yiv1690258415 #yiv1690258415ygrp-sponsor #yiv1690258415ygrp-lc #yiv1690258415hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1690258415 #yiv1690258415ygrp-sponsor #yiv1690258415ygrp-lc .yiv1690258415ad {margin-bottom:10px;padding:0 0;}#yiv1690258415 #yiv1690258415actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1690258415 #yiv1690258415activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv1690258415 #yiv1690258415activity span {font-weight:700;}#yiv1690258415 #yiv1690258415activity span:first-child {text-transform:uppercase;}#yiv1690258415 #yiv1690258415activity span a {color:#5085b6;text-decoration:none;}#yiv1690258415 #yiv1690258415activity span span {color:#ff7900;}#yiv1690258415 #yiv1690258415activity span .yiv1690258415underline {text-decoration:underline;}#yiv1690258415 .yiv1690258415attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv1690258415 .yiv1690258415attach div a {text-decoration:none;}#yiv1690258415 .yiv1690258415attach img {border:none;padding-right:5px;}#yiv1690258415 .yiv1690258415attach label {display:block;margin-bottom:5px;}#yiv1690258415 .yiv1690258415attach label a {text-decoration:none;}#yiv1690258415 blockquote {margin:0 0 0 4px;}#yiv1690258415 .yiv1690258415bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv1690258415 .yiv1690258415bold a {text-decoration:none;}#yiv1690258415 dd.yiv1690258415last p a {font-family:Verdana;font-weight:700;}#yiv1690258415 dd.yiv1690258415last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv1690258415 dd.yiv1690258415last p span.yiv1690258415yshortcuts {margin-right:0;}#yiv1690258415 div.yiv1690258415attach-table div div a {text-decoration:none;}#yiv1690258415 div.yiv1690258415attach-table {width:400px;}#yiv1690258415 div.yiv1690258415file-title a, #yiv1690258415 div.yiv1690258415file-title a:active, #yiv1690258415 div.yiv1690258415file-title a:hover, #yiv1690258415 div.yiv1690258415file-title a:visited {text-decoration:none;}#yiv1690258415 div.yiv1690258415photo-title a, #yiv1690258415 div.yiv1690258415photo-title a:active, #yiv1690258415 div.yiv1690258415photo-title a:hover, #yiv1690258415 div.yiv1690258415photo-title a:visited {text-decoration:none;}#yiv1690258415 div#yiv1690258415ygrp-mlmsg #yiv1690258415ygrp-msg p a span.yiv1690258415yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv1690258415 .yiv1690258415green {color:#628c2a;}#yiv1690258415 .yiv1690258415MsoNormal {margin:0 0 0 0;}#yiv1690258415 o {font-size:0;}#yiv1690258415 #yiv1690258415photos div {float:left;width:72px;}#yiv1690258415 #yiv1690258415photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv1690258415 #yiv1690258415photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv1690258415 #yiv1690258415reco-category {font-size:77%;}#yiv1690258415 #yiv1690258415reco-desc {font-size:77%;}#yiv1690258415 .yiv1690258415replbq {margin:4px;}#yiv1690258415 #yiv1690258415ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv1690258415 #yiv1690258415ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv1690258415 #yiv1690258415ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv1690258415 #yiv1690258415ygrp-mlmsg select, #yiv1690258415 input, #yiv1690258415 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv1690258415 #yiv1690258415ygrp-mlmsg pre, #yiv1690258415 code {font:115% monospace;}#yiv1690258415 #yiv1690258415ygrp-mlmsg * {line-height:1.22em;}#yiv1690258415 #yiv1690258415ygrp-mlmsg #yiv1690258415logo {padding-bottom:10px;}#yiv1690258415 #yiv1690258415ygrp-msg p a {font-family:Verdana;}#yiv1690258415 #yiv1690258415ygrp-msg p#yiv1690258415attach-count span {color:#1E66AE;font-weight:700;}#yiv1690258415 #yiv1690258415ygrp-reco #yiv1690258415reco-head {color:#ff7900;font-weight:700;}#yiv1690258415 #yiv1690258415ygrp-reco {margin-bottom:20px;padding:0px;}#yiv1690258415 #yiv1690258415ygrp-sponsor #yiv1690258415ov li a {font-size:130%;text-decoration:none;}#yiv1690258415 #yiv1690258415ygrp-sponsor #yiv1690258415ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv1690258415 #yiv1690258415ygrp-sponsor #yiv1690258415ov ul {margin:0;padding:0 0 0 8px;}#yiv1690258415 #yiv1690258415ygrp-text {font-family:Georgia;}#yiv1690258415 #yiv1690258415ygrp-text p {margin:0 0 1em 0;}#yiv1690258415 #yiv1690258415ygrp-text tt {font-size:120%;}#yiv1690258415 #yiv1690258415ygrp-vital ul li:last-child {border-right:none !important;}#yiv1690258415
Pada Selasa, 19 Mei 2015 17:01, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Hai Aji,
Misal hasil di B1. Record mulai baris ke-4 sampai baris ke-25. Yang akan dihitung cacah berdasar 2 kriteria, yaitu kolom A yang berisi Actual Kirim (diawali karakter A) dan kolom B dan seterusnya per kolom yang bernilai lebih dari 0.
Formula di B1 :
=CountIFs( $a$4:$a$25 , "a*" , b$4:b$25 , ">0" )
copy range B1 ke kolom lainnya yang sebaris (C1,D1,dst)
*** Jika regional setting komputer setempat adalah Indonesian, ganti seluruh karakter koma dalam formula dengan titik koma
Wassalam,
Kid
2015-05-19 16:53 GMT+10:00 'Achmad R. Azie' ar.azie@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:
Dear master excel mohon bantuannya rumus apa yang tepat untuk menghitung jumlah item yang dikirim tiap harinyafile terlampir, terimakas
#yiv1690258415 -- #yiv1690258415ygrp-
Tue May 19, 2015 6:43 pm (PDT) . Posted by:
"Toby kenzo" tobykenzo
Dear Matzen, Untuk memudahkan proses input dan Edit lebih baik langsung menggunakan VBA/Macro dengan memanfaatkan pemakaian di UserForm, jadi tidak 2 kali, di macro dan di Worksheet.Data yang ada sudah mengandung kaidah Database,coba di lihat2 lagi file2 sebelumnya,ada banyak penggunaan Database pada Userform. TerimaKasih,
Pada Selasa, 19 Mei 2015 10:26, "'Subroto, Matzen' matzen.subroto@akzonobel.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Dear master Excel, Assalamu alaikum, Wr. Wb. Semoga Allah selalu melimpahkan Hidayah dan Keberkahan untuk semuanya, saya mohon bantuan dengan kasus cell filter Edit data based yang bisa di update adapun file terlampir Terima kasih atas perhatian dan kerjasamanya, dan saya mohon maaf apabila ada kata-kata yang kurang berkenan Terima Kasih Wassalamu alaikum Wr. Wb. Matzen #yiv1665791044 #yiv1665791044 -- #yiv1665791044ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1665791044 #yiv1665791044ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1665791044 #yiv1665791044ygrp-mkp #yiv1665791044hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv1665791044 #yiv1665791044ygrp-mkp #yiv1665791044ads {margin-bottom:10px;}#yiv1665791044 #yiv1665791044ygrp-mkp .yiv1665791044ad {padding:0 0;}#yiv1665791044 #yiv1665791044ygrp-mkp .yiv1665791044ad p {margin:0;}#yiv1665791044 #yiv1665791044ygrp-mkp .yiv1665791044ad a {color:#0000ff;text-decoration:none;}#yiv1665791044 #yiv1665791044ygrp-sponsor #yiv1665791044ygrp-lc {font-family:Arial;}#yiv1665791044 #yiv1665791044ygrp-sponsor #yiv1665791044ygrp-lc #yiv1665791044hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1665791044 #yiv1665791044ygrp-sponsor #yiv1665791044ygrp-lc .yiv1665791044ad {margin-bottom:10px;padding:0 0;}#yiv1665791044 #yiv1665791044actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1665791044 #yiv1665791044activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv1665791044 #yiv1665791044activity span {font-weight:700;}#yiv1665791044 #yiv1665791044activity span:first-child {text-transform:uppercase;}#yiv1665791044 #yiv1665791044activity span a {color:#5085b6;text-decoration:none;}#yiv1665791044 #yiv1665791044activity span span {color:#ff7900;}#yiv1665791044 #yiv1665791044activity span .yiv1665791044underline {text-decoration:underline;}#yiv1665791044 .yiv1665791044attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv1665791044 .yiv1665791044attach div a {text-decoration:none;}#yiv1665791044 .yiv1665791044attach img {border:none;padding-right:5px;}#yiv1665791044 .yiv1665791044attach label {display:block;margin-bottom:5px;}#yiv1665791044 .yiv1665791044attach label a {text-decoration:none;}#yiv1665791044 blockquote {margin:0 0 0 4px;}#yiv1665791044 .yiv1665791044bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv1665791044 .yiv1665791044bold a {text-decoration:none;}#yiv1665791044 dd.yiv1665791044last p a {font-family:Verdana;font-weight:700;}#yiv1665791044 dd.yiv1665791044last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv1665791044 dd.yiv1665791044last p span.yiv1665791044yshortcuts {margin-right:0;}#yiv1665791044 div.yiv1665791044attach-table div div a {text-decoration:none;}#yiv1665791044 div.yiv1665791044attach-table {width:400px;}#yiv1665791044 div.yiv1665791044file-title a, #yiv1665791044 div.yiv1665791044file-title a:active, #yiv1665791044 div.yiv1665791044file-title a:hover, #yiv1665791044 div.yiv1665791044file-title a:visited {text-decoration:none;}#yiv1665791044 div.yiv1665791044photo-title a, #yiv1665791044 div.yiv1665791044photo-title a:active, #yiv1665791044 div.yiv1665791044photo-title a:hover, #yiv1665791044 div.yiv1665791044photo-title a:visited {text-decoration:none;}#yiv1665791044 div#yiv1665791044ygrp-mlmsg #yiv1665791044ygrp-msg p a span.yiv1665791044yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv1665791044 .yiv1665791044green {color:#628c2a;}#yiv1665791044 .yiv1665791044MsoNormal {margin:0 0 0 0;}#yiv1665791044 o {font-size:0;}#yiv1665791044 #yiv1665791044photos div {float:left;width:72px;}#yiv1665791044 #yiv1665791044photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv1665791044 #yiv1665791044photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv1665791044 #yiv1665791044reco-category {font-size:77%;}#yiv1665791044 #yiv1665791044reco-desc {font-size:77%;}#yiv1665791044 .yiv1665791044replbq {margin:4px;}#yiv1665791044 #yiv1665791044ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv1665791044 #yiv1665791044ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv1665791044 #yiv1665791044ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv1665791044 #yiv1665791044ygrp-mlmsg select, #yiv1665791044 input, #yiv1665791044 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv1665791044 #yiv1665791044ygrp-mlmsg pre, #yiv1665791044 code {font:115% monospace;}#yiv1665791044 #yiv1665791044ygrp-mlmsg * {line-height:1.22em;}#yiv1665791044 #yiv1665791044ygrp-mlmsg #yiv1665791044logo {padding-bottom:10px;}#yiv1665791044 #yiv1665791044ygrp-msg p a {font-family:Verdana;}#yiv1665791044 #yiv1665791044ygrp-msg p#yiv1665791044attach-count span {color:#1E66AE;font-weight:700;}#yiv1665791044 #yiv1665791044ygrp-reco #yiv1665791044reco-head {color:#ff7900;font-weight:700;}#yiv1665791044 #yiv1665791044ygrp-reco {margin-bottom:20px;padding:0px;}#yiv1665791044 #yiv1665791044ygrp-sponsor #yiv1665791044ov li a {font-size:130%;text-decoration:none;}#yiv1665791044 #yiv1665791044ygrp-sponsor #yiv1665791044ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv1665791044 #yiv1665791044ygrp-sponsor #yiv1665791044ov ul {margin:0;padding:0 0 0 8px;}#yiv1665791044 #yiv1665791044ygrp-text {font-family:Georgia;}#yiv1665791044 #yiv1665791044ygrp-text p {margin:0 0 1em 0;}#yiv1665791044 #yiv1665791044ygrp-text tt {font-size:120%;}#yiv1665791044 #yiv1665791044ygrp-vital ul li:last-child {border-right:none !important;}#yiv1665791044
Pada Selasa, 19 Mei 2015 10:26, "'Subroto, Matzen' matzen.subroto@akzonobel.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Dear master Excel, Assalamu alaikum, Wr. Wb. Semoga Allah selalu melimpahkan Hidayah dan Keberkahan untuk semuanya, saya mohon bantuan dengan kasus cell filter Edit data based yang bisa di update adapun file terlampir Terima kasih atas perhatian dan kerjasamanya, dan saya mohon maaf apabila ada kata-kata yang kurang berkenan Terima Kasih Wassalamu alaikum Wr. Wb. Matzen #yiv1665791044 #yiv1665791044 -- #yiv1665791044ygrp-
Tue May 19, 2015 7:38 pm (PDT) . Posted by:
"Nang Agus"
Kepada:
Member B-excel.
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
saya membuat cekrip sederhana untuk memprotek sheet dengan password.
saya menggunakan cekrip seperti di bawah ini:
w.Protect "orareti", UserInterfaceOnly = True '(1)
w.Protect "orareti", , , , UserInterfaceOnly = True '(2)
w.Protect Password:="orareti", UserInterFaceOnly:=True '(3)
pada cekrip no 1, worksheet dapat terprotect tetapi tidak dapat ditulisi
dengan VBA, pada cekrip nomer 2 worksheet tidak dapat terproteksi dan dapat
ditulisi.
sedangkan cekrip nomer 3 worksheet terproteksi dan dapat ditulisi dengan
VBA. (yang diingikan)
padahal menurut syntax di helpnya VBA:
Syntax
expression.Protect(Password, DrawingObjects, Contents, Scenarios,
UserInterfaceOnly, AllowFormattingCells, AllowFormattingColumns,
AllowFormattingRows, AllowInsertingColumns, AllowInsertingRows,
AllowInsertingHyperlinks, AllowDeletingColumns, AllowDeletingRows,
AllowSorting, AllowFiltering, AllowUsingPivotTables)
Bagaimanakah perbaikan cekrip saya no 1 dan no 2, agar worksheet
terproteksi dan dapat ditulisi dengan VBA?
Terima kasih
وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
Member B-excel.
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
saya membuat cekrip sederhana untuk memprotek sheet dengan password.
saya menggunakan cekrip seperti di bawah ini:
w.Protect "orareti"
w.Protect "orareti"
w.Protect Password:="
pada cekrip no 1, worksheet dapat terprotect tetapi tidak dapat ditulisi
dengan VBA, pada cekrip nomer 2 worksheet tidak dapat terproteksi dan dapat
ditulisi.
sedangkan cekrip nomer 3 worksheet terproteksi dan dapat ditulisi dengan
VBA. (yang diingikan)
padahal menurut syntax di helpnya VBA:
Syntax
expression.Protect(
UserInterfaceOnly, AllowFormattingCell
AllowFormattingRows
AllowInsertingHyper
AllowSorting, AllowFiltering, AllowUsingPivotTabl
Bagaimanakah perbaikan cekrip saya no 1 dan no 2, agar worksheet
terproteksi dan dapat ditulisi dengan VBA?
Terima kasih
وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
Tue May 19, 2015 8:09 pm (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Mas Nang Agus,Di kompi saya koq ga masalah.Bisa dikirim contoh dummy filenya?
Salam,HK
From: "Nang Agus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: BExcel <belajar-excel@yahoogroups.com>
Sent: Wednesday, 20 May 2015, 9:38
Subject: [belajar-excel] Protect worksheet
Kepada:
Member B-excel.
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
saya membuat cekrip sederhana untuk memprotek sheet dengan password.
saya menggunakan cekrip seperti di bawah ini:
w.Protect "orareti", UserInterfaceOnly = True '(1)
w.Protect "orareti", , , , UserInterfaceOnly = True '(2)
w.Protect Password:="orareti", UserInterFaceOnly:=True '(3)
pada cekrip no 1, worksheet dapat terprotect tetapi tidak dapat ditulisi dengan VBA, pada cekrip nomer 2 worksheet tidak dapat terproteksi dan dapat ditulisi.
sedangkan cekrip nomer 3 worksheet terproteksi dan dapat ditulisi dengan VBA. (yang diingikan)
padahal menurut syntax di helpnya VBA:
Syntax
expression.Protect(Password, DrawingObjects, Contents, Scenarios, UserInterfaceOnly, AllowFormattingCells, AllowFormattingColumns, AllowFormattingRows, AllowInsertingColumns, AllowInsertingRows, AllowInsertingHyperlinks, AllowDeletingColumns, AllowDeletingRows, AllowSorting, AllowFiltering, AllowUsingPivotTables)
Bagaimanakah perbaikan cekrip saya no 1 dan no 2, agar worksheet terproteksi dan dapat ditulisi dengan VBA?
Terima kasih
وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
#yiv5201718854 #yiv5201718854 -- #yiv5201718854ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv5201718854 #yiv5201718854ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv5201718854 #yiv5201718854ygrp-mkp #yiv5201718854hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv5201718854 #yiv5201718854ygrp-mkp #yiv5201718854ads {margin-bottom:10px;}#yiv5201718854 #yiv5201718854ygrp-mkp .yiv5201718854ad {padding:0 0;}#yiv5201718854 #yiv5201718854ygrp-mkp .yiv5201718854ad p {margin:0;}#yiv5201718854 #yiv5201718854ygrp-mkp .yiv5201718854ad a {color:#0000ff;text-decoration:none;}#yiv5201718854 #yiv5201718854ygrp-sponsor #yiv5201718854ygrp-lc {font-family:Arial;}#yiv5201718854 #yiv5201718854ygrp-sponsor #yiv5201718854ygrp-lc #yiv5201718854hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv5201718854 #yiv5201718854ygrp-sponsor #yiv5201718854ygrp-lc .yiv5201718854ad {margin-bottom:10px;padding:0 0;}#yiv5201718854 #yiv5201718854actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv5201718854 #yiv5201718854activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv5201718854 #yiv5201718854activity span {font-weight:700;}#yiv5201718854 #yiv5201718854activity span:first-child {text-transform:uppercase;}#yiv5201718854 #yiv5201718854activity span a {color:#5085b6;text-decoration:none;}#yiv5201718854 #yiv5201718854activity span span {color:#ff7900;}#yiv5201718854 #yiv5201718854activity span .yiv5201718854underline {text-decoration:underline;}#yiv5201718854 .yiv5201718854attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv5201718854 .yiv5201718854attach div a {text-decoration:none;}#yiv5201718854 .yiv5201718854attach img {border:none;padding-right:5px;}#yiv5201718854 .yiv5201718854attach label {display:block;margin-bottom:5px;}#yiv5201718854 .yiv5201718854attach label a {text-decoration:none;}#yiv5201718854 blockquote {margin:0 0 0 4px;}#yiv5201718854 .yiv5201718854bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv5201718854 .yiv5201718854bold a {text-decoration:none;}#yiv5201718854 dd.yiv5201718854last p a {font-family:Verdana;font-weight:700;}#yiv5201718854 dd.yiv5201718854last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv5201718854 dd.yiv5201718854last p span.yiv5201718854yshortcuts {margin-right:0;}#yiv5201718854 div.yiv5201718854attach-table div div a {text-decoration:none;}#yiv5201718854 div.yiv5201718854attach-table {width:400px;}#yiv5201718854 div.yiv5201718854file-title a, #yiv5201718854 div.yiv5201718854file-title a:active, #yiv5201718854 div.yiv5201718854file-title a:hover, #yiv5201718854 div.yiv5201718854file-title a:visited {text-decoration:none;}#yiv5201718854 div.yiv5201718854photo-title a, #yiv5201718854 div.yiv5201718854photo-title a:active, #yiv5201718854 div.yiv5201718854photo-title a:hover, #yiv5201718854 div.yiv5201718854photo-title a:visited {text-decoration:none;}#yiv5201718854 div#yiv5201718854ygrp-mlmsg #yiv5201718854ygrp-msg p a span.yiv5201718854yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv5201718854 .yiv5201718854green {color:#628c2a;}#yiv5201718854 .yiv5201718854MsoNormal {margin:0 0 0 0;}#yiv5201718854 o {font-size:0;}#yiv5201718854 #yiv5201718854photos div {float:left;width:72px;}#yiv5201718854 #yiv5201718854photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv5201718854 #yiv5201718854photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv5201718854 #yiv5201718854reco-category {font-size:77%;}#yiv5201718854 #yiv5201718854reco-desc {font-size:77%;}#yiv5201718854 .yiv5201718854replbq {margin:4px;}#yiv5201718854 #yiv5201718854ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv5201718854 #yiv5201718854ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv5201718854 #yiv5201718854ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv5201718854 #yiv5201718854ygrp-mlmsg select, #yiv5201718854 input, #yiv5201718854 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv5201718854 #yiv5201718854ygrp-mlmsg pre, #yiv5201718854 code {font:115% monospace;}#yiv5201718854 #yiv5201718854ygrp-mlmsg * {line-height:1.22em;}#yiv5201718854 #yiv5201718854ygrp-mlmsg #yiv5201718854logo {padding-bottom:10px;}#yiv5201718854 #yiv5201718854ygrp-msg p a {font-family:Verdana;}#yiv5201718854 #yiv5201718854ygrp-msg p#yiv5201718854attach-count span {color:#1E66AE;font-weight:700;}#yiv5201718854 #yiv5201718854ygrp-reco #yiv5201718854reco-head {color:#ff7900;font-weight:700;}#yiv5201718854 #yiv5201718854ygrp-reco {margin-bottom:20px;padding:0px;}#yiv5201718854 #yiv5201718854ygrp-sponsor #yiv5201718854ov li a {font-size:130%;text-decoration:none;}#yiv5201718854 #yiv5201718854ygrp-sponsor #yiv5201718854ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv5201718854 #yiv5201718854ygrp-sponsor #yiv5201718854ov ul {margin:0;padding:0 0 0 8px;}#yiv5201718854 #yiv5201718854ygrp-text {font-family:Georgia;}#yiv5201718854 #yiv5201718854ygrp-text p {margin:0 0 1em 0;}#yiv5201718854 #yiv5201718854ygrp-text tt {font-size:120%;}#yiv5201718854 #yiv5201718854ygrp-vital ul li:last-child {border-right:none !important;}#yiv5201718854
Salam,HK
From: "Nang Agus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: BExcel <belajar-excel@yahoogroups.com>
Sent: Wednesday, 20 May 2015, 9:38
Subject: [belajar-excel] Protect worksheet
Kepada:
Member B-excel.
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
saya membuat cekrip sederhana untuk memprotek sheet dengan password.
saya menggunakan cekrip seperti di bawah ini:
w.Protect "orareti"
w.Protect "orareti"
w.Protect Password:="
pada cekrip no 1, worksheet dapat terprotect tetapi tidak dapat ditulisi dengan VBA, pada cekrip nomer 2 worksheet tidak dapat terproteksi dan dapat ditulisi.
sedangkan cekrip nomer 3 worksheet terproteksi dan dapat ditulisi dengan VBA. (yang diingikan)
padahal menurut syntax di helpnya VBA:
Syntax
expression.Protect(
Bagaimanakah perbaikan cekrip saya no 1 dan no 2, agar worksheet terproteksi dan dapat ditulisi dengan VBA?
Terima kasih
وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
#yiv5201718854 #yiv5201718854 -- #yiv5201718854ygrp-
Tue May 19, 2015 11:32 pm (PDT) . Posted by:
"Nang Agus"
saya pasang cekrip di workbook open:
Private Sub Workbook_Open()
Dim w As Worksheet
Sheet1.Protect "orareti", , , , UserInterFaceOnly = True
Sheet2.Protect "orareti", UserInterFaceOnly = True
Sheet3.Protect Password:="orareti", UserInterFaceOnly:=True
End Sub
hasilnya:
sheet1, terproteksi dan tidak dapat ditulisi pakai makro.
sheet2 terproteksi palsu, masih bisa ditulis dihapus biasa maupun dengan
makro.
sheet3, terproteksi dan hanya bisa ditulis dengan macro.
On Wed, May 20, 2015 at 10:09 AM, hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Mas Nang Agus,
> Di kompi saya koq ga masalah.
> Bisa dikirim contoh dummy filenya?
>
> Salam,
> HK
>
> ------------------------------
> *From:* "Nang Agus nangagus@gmail.com [belajar-excel]" <
> belajar-excel@yahoogroups.com>
> *To:* BExcel <belajar-excel@yahoogroups.com>
> *Sent:* Wednesday, 20 May 2015, 9:38
> *Subject:* [belajar-excel] Protect worksheet
>
>
> Kepada:
> Member B-excel.
>
> السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>
> saya membuat cekrip sederhana untuk memprotek sheet dengan password.
> saya menggunakan cekrip seperti di bawah ini:
>
> w.Protect "orareti", UserInterfaceOnly = True '(1)
>
> w.Protect "orareti", , , , UserInterfaceOnly = True '(2)
>
> w.Protect Password:="orareti", UserInterFaceOnly:=True '(3)
>
>
> pada cekrip no 1, worksheet dapat terprotect tetapi tidak dapat ditulisi
> dengan VBA, pada cekrip nomer 2 worksheet tidak dapat terproteksi dan dapat
> ditulisi.
> sedangkan cekrip nomer 3 worksheet terproteksi dan dapat ditulisi dengan
> VBA. (yang diingikan)
> padahal menurut syntax di helpnya VBA:
>
>
> Syntax
>
> expression.Protect(Password, DrawingObjects, Contents, Scenarios,
> UserInterfaceOnly, AllowFormattingCells, AllowFormattingColumns,
> AllowFormattingRows, AllowInsertingColumns, AllowInsertingRows,
> AllowInsertingHyperlinks, AllowDeletingColumns, AllowDeletingRows,
> AllowSorting, AllowFiltering, AllowUsingPivotTables)
>
> Bagaimanakah perbaikan cekrip saya no 1 dan no 2, agar worksheet
> terproteksi dan dapat ditulisi dengan VBA?
> Terima kasih
>
>
> وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>
>
>
>
Private Sub Workbook_Open()
Dim w As Worksheet
Sheet1.Protect "orareti", , , , UserInterFaceOnly = True
Sheet2.Protect "orareti", UserInterFaceOnly = True
Sheet3.Protect Password:="orareti", UserInterFaceOnly:=True
End Sub
hasilnya:
sheet1, terproteksi dan tidak dapat ditulisi pakai makro.
sheet2 terproteksi palsu, masih bisa ditulis dihapus biasa maupun dengan
makro.
sheet3, terproteksi dan hanya bisa ditulis dengan macro.
On Wed, May 20, 2015 at 10:09 AM, hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Mas Nang Agus,
> Di kompi saya koq ga masalah.
> Bisa dikirim contoh dummy filenya?
>
> Salam,
> HK
>
> ------------------------------
> *From:* "Nang Agus nangagus@gmail.com [belajar-excel]" <
> belajar-excel@yahoogroups.com>
> *To:* BExcel <belajar-excel@yahoogroups.com>
> *Sent:* Wednesday, 20 May 2015, 9:38
> *Subject:* [belajar-excel] Protect worksheet
>
>
> Kepada:
> Member B-excel.
>
> السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>
> saya membuat cekrip sederhana untuk memprotek sheet dengan password.
> saya menggunakan cekrip seperti di bawah ini:
>
> w.Protect "orareti"
>
> w.Protect "orareti"
>
> w.Protect Password:="
>
>
> pada cekrip no 1, worksheet dapat terprotect tetapi tidak dapat ditulisi
> dengan VBA, pada cekrip nomer 2 worksheet tidak dapat terproteksi dan dapat
> ditulisi.
> sedangkan cekrip nomer 3 worksheet terproteksi dan dapat ditulisi dengan
> VBA. (yang diingikan)
> padahal menurut syntax di helpnya VBA:
>
>
> Syntax
>
> expression.Protect(
> UserInterfaceOnly, AllowFormattingCell
> AllowFormattingRows
> AllowInsertingHyper
> AllowSorting, AllowFiltering, AllowUsingPivotTabl
>
> Bagaimanakah perbaikan cekrip saya no 1 dan no 2, agar worksheet
> terproteksi dan dapat ditulisi dengan VBA?
> Terima kasih
>
>
> وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>
>
>
>
Wed May 20, 2015 12:15 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Wa'alaikumussalam wr wb
Hai Nang,
Bagi yang tidak biasa deklarasi variabel, biasanya Option Explicit akan
dihapus atau sengaja tidak dipasang.
Pada kasus ini, andai ada Option Explicit, maka script akan menjadi error
(coba saja)
Tentang script :
1. yang berbunyi :
w.Protect "orareti", UserInterfaceOnly = True '(1)
> UserInterfaceOnly pada baris di atas akan diartikan oleh VB sebagai
sebuah variabel. Andai ada Option Exlicit, bagian ini akan membuat error.
> Ketika UserInterfaceOnly diartikan sebagai sebuah variabel, maka isi
variabel UserInterfaceOnly adalah empty (karena ber-type variant), sehingga
ketika dibandingkan dengan nilai TRUE hasil perbandingannya adalah FALSE.
> Jadi, UserInterfaceOnly=TRUE menghasilkan nilai skalar FALSE
> nilai false ini sebagai input parameter DrawingObjects dalam methods
Protect milik worksheet.
> Jadi, baris ini sama dengan bunyi :
w.Protect password:="orareti", drawingobjects:= FALSE
atau
w.Protect "orareti", FALSE
> hasilnya, worksheet terproteksi seperti biasa. User maupun VBA tidak
dapat mengubah isi sheet
2. yang berbunyi :
w.Protect "orareti", , , , UserInterfaceOnly = True '(2)
> Terhadap bagian UserInterfaceOnly, penjelasannya seperti nomor 1
> Nilai false hasil perbandingan UserInterfaceOnly=TRUE menjadi input
parameter UserInterfaceOnly dalam methods Protect milik worksheet
> Jadi baris ini sama dengan berbunyi :
w.Protect "orareti", , , , FALSE
atau
w.Protect password:="orareti", , , , userinterfaceonly:=FALSE
3. yang berbunyi :
w.Protect Password:="orareti", UserInterFaceOnly:=True '(3)
> parameter UserInterfaceOnly diberi nilai TRUE
> baris ini sama dengan bunyi :
w.protect "orareti", userinterfaceonly:=true
Sebenarnya, masalah utamanya adalah typo. Coba perhatikan ':=' yang ada di
nomor 3 dan bandingkan dengan nomor 1 dan 2
btw,
Cobalah aktifkan option explicit dan semakin disiplin dalam deklarasi
variabel. Dengan demikian, maka kesalahan typo (salah tulis) seperti ini
bisa dihindari.
Wa'alaikumussalam wr wb
Kid
2015-05-20 12:38 GMT+10:00 Nang Agus nangagus@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Kepada:
> Member B-excel.
>
> السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>
> saya membuat cekrip sederhana untuk memprotek sheet dengan password.
> saya menggunakan cekrip seperti di bawah ini:
>
> w.Protect "orareti", UserInterfaceOnly = True '(1)
>
> w.Protect "orareti", , , , UserInterfaceOnly = True '(2)
>
> w.Protect Password:="orareti", UserInterFaceOnly:=True '(3)
>
>
> pada cekrip no 1, worksheet dapat terprotect tetapi tidak dapat ditulisi
> dengan VBA, pada cekrip nomer 2 worksheet tidak dapat terproteksi dan dapat
> ditulisi.
> sedangkan cekrip nomer 3 worksheet terproteksi dan dapat ditulisi dengan
> VBA. (yang diingikan)
> padahal menurut syntax di helpnya VBA:
>
>
> Syntax
>
> expression.Protect(Password, DrawingObjects, Contents, Scenarios,
> UserInterfaceOnly, AllowFormattingCells, AllowFormattingColumns,
> AllowFormattingRows, AllowInsertingColumns, AllowInsertingRows,
> AllowInsertingHyperlinks, AllowDeletingColumns, AllowDeletingRows,
> AllowSorting, AllowFiltering, AllowUsingPivotTables)
>
> Bagaimanakah perbaikan cekrip saya no 1 dan no 2, agar worksheet
> terproteksi dan dapat ditulisi dengan VBA?
> Terima kasih
>
>
> وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>
>
>
Hai Nang,
Bagi yang tidak biasa deklarasi variabel, biasanya Option Explicit akan
dihapus atau sengaja tidak dipasang.
Pada kasus ini, andai ada Option Explicit, maka script akan menjadi error
(coba saja)
Tentang script :
1. yang berbunyi :
w.Protect "orareti", UserInterfaceOnly = True '(1)
> UserInterfaceOnly pada baris di atas akan diartikan oleh VB sebagai
sebuah variabel. Andai ada Option Exlicit, bagian ini akan membuat error.
> Ketika UserInterfaceOnly diartikan sebagai sebuah variabel, maka isi
variabel UserInterfaceOnly adalah empty (karena ber-type variant), sehingga
ketika dibandingkan dengan nilai TRUE hasil perbandingannya adalah FALSE.
> Jadi, UserInterfaceOnly=TRUE menghasilkan nilai skalar FALSE
> nilai false ini sebagai input parameter DrawingObjects dalam methods
Protect milik worksheet.
> Jadi, baris ini sama dengan bunyi :
w.Protect password:="orareti", drawingobjects:= FALSE
atau
w.Protect "orareti", FALSE
> hasilnya, worksheet terproteksi seperti biasa. User maupun VBA tidak
dapat mengubah isi sheet
2. yang berbunyi :
w.Protect "orareti", , , , UserInterfaceOnly = True '(2)
> Terhadap bagian UserInterfaceOnly, penjelasannya seperti nomor 1
> Nilai false hasil perbandingan UserInterfaceOnly=TRUE menjadi input
parameter UserInterfaceOnly dalam methods Protect milik worksheet
> Jadi baris ini sama dengan berbunyi :
w.Protect "orareti", , , , FALSE
atau
w.Protect password:="orareti", , , , userinterfaceonly:=FALSE
3. yang berbunyi :
w.Protect Password:="orareti", UserInterFaceOnly:=True '(3)
> parameter UserInterfaceOnly diberi nilai TRUE
> baris ini sama dengan bunyi :
w.protect "orareti", userinterfaceonly:=true
Sebenarnya, masalah utamanya adalah typo. Coba perhatikan ':=' yang ada di
nomor 3 dan bandingkan dengan nomor 1 dan 2
btw,
Cobalah aktifkan option explicit dan semakin disiplin dalam deklarasi
variabel. Dengan demikian, maka kesalahan typo (salah tulis) seperti ini
bisa dihindari.
Wa'alaikumussalam wr wb
Kid
2015-05-20 12:38 GMT+10:00 Nang Agus nangagus@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Kepada:
> Member B-excel.
>
> السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>
> saya membuat cekrip sederhana untuk memprotek sheet dengan password.
> saya menggunakan cekrip seperti di bawah ini:
>
> w.Protect "orareti"
>
> w.Protect "orareti"
>
> w.Protect Password:="
>
>
> pada cekrip no 1, worksheet dapat terprotect tetapi tidak dapat ditulisi
> dengan VBA, pada cekrip nomer 2 worksheet tidak dapat terproteksi dan dapat
> ditulisi.
> sedangkan cekrip nomer 3 worksheet terproteksi dan dapat ditulisi dengan
> VBA. (yang diingikan)
> padahal menurut syntax di helpnya VBA:
>
>
> Syntax
>
> expression.Protect(
> UserInterfaceOnly, AllowFormattingCell
> AllowFormattingRows
> AllowInsertingHyper
> AllowSorting, AllowFiltering, AllowUsingPivotTabl
>
> Bagaimanakah perbaikan cekrip saya no 1 dan no 2, agar worksheet
> terproteksi dan dapat ditulisi dengan VBA?
> Terima kasih
>
>
> وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>
>
>
Wed May 20, 2015 12:29 am (PDT) . Posted by:
"Nang Agus"
Asalamualaikum warahmatullah,
mas Kid,
terimakasih atas penjelasannya, makin bertambah ilmu saya tentang
pendeklarasian variabel.
semoga mas Kid selalu sehat bersama keluarga.
wasalamualaikum warahmatullah.
2015-05-20 14:15 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Wa'alaikumussalam wr wb
>
> Hai Nang,
>
> Bagi yang tidak biasa deklarasi variabel, biasanya Option Explicit akan
> dihapus atau sengaja tidak dipasang.
> Pada kasus ini, andai ada Option Explicit, maka script akan menjadi error
> (coba saja)
>
> Tentang script :
> 1. yang berbunyi :
> w.Protect "orareti", UserInterfaceOnly = True '(1)
> > UserInterfaceOnly pada baris di atas akan diartikan oleh VB sebagai
> sebuah variabel. Andai ada Option Exlicit, bagian ini akan membuat error.
> > Ketika UserInterfaceOnly diartikan sebagai sebuah variabel, maka isi
> variabel UserInterfaceOnly adalah empty (karena ber-type variant), sehingga
> ketika dibandingkan dengan nilai TRUE hasil perbandingannya adalah FALSE.
> > Jadi, UserInterfaceOnly=TRUE menghasilkan nilai skalar FALSE
> > nilai false ini sebagai input parameter DrawingObjects dalam methods
> Protect milik worksheet.
> > Jadi, baris ini sama dengan bunyi :
> w.Protect password:="orareti", drawingobjects:= FALSE
> atau
> w.Protect "orareti", FALSE
> > hasilnya, worksheet terproteksi seperti biasa. User maupun VBA tidak
> dapat mengubah isi sheet
>
> 2. yang berbunyi :
> w.Protect "orareti", , , , UserInterfaceOnly = True '(2)
> > Terhadap bagian UserInterfaceOnly, penjelasannya seperti nomor 1
> > Nilai false hasil perbandingan UserInterfaceOnly=TRUE menjadi input
> parameter UserInterfaceOnly dalam methods Protect milik worksheet
> > Jadi baris ini sama dengan berbunyi :
> w.Protect "orareti", , , , FALSE
> atau
> w.Protect password:="orareti", , , , userinterfaceonly:=FALSE
>
> 3. yang berbunyi :
> w.Protect Password:="orareti", UserInterFaceOnly:=True '(3)
> > parameter UserInterfaceOnly diberi nilai TRUE
> > baris ini sama dengan bunyi :
> w.protect "orareti", userinterfaceonly:=true
>
> Sebenarnya, masalah utamanya adalah typo. Coba perhatikan ':=' yang ada di
> nomor 3 dan bandingkan dengan nomor 1 dan 2
>
> btw,
> Cobalah aktifkan option explicit dan semakin disiplin dalam deklarasi
> variabel. Dengan demikian, maka kesalahan typo (salah tulis) seperti ini
> bisa dihindari.
>
> Wa'alaikumussalam wr wb
> Kid
>
>
>
>
> 2015-05-20 12:38 GMT+10:00 Nang Agus nangagus@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Kepada:
>> Member B-excel.
>>
>> السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>>
>> saya membuat cekrip sederhana untuk memprotek sheet dengan password.
>> saya menggunakan cekrip seperti di bawah ini:
>>
>> w.Protect "orareti", UserInterfaceOnly = True '(1)
>>
>> w.Protect "orareti", , , , UserInterfaceOnly = True '(2)
>>
>> w.Protect Password:="orareti", UserInterFaceOnly:=True '(3)
>>
>>
>> pada cekrip no 1, worksheet dapat terprotect tetapi tidak dapat ditulisi
>> dengan VBA, pada cekrip nomer 2 worksheet tidak dapat terproteksi dan dapat
>> ditulisi.
>> sedangkan cekrip nomer 3 worksheet terproteksi dan dapat ditulisi dengan
>> VBA. (yang diingikan)
>> padahal menurut syntax di helpnya VBA:
>>
>>
>> Syntax
>>
>> expression.Protect(Password, DrawingObjects, Contents, Scenarios,
>> UserInterfaceOnly, AllowFormattingCells, AllowFormattingColumns,
>> AllowFormattingRows, AllowInsertingColumns, AllowInsertingRows,
>> AllowInsertingHyperlinks, AllowDeletingColumns, AllowDeletingRows,
>> AllowSorting, AllowFiltering, AllowUsingPivotTables)
>>
>> Bagaimanakah perbaikan cekrip saya no 1 dan no 2, agar worksheet
>> terproteksi dan dapat ditulisi dengan VBA?
>> Terima kasih
>>
>>
>> وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>>
>>
>
>
mas Kid,
terimakasih atas penjelasannya, makin bertambah ilmu saya tentang
pendeklarasian variabel.
semoga mas Kid selalu sehat bersama keluarga.
wasalamualaikum warahmatullah.
2015-05-20 14:15 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Wa'alaikumussalam wr wb
>
> Hai Nang,
>
> Bagi yang tidak biasa deklarasi variabel, biasanya Option Explicit akan
> dihapus atau sengaja tidak dipasang.
> Pada kasus ini, andai ada Option Explicit, maka script akan menjadi error
> (coba saja)
>
> Tentang script :
> 1. yang berbunyi :
> w.Protect "orareti", UserInterfaceOnly = True '(1)
> > UserInterfaceOnly pada baris di atas akan diartikan oleh VB sebagai
> sebuah variabel. Andai ada Option Exlicit, bagian ini akan membuat error.
> > Ketika UserInterfaceOnly diartikan sebagai sebuah variabel, maka isi
> variabel UserInterfaceOnly adalah empty (karena ber-type variant), sehingga
> ketika dibandingkan dengan nilai TRUE hasil perbandingannya adalah FALSE.
> > Jadi, UserInterfaceOnly=TRUE menghasilkan nilai skalar FALSE
> > nilai false ini sebagai input parameter DrawingObjects dalam methods
> Protect milik worksheet.
> > Jadi, baris ini sama dengan bunyi :
> w.Protect password:="orareti", drawingobjects:= FALSE
> atau
> w.Protect "orareti", FALSE
> > hasilnya, worksheet terproteksi seperti biasa. User maupun VBA tidak
> dapat mengubah isi sheet
>
> 2. yang berbunyi :
> w.Protect "orareti", , , , UserInterfaceOnly = True '(2)
> > Terhadap bagian UserInterfaceOnly, penjelasannya seperti nomor 1
> > Nilai false hasil perbandingan UserInterfaceOnly=TRUE menjadi input
> parameter UserInterfaceOnly dalam methods Protect milik worksheet
> > Jadi baris ini sama dengan berbunyi :
> w.Protect "orareti", , , , FALSE
> atau
> w.Protect password:="orareti", , , , userinterfaceonly:=FALSE
>
> 3. yang berbunyi :
> w.Protect Password:="orareti", UserInterFaceOnly:=True '(3)
> > parameter UserInterfaceOnly diberi nilai TRUE
> > baris ini sama dengan bunyi :
> w.protect "orareti", userinterfaceonly:=true
>
> Sebenarnya, masalah utamanya adalah typo. Coba perhatikan ':=' yang ada di
> nomor 3 dan bandingkan dengan nomor 1 dan 2
>
> btw,
> Cobalah aktifkan option explicit dan semakin disiplin dalam deklarasi
> variabel. Dengan demikian, maka kesalahan typo (salah tulis) seperti ini
> bisa dihindari.
>
> Wa'alaikumussalam wr wb
> Kid
>
>
>
>
> 2015-05-20 12:38 GMT+10:00 Nang Agus nangagus@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Kepada:
>> Member B-excel.
>>
>> السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِوَبَرَكَاتُهُ
>>
>> saya membuat cekrip sederhana untuk memprotek sheet dengan password.
>> saya menggunakan cekrip seperti di bawah ini:
>>
>> w.Protect "orareti"
>>
>> w.Protect "orareti"
>>
>> w.Protect Password:="
>>
>>
>> pada cekrip no 1, worksheet dapat terprotect tetapi tidak dapat ditulisi
>> dengan VBA, pada cekrip nomer 2 worksheet tidak dapat terproteksi dan dapat
>> ditulisi.
>> sedangkan cekrip nomer 3 worksheet terproteksi dan dapat ditulisi dengan
>> VBA. (yang diingikan)
>> padahal menurut syntax di helpnya VBA:
>>
>>
>> Syntax
>>
>> expression.Protect(
>> UserInterfaceOnly, AllowFormattingCell
>> AllowFormattingRows
>> AllowInsertingHyper
>> AllowSorting, AllowFiltering, AllowUsingPivotTabl
>>
>> Bagaimanakah perbaikan cekrip saya no 1 dan no 2, agar worksheet
>> terproteksi dan dapat ditulisi dengan VBA?
>> 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
---------------------------------------------------------------------
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
---------------------------------------------------------------------
Tidak ada komentar:
Posting Komentar