ok..trimakasih banyak mr kid...atas bantuan dan sarannyasaya coba n pahami dl...
trimaksih all
Pada Sabtu, 12 November 2016 15:12, "'Mr. Kid' mr.nm...@gmail.com
[belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
hmmm....
Jadinya baris cek ada atau tidaknya si sheet diubah sesuai kebutuhan.
Artinya, baris if isnumeric(sshtname) then diganti dengan kondisi lainnya yang
sesuai (bagian isnumeric-nya diganti dengan cara cek lainnya).
hehehe...
pertanyaan Anda sebenarnya adalah bunyi ceknya seperti apa? gitu kan ya...
Ada banyak cara, antara lain :
cara 1. buat prosedur baru yang bertugas untuk loop setiap sheet yang ada, lalu
periksa apakah sheet tersebut memiliki nama seperti yang dipilih user.
> misal di prosedur baru di module tersebut juga
private function CekSheet(sNamaSheet as string) as boolean
dim sht as worksheet
for each sht in thisworkbook.worksheets 'sesuaikan sendiri
bila berkaitan dengan workbook lain
if lcase(sht.name)=snamasheet then
CekSheet=true
exit function
endif
next sht
end function
> lalu baris if isnumeric( blabla dalam prosedur filter diganti menjadi :
if ceksheet(sshtname) then
cara 2. menyimpan
> misal di prosedur baru di module tersebut juga
private function CekSheet(sNamaSheet as string) as boolean
dim sht as worksheet
on error resume next
set sht=sheets(sNamaSheet) 'sesuaikan sendiri bila
berkaitan dengan workbook lain
err.clear
on error goto 0
CekSheet=not (sht is nothing)
end function > lalu baris if isnumeric( blabla dalam prosedur
filter diganti menjadi :
if ceksheet(sshtname) then
cara 3. memanfaatkan formula Excel untuk memeriksa apakah suatu ekspresi dalam
formula itu adalah sebuah reference
> baris if isnumeric( blabla dalam prosedur filter diganti menjadi :
if evaluate("=isref('" & sshtname & "'!a1)") then 'sesuaikan
sendiri bila berkaitan dengan workbook lain
Kalau saya,
> jika user TIDAK mungkin mengganti nama sheet (dibuat untuk pasti TIDAK akan
> mengganti nama sheet), maka saya pakai yang nomor 3
> jika saya tidak mau repot dengan kondisi workbook yang bisa jadi perlu
> dibatasi agar nama sheet tidak boleh diubah, maka saya pakai nomor 1 dengan
> membuat tabel referensi nama data (BUKAN nama panggilan sheet) beserta nama
> akte kelahiran si sheet, dan yang dicek adalah nama akte kelahiran sheet
> (properti codename) bukan nama nama panggilan sheet (properti name). Jadi,
> user boleh mengganti nama sheet sesuka hatinya.
Regards,
Kid
On Sat, Nov 12, 2016 at 9:37 AM, achmad adi dido...@ymail.com [belajar-excel]
<belajar-excel@yahoogroups.com> wrote:
to mr kid.sebelumnya terimakasih ...
kalo seandainya waktu penampilan SEMUA( data semua sheet )
nama sheet bukan numeric(1.2.3) tapi diganti dengan kata (misal:
gudang.kantor.areal)untuk prosedurnya gimana....mohon bantuannya,,,
Pada Selasa, 25 Oktober 2016 18:37, "'Mr. Kid' mr.nm...@gmail.com
[belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Hai Didon,
Terlampir contohnya.
Regards,
Kid
2016-10-24 21:34 GMT+07:00 achmad adi dido...@ymail.com [belajar-excel]
<belajar-excel@yahoogroups.com >:
dear master,,,saya mencoba membuat adv filter tapi hanya di sheet 1 aja
yang bisa difilter...yang ingin saya tanyakan,,,seadainya saya ingin memfilter
data tetapi berdasarkan data sheet terpilih..bagaimanakah caranya...mohon
pencerahaannya,,,saya lampirkan file
sebelumnya saya sampaikan terimakasih
#yiv0806306951 #yiv0806306951 -- #yiv0806306951ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv0806306951
#yiv0806306951ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv0806306951
#yiv0806306951ygrp-mkp #yiv0806306951hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv0806306951 #yiv0806306951ygrp-mkp #yiv0806306951ads
{margin-bottom:10px;}#yiv0806306951 #yiv0806306951ygrp-mkp .yiv0806306951ad
{padding:0 0;}#yiv0806306951 #yiv0806306951ygrp-mkp .yiv0806306951ad p
{margin:0;}#yiv0806306951 #yiv0806306951ygrp-mkp .yiv0806306951ad a
{color:#0000ff;text-decoration:none;}#yiv0806306951 #yiv0806306951ygrp-sponsor
#yiv0806306951ygrp-lc {font-family:Arial;}#yiv0806306951
#yiv0806306951ygrp-sponsor #yiv0806306951ygrp-lc #yiv0806306951hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv0806306951
#yiv0806306951ygrp-sponsor #yiv0806306951ygrp-lc .yiv0806306951ad
{margin-bottom:10px;padding:0 0;}#yiv0806306951 #yiv0806306951actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv0806306951
#yiv0806306951activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv0806306951
#yiv0806306951activity span {font-weight:700;}#yiv0806306951
#yiv0806306951activity span:first-child
{text-transform:uppercase;}#yiv0806306951 #yiv0806306951activity span a
{color:#5085b6;text-decoration:none;}#yiv0806306951 #yiv0806306951activity span
span {color:#ff7900;}#yiv0806306951 #yiv0806306951activity span
.yiv0806306951underline {text-decoration:underline;}#yiv0806306951
.yiv0806306951attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv0806306951 .yiv0806306951attach div a
{text-decoration:none;}#yiv0806306951 .yiv0806306951attach img
{border:none;padding-right:5px;}#yiv0806306951 .yiv0806306951attach label
{display:block;margin-bottom:5px;}#yiv0806306951 .yiv0806306951attach label a
{text-decoration:none;}#yiv0806306951 blockquote {margin:0 0 0
4px;}#yiv0806306951 .yiv0806306951bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv0806306951
.yiv0806306951bold a {text-decoration:none;}#yiv0806306951 dd.yiv0806306951last
p a {font-family:Verdana;font-weight:700;}#yiv0806306951 dd.yiv0806306951last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv0806306951
dd.yiv0806306951last p span.yiv0806306951yshortcuts
{margin-right:0;}#yiv0806306951 div.yiv0806306951attach-table div div a
{text-decoration:none;}#yiv0806306951 div.yiv0806306951attach-table
{width:400px;}#yiv0806306951 div.yiv0806306951file-title a, #yiv0806306951
div.yiv0806306951file-title a:active, #yiv0806306951
div.yiv0806306951file-title a:hover, #yiv0806306951 div.yiv0806306951file-title
a:visited {text-decoration:none;}#yiv0806306951 div.yiv0806306951photo-title a,
#yiv0806306951 div.yiv0806306951photo-title a:active, #yiv0806306951
div.yiv0806306951photo-title a:hover, #yiv0806306951
div.yiv0806306951photo-title a:visited {text-decoration:none;}#yiv0806306951
div#yiv0806306951ygrp-mlmsg #yiv0806306951ygrp-msg p a
span.yiv0806306951yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv0806306951
.yiv0806306951green {color:#628c2a;}#yiv0806306951 .yiv0806306951MsoNormal
{margin:0 0 0 0;}#yiv0806306951 o {font-size:0;}#yiv0806306951
#yiv0806306951photos div {float:left;width:72px;}#yiv0806306951
#yiv0806306951photos div div {border:1px solid
#666666;height:62px;overflow:hidden;width:62px;}#yiv0806306951
#yiv0806306951photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv0806306951
#yiv0806306951reco-category {font-size:77%;}#yiv0806306951
#yiv0806306951reco-desc {font-size:77%;}#yiv0806306951 .yiv0806306951replbq
{margin:4px;}#yiv0806306951 #yiv0806306951ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv0806306951 #yiv0806306951ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv0806306951
#yiv0806306951ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv0806306951
#yiv0806306951ygrp-mlmsg select, #yiv0806306951 input, #yiv0806306951 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv0806306951
#yiv0806306951ygrp-mlmsg pre, #yiv0806306951 code {font:115%
monospace;}#yiv0806306951 #yiv0806306951ygrp-mlmsg *
{line-height:1.22em;}#yiv0806306951 #yiv0806306951ygrp-mlmsg #yiv0806306951logo
{padding-bottom:10px;}#yiv0806306951 #yiv0806306951ygrp-msg p a
{font-family:Verdana;}#yiv0806306951 #yiv0806306951ygrp-msg
p#yiv0806306951attach-count span {color:#1E66AE;font-weight:700;}#yiv0806306951
#yiv0806306951ygrp-reco #yiv0806306951reco-head
{color:#ff7900;font-weight:700;}#yiv0806306951 #yiv0806306951ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv0806306951 #yiv0806306951ygrp-sponsor
#yiv0806306951ov li a {font-size:130%;text-decoration:none;}#yiv0806306951
#yiv0806306951ygrp-sponsor #yiv0806306951ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv0806306951
#yiv0806306951ygrp-sponsor #yiv0806306951ov ul {margin:0;padding:0 0 0
8px;}#yiv0806306951 #yiv0806306951ygrp-text
{font-family:Georgia;}#yiv0806306951 #yiv0806306951ygrp-text p {margin:0 0 1em
0;}#yiv0806306951 #yiv0806306951ygrp-text tt {font-size:120%;}#yiv0806306951
#yiv0806306951ygrp-vital ul li:last-child {border-right:none
!important;}#yiv0806306951
