Jumat, 20 Februari 2015

[belajar-excel] Digest Number 3309

15 Messages

Digest #3309
1a
Re: Cara mempersingkat formula by "Mr. Kid" nmkid.family@ymail.com
1b
Re: Cara mempersingkat formula by "Abdoel Khobir" mbellgedez
2b
Re: Cara Copy Paste Tranpose (tapi bukan tranpose) by "Mr. Kid" nmkid.family@ymail.com
2d
Re: Cara Copy Paste Tranpose (tapi bukan tranpose) by "Mr. Kid" nmkid.family@ymail.com
2e
Re: Cara Copy Paste Tranpose (tapi bukan tranpose) by "hendrik karnadi" hendrikkarnadi
3b
Re: Cara Copy Paste Tranpose (tapi bukan tranpose) by "Mr. Kid" nmkid.family@ymail.com
5a
Waktu by "Dede"
5b
Re: Waktu [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com
5c
Re: Waktu by "Dede"
5d
Re: Waktu by "Dede"

Messages

Thu Feb 19, 2015 3:47 am (PST) . Posted by:

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

Contoh dengan pivot consolidation range seperti file yang ada disini
<https://app.box.com/s/d6xda86gww762s8fxkaopp1wz1l64lia>. Langkah-langkah
pembuatan pivot consolidation range ada dalam file tersebut.

Wassalam,
Kid.

2015-02-19 21:27 GMT+11:00 Mr. Kid <mr.nmkid@gmail.com>:

> oh iya, kalau pakai xl2010 ke atas, bisa menggunakan power pivot (di
> xl2010, pastikan sudah menginstall addin power pivot nya).
>
> 2015-02-19 21:23 GMT+11:00 Mr. Kid <mr.nmkid@gmail.com>:
>
>> hehehe...
>> kalo rujukannya akan dibuat 3D (sheets,column,row) ndak bisa pake array
>> ataupun fungsi selain sum dan count.
>> kalo tetap sheet per sheet seperti formula di atas, malah bingung seperti
>> apa array formulanya.
>> lebih mungkin menggunakan pivot consolidation range (yang di xl2007 ke
>> atas disembunyikan pembuat office).
>> lebih bagus lagi jika mau menggunakan get external data dan diolah
>> menggunakan SQL
>>
>> Regards,
>> Kid.
>>
>>
>> 2015-02-19 21:06 GMT+11:00 Hendrik Karnadi hendrikkarnadi@yahoo.com
>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Apakah bisa pakai array formula Mr.Kid?
>>>
>>> Salam,
>>> HK
>>>
>>> Sent from Samsung Mobile
>>>
>>>
>>> -------- Original message --------
>>> From: "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]"
>>> Date:19/02/2015 16:06 (GMT+07:00)
>>> To: BeExcel
>>> Subject: Re: [belajar-excel] Cara mempersingkat formula
>>>
>>>
>>>
>>> Coba :
>>>
>>> =IF(COUNTIF(BSD!$E$3:$E$1001;F3)+COUNTIF(DS!$E$3:$E$1001;F3)+COUNTIF(GS!$E$3:$E$1001;F3)+COUNTIF(HI!$E$3:$E$1001;F3)+COUNTIF(KB!$E$3:$E$1001;F3)+COUNTIF(KG!$E$3:$E$1001;F3)+COUNTIF(LC!$E$3:$E$1001;F3)+COUNTIF(MT!$E$3:$E$1001;F3)+COUNTIF(PG!$E$3:$E$1001;F3)+COUNTIF(PI!$E$3:$E$1001;F3)+COUNTIF(PIK!$E$3:$E$1001;F3)+COUNTIF(PLU!$E$3:$E$1001;F3)+COUNTIF(SUN!$E$3:$E$1001;F3)+COUNTIF(SAT!$E$3:$E$1001;F3)+COUNTIF(PSK!$E$3:$E$1001;F3)+COUNTIF(SSBT!$E$3:$E$1001;F3);"MASUK";"")
>>>
>>> Lumayan, dari 710 menjadi 471
>>>
>>> Wassalam,
>>> Kid.
>>>
>>>
>>>
>>> 2015-02-19 16:52 GMT+11:00 Abdoel Khobir glendoch@gmail.com
>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>
>>>>
>>>>
>>>> Master Excell Yang terhormat.....
>>>>
>>>> Gong Xi Fa Chai bagi yg merayakan yaaa
>>>> saya punya file dengan 16 sheet dan satu sheet database
>>>> jika ada data yang sama 16 sheet tsb dengan database maka menerangkan
>>>> "masuk"
>>>> saya menggunakan formula sbb:
>>>>
>>>> =IF(COUNTIFS(BSD!$E$3:$E$1001;F3);"MASUK&quot;;)&(IF(COUNTIFS(DS
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(GS
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(HI
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(KB
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(KG
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(LC
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(MT
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(PG
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(PI
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(PIK
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(PLU
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(SUN
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(SAT
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(PSK
>>>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(SSBT
>>>> !$E$3:$E$1001;F3);"MASUK";))))))))))))))))
>>>>
>>>> Terima kasih sebelumnya
>>>>
>>>>
>>>
>>>
>>
>>
>

Thu Feb 19, 2015 7:36 pm (PST) . Posted by:

"Abdoel Khobir" mbellgedez

Terima kasih Mr Kid,resepnya manjuurr...
semoga Tuhan membalas amalan yang bermanfaat ini
Salaam

2015-02-19 16:06 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Coba :
>
> =IF(COUNTIF(BSD!$E$3:$E$1001;F3)+COUNTIF(DS!$E$3:$E$1001;F3)+COUNTIF(GS!$E$3:$E$1001;F3)+COUNTIF(HI!$E$3:$E$1001;F3)+COUNTIF(KB!$E$3:$E$1001;F3)+COUNTIF(KG!$E$3:$E$1001;F3)+COUNTIF(LC!$E$3:$E$1001;F3)+COUNTIF(MT!$E$3:$E$1001;F3)+COUNTIF(PG!$E$3:$E$1001;F3)+COUNTIF(PI!$E$3:$E$1001;F3)+COUNTIF(PIK!$E$3:$E$1001;F3)+COUNTIF(PLU!$E$3:$E$1001;F3)+COUNTIF(SUN!$E$3:$E$1001;F3)+COUNTIF(SAT!$E$3:$E$1001;F3)+COUNTIF(PSK!$E$3:$E$1001;F3)+COUNTIF(SSBT!$E$3:$E$1001;F3);"MASUK";"")
>
> Lumayan, dari 710 menjadi 471
>
> Wassalam,
> Kid.
>
>
>
> 2015-02-19 16:52 GMT+11:00 Abdoel Khobir glendoch@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>>
>>
>> Master Excell Yang terhormat.....
>>
>> Gong Xi Fa Chai bagi yg merayakan yaaa
>> saya punya file dengan 16 sheet dan satu sheet database
>> jika ada data yang sama 16 sheet tsb dengan database maka menerangkan
>> "masuk"
>> saya menggunakan formula sbb:
>>
>> =IF(COUNTIFS(BSD!$E$3:$E$1001;F3);"MASUK&quot;;)&(IF(COUNTIFS(DS
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(GS
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(HI
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(KB
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(KG
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(LC
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(MT
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(PG
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(PI
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(PIK
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(PLU
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(SUN
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(SAT
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(PSK
>> !$E$3:$E$1001;F3);"MASUK";)&(IF(COUNTIFS(SSBT
>> !$E$3:$E$1001;F3);"MASUK";))))))))))))))))
>>
>> Terima kasih sebelumnya
>>

>>
>
>

Thu Feb 19, 2015 8:27 am (PST) . Posted by:

"hendrik karnadi" hendrikkarnadi

Hai Misi,Untuk mempersingkat formula diperlukan kolom bantu yang menggabungkan No Urut (diisi penuh) dengan Judul (Nama,TTL,NIK,Alamat,Status,Pekerjaan).Kemudian gunakan gabungan Fungsi Index dan Match.Hasilnya seperti file terlampir.
Salam,HK

From: "mbah_t@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: belajar-excel@yahoogroups.com
Sent: Wednesday, 18 February 2015, 23:51
Subject: [belajar-excel] Cara Copy Paste Tranpose (tapi bukan tranpose) [1 Attachment]

  Misi.. Ingin bertanya lagi..
Ini sya pengen copas tranpose  data biodata yang bentuknya 2 kolom menjadi beberapa kolom sesuai dengan isiannya..
Contoh terlampir

Klo macam kasus ini namanya apa ya? pahamnya cuman tranpose :)

terima kasih sbelumnya :) #yiv4297798800 #yiv4297798800 -- #yiv4297798800ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv4297798800 #yiv4297798800ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv4297798800 #yiv4297798800ygrp-mkp #yiv4297798800hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv4297798800 #yiv4297798800ygrp-mkp #yiv4297798800ads {margin-bottom:10px;}#yiv4297798800 #yiv4297798800ygrp-mkp .yiv4297798800ad {padding:0 0;}#yiv4297798800 #yiv4297798800ygrp-mkp .yiv4297798800ad p {margin:0;}#yiv4297798800 #yiv4297798800ygrp-mkp .yiv4297798800ad a {color:#0000ff;text-decoration:none;}#yiv4297798800 #yiv4297798800ygrp-sponsor #yiv4297798800ygrp-lc {font-family:Arial;}#yiv4297798800 #yiv4297798800ygrp-sponsor #yiv4297798800ygrp-lc #yiv4297798800hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv4297798800 #yiv4297798800ygrp-sponsor #yiv4297798800ygrp-lc .yiv4297798800ad {margin-bottom:10px;padding:0 0;}#yiv4297798800 #yiv4297798800actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv4297798800 #yiv4297798800activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv4297798800 #yiv4297798800activity span {font-weight:700;}#yiv4297798800 #yiv4297798800activity span:first-child {text-transform:uppercase;}#yiv4297798800 #yiv4297798800activity span a {color:#5085b6;text-decoration:none;}#yiv4297798800 #yiv4297798800activity span span {color:#ff7900;}#yiv4297798800 #yiv4297798800activity span .yiv4297798800underline {text-decoration:underline;}#yiv4297798800 .yiv4297798800attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv4297798800 .yiv4297798800attach div a {text-decoration:none;}#yiv4297798800 .yiv4297798800attach img {border:none;padding-right:5px;}#yiv4297798800 .yiv4297798800attach label {display:block;margin-bottom:5px;}#yiv4297798800 .yiv4297798800attach label a {text-decoration:none;}#yiv4297798800 blockquote {margin:0 0 0 4px;}#yiv4297798800 .yiv4297798800bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv4297798800 .yiv4297798800bold a {text-decoration:none;}#yiv4297798800 dd.yiv4297798800last p a {font-family:Verdana;font-weight:700;}#yiv4297798800 dd.yiv4297798800last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv4297798800 dd.yiv4297798800last p span.yiv4297798800yshortcuts {margin-right:0;}#yiv4297798800 div.yiv4297798800attach-table div div a {text-decoration:none;}#yiv4297798800 div.yiv4297798800attach-table {width:400px;}#yiv4297798800 div.yiv4297798800file-title a, #yiv4297798800 div.yiv4297798800file-title a:active, #yiv4297798800 div.yiv4297798800file-title a:hover, #yiv4297798800 div.yiv4297798800file-title a:visited {text-decoration:none;}#yiv4297798800 div.yiv4297798800photo-title a, #yiv4297798800 div.yiv4297798800photo-title a:active, #yiv4297798800 div.yiv4297798800photo-title a:hover, #yiv4297798800 div.yiv4297798800photo-title a:visited {text-decoration:none;}#yiv4297798800 div#yiv4297798800ygrp-mlmsg #yiv4297798800ygrp-msg p a span.yiv4297798800yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv4297798800 .yiv4297798800green {color:#628c2a;}#yiv4297798800 .yiv4297798800MsoNormal {margin:0 0 0 0;}#yiv4297798800 o {font-size:0;}#yiv4297798800 #yiv4297798800photos div {float:left;width:72px;}#yiv4297798800 #yiv4297798800photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv4297798800 #yiv4297798800photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv4297798800 #yiv4297798800reco-category {font-size:77%;}#yiv4297798800 #yiv4297798800reco-desc {font-size:77%;}#yiv4297798800 .yiv4297798800replbq {margin:4px;}#yiv4297798800 #yiv4297798800ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv4297798800 #yiv4297798800ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv4297798800 #yiv4297798800ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv4297798800 #yiv4297798800ygrp-mlmsg select, #yiv4297798800 input, #yiv4297798800 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv4297798800 #yiv4297798800ygrp-mlmsg pre, #yiv4297798800 code {font:115% monospace;}#yiv4297798800 #yiv4297798800ygrp-mlmsg * {line-height:1.22em;}#yiv4297798800 #yiv4297798800ygrp-mlmsg #yiv4297798800logo {padding-bottom:10px;}#yiv4297798800 #yiv4297798800ygrp-msg p a {font-family:Verdana;}#yiv4297798800 #yiv4297798800ygrp-msg p#yiv4297798800attach-count span {color:#1E66AE;font-weight:700;}#yiv4297798800 #yiv4297798800ygrp-reco #yiv4297798800reco-head {color:#ff7900;font-weight:700;}#yiv4297798800 #yiv4297798800ygrp-reco {margin-bottom:20px;padding:0px;}#yiv4297798800 #yiv4297798800ygrp-sponsor #yiv4297798800ov li a {font-size:130%;text-decoration:none;}#yiv4297798800 #yiv4297798800ygrp-sponsor #yiv4297798800ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv4297798800 #yiv4297798800ygrp-sponsor #yiv4297798800ov ul {margin:0;padding:0 0 0 8px;}#yiv4297798800 #yiv4297798800ygrp-text {font-family:Georgia;}#yiv4297798800 #yiv4297798800ygrp-text p {margin:0 0 1em 0;}#yiv4297798800 #yiv4297798800ygrp-text tt {font-size:120%;}#yiv4297798800 #yiv4297798800ygrp-vital ul li:last-child {border-right:none !important;}#yiv4297798800

Thu Feb 19, 2015 10:33 am (PST) . Posted by:

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

Contoh formula yang dipersingkat : (formula untuk 6 kolom mengambil data di
kolom C saja)
=INDEX($C:$C,(ROW($A1)-1)*6+COLUMN(A$1))
copy ke kanan dan ke bawah

*** jika regional setting komputer setempat adalah Indonesian, ganti
karakter koma menjadi titik koma
*** tanpa kolom bantu dan tidak boleh insert row atau kolom di area sumber
data (sumber data dan output di sheet yang berbeda bukan ?)

Wassalam,
Kid.

On Fri, Feb 20, 2015 at 3:24 AM, hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

>
>
> Hai Misi,
> Untuk mempersingkat formula diperlukan kolom bantu yang menggabungkan No
> Urut (diisi penuh) dengan Judul (Nama,TTL,NIK,Alamat,Status,Pekerjaan).
> Kemudian gunakan gabungan Fungsi Index dan Match.
> Hasilnya seperti file terlampir.
>
> Salam,
> HK
>
>
> ------------------------------
> *From:* "mbah_t@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com
> >
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Wednesday, 18 February 2015, 23:51
> *Subject:* [belajar-excel] Cara Copy Paste Tranpose (tapi bukan tranpose)
> [1 Attachment]
>
>
> Misi.. Ingin bertanya lagi..
> Ini sya pengen copas tranpose data biodata yang bentuknya 2 kolom menjadi
> beberapa kolom sesuai dengan isiannya..
> Contoh terlampir
>
> Klo macam kasus ini namanya apa ya? pahamnya cuman tranpose :)
>
> terima kasih sbelumnya :)
>
>
>
>

Thu Feb 19, 2015 8:54 pm (PST) . Posted by:

mbah_t

Matur suwun sanget kagem solusinya..

Tapi ada masalah ternyata.. di data2 bawah tidak semua samap persis isiannya..
ada baris NIK atau Status atau ada juga yang lain yang tidak ada..
Jika di aplikasikan rumus tsb jadinya bagian yang tidak ada tidak terhitung..
Pengennya untuk baris yang tidak ada nantinya di kolomnya akan kosong...
Tolong masukkannya..
Terimakasih

Wassalam ^__^

Thu Feb 19, 2015 11:18 pm (PST) . Posted by:

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

hmmm....
kalau begitu, bisa pakai kolom bantu tuh...
postingan Pak HK sebelum ini sudah ada kan yang pakai kolom bantu.

File terlampir sekedar variasi tentang si kolom bantu. Sebenarnya bisa juga
tanpa kolom bantu sih, cuma agak bingung njelasinnya karena ada syaratnya.
Sila lihat file terlampir saja ya.

Wassalam,
Kid.

2015-02-20 15:19 GMT+11:00 mbah_t@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Matur suwun sanget kagem solusinya..
>
> Tapi ada masalah ternyata.. di data2 bawah tidak semua samap persis
> isiannya..
> ada baris NIK atau Status atau ada juga yang lain yang tidak ada..
> Jika di aplikasikan rumus tsb jadinya bagian yang tidak ada tidak
> terhitung..
> Pengennya untuk baris yang tidak ada nantinya di kolomnya akan kosong...
> Tolong masukkannya..
> Terimakasih
>
> Wassalam ^__^
>
>

Fri Feb 20, 2015 12:20 am (PST) . Posted by:

"hendrik karnadi" hendrikkarnadi

Kalau pake formula "ribet", mungkin pake macro lebih "pas" pelaksanaannya namun lebih ribet bikin prgnya.File terlampir.
Salam,HK

From: "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: BeExcel <belajar-excel@yahoogroups.com>
Sent: Friday, 20 February 2015, 14:17
Subject: Re: [belajar-excel] Re: Cara Copy Paste Tranpose (tapi bukan tranpose)

  hmmm....
kalau begitu, bisa pakai kolom bantu tuh...
postingan Pak HK sebelum ini sudah ada kan yang pakai kolom bantu.

File terlampir sekedar variasi tentang si kolom bantu. Sebenarnya bisa juga tanpa kolom bantu sih, cuma agak bingung njelasinnya karena ada syaratnya. Sila lihat file terlampir saja ya.

Wassalam,
Kid.

2015-02-20 15:19 GMT+11:00 mbah_t@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:

  Matur suwun sanget kagem solusinya..

Tapi ada masalah ternyata.. di data2 bawah tidak semua samap persis isiannya..
ada baris NIK atau Status atau ada juga yang lain yang tidak ada..
Jika di aplikasikan rumus tsb jadinya bagian yang tidak ada tidak terhitung..
Pengennya untuk baris yang tidak ada nantinya di kolomnya akan kosong...
Tolong masukkannya..
Terimakasih

Wassalam ^__^

#yiv2902824353 #yiv2902824353 -- #yiv2902824353ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv2902824353 #yiv2902824353ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv2902824353 #yiv2902824353ygrp-mkp #yiv2902824353hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv2902824353 #yiv2902824353ygrp-mkp #yiv2902824353ads {margin-bottom:10px;}#yiv2902824353 #yiv2902824353ygrp-mkp .yiv2902824353ad {padding:0 0;}#yiv2902824353 #yiv2902824353ygrp-mkp .yiv2902824353ad p {margin:0;}#yiv2902824353 #yiv2902824353ygrp-mkp .yiv2902824353ad a {color:#0000ff;text-decoration:none;}#yiv2902824353 #yiv2902824353ygrp-sponsor #yiv2902824353ygrp-lc {font-family:Arial;}#yiv2902824353 #yiv2902824353ygrp-sponsor #yiv2902824353ygrp-lc #yiv2902824353hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv2902824353 #yiv2902824353ygrp-sponsor #yiv2902824353ygrp-lc .yiv2902824353ad {margin-bottom:10px;padding:0 0;}#yiv2902824353 #yiv2902824353actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv2902824353 #yiv2902824353activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv2902824353 #yiv2902824353activity span {font-weight:700;}#yiv2902824353 #yiv2902824353activity span:first-child {text-transform:uppercase;}#yiv2902824353 #yiv2902824353activity span a {color:#5085b6;text-decoration:none;}#yiv2902824353 #yiv2902824353activity span span {color:#ff7900;}#yiv2902824353 #yiv2902824353activity span .yiv2902824353underline {text-decoration:underline;}#yiv2902824353 .yiv2902824353attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv2902824353 .yiv2902824353attach div a {text-decoration:none;}#yiv2902824353 .yiv2902824353attach img {border:none;padding-right:5px;}#yiv2902824353 .yiv2902824353attach label {display:block;margin-bottom:5px;}#yiv2902824353 .yiv2902824353attach label a {text-decoration:none;}#yiv2902824353 blockquote {margin:0 0 0 4px;}#yiv2902824353 .yiv2902824353bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv2902824353 .yiv2902824353bold a {text-decoration:none;}#yiv2902824353 dd.yiv2902824353last p a {font-family:Verdana;font-weight:700;}#yiv2902824353 dd.yiv2902824353last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv2902824353 dd.yiv2902824353last p span.yiv2902824353yshortcuts {margin-right:0;}#yiv2902824353 div.yiv2902824353attach-table div div a {text-decoration:none;}#yiv2902824353 div.yiv2902824353attach-table {width:400px;}#yiv2902824353 div.yiv2902824353file-title a, #yiv2902824353 div.yiv2902824353file-title a:active, #yiv2902824353 div.yiv2902824353file-title a:hover, #yiv2902824353 div.yiv2902824353file-title a:visited {text-decoration:none;}#yiv2902824353 div.yiv2902824353photo-title a, #yiv2902824353 div.yiv2902824353photo-title a:active, #yiv2902824353 div.yiv2902824353photo-title a:hover, #yiv2902824353 div.yiv2902824353photo-title a:visited {text-decoration:none;}#yiv2902824353 div#yiv2902824353ygrp-mlmsg #yiv2902824353ygrp-msg p a span.yiv2902824353yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv2902824353 .yiv2902824353green {color:#628c2a;}#yiv2902824353 .yiv2902824353MsoNormal {margin:0 0 0 0;}#yiv2902824353 o {font-size:0;}#yiv2902824353 #yiv2902824353photos div {float:left;width:72px;}#yiv2902824353 #yiv2902824353photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv2902824353 #yiv2902824353photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv2902824353 #yiv2902824353reco-category {font-size:77%;}#yiv2902824353 #yiv2902824353reco-desc {font-size:77%;}#yiv2902824353 .yiv2902824353replbq {margin:4px;}#yiv2902824353 #yiv2902824353ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv2902824353 #yiv2902824353ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv2902824353 #yiv2902824353ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv2902824353 #yiv2902824353ygrp-mlmsg select, #yiv2902824353 input, #yiv2902824353 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv2902824353 #yiv2902824353ygrp-mlmsg pre, #yiv2902824353 code {font:115% monospace;}#yiv2902824353 #yiv2902824353ygrp-mlmsg * {line-height:1.22em;}#yiv2902824353 #yiv2902824353ygrp-mlmsg #yiv2902824353logo {padding-bottom:10px;}#yiv2902824353 #yiv2902824353ygrp-msg p a {font-family:Verdana;}#yiv2902824353 #yiv2902824353ygrp-msg p#yiv2902824353attach-count span {color:#1E66AE;font-weight:700;}#yiv2902824353 #yiv2902824353ygrp-reco #yiv2902824353reco-head {color:#ff7900;font-weight:700;}#yiv2902824353 #yiv2902824353ygrp-reco {margin-bottom:20px;padding:0px;}#yiv2902824353 #yiv2902824353ygrp-sponsor #yiv2902824353ov li a {font-size:130%;text-decoration:none;}#yiv2902824353 #yiv2902824353ygrp-sponsor #yiv2902824353ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv2902824353 #yiv2902824353ygrp-sponsor #yiv2902824353ov ul {margin:0;padding:0 0 0 8px;}#yiv2902824353 #yiv2902824353ygrp-text {font-family:Georgia;}#yiv2902824353 #yiv2902824353ygrp-text p {margin:0 0 1em 0;}#yiv2902824353 #yiv2902824353ygrp-text tt {font-size:120%;}#yiv2902824353 #yiv2902824353ygrp-vital ul li:last-child {border-right:none !important;}#yiv2902824353

Thu Feb 19, 2015 3:46 pm (PST) . Posted by:

"Hendrik Karnadi" hendrikkarnadi

Mr Kid,
Kalau sumber  data dan outputnya berbeda, bukankah formulanya harus merujuk ke sheet sumber datanya?

Salam,
HK

Sent from Samsung Mobile

<div>-------- Original message --------</div><div>From: "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> </div><div>Date:20/02/2015 01:32 (GMT+07:00) </div><div>To: BeExcel <belajar-excel@yahoogroups.com> </div><div>Subject: Re: [belajar-excel] Cara Copy Paste Tranpose (tapi bukan tranpose) </div><div>
</div>Contoh formula yang dipersingkat : (formula untuk 6 kolom mengambil data di kolom C saja)
=INDEX($C:$C,(ROW($A1)-1)*6+COLUMN(A$1))
copy ke kanan dan ke bawah

*** jika regional setting komputer setempat adalah Indonesian, ganti karakter koma menjadi titik koma
*** tanpa kolom bantu dan tidak boleh insert row atau kolom di area sumber data (sumber data dan output di sheet yang berbeda bukan ?)

Wassalam,
Kid.

On Fri, Feb 20, 2015 at 3:24 AM, hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

Hai Misi,
Untuk mempersingkat formula diperlukan kolom bantu yang menggabungkan No Urut (diisi penuh) dengan Judul (Nama,TTL,NIK,Alamat,Status,Pekerjaan).
Kemudian gunakan gabungan Fungsi Index dan Match.
Hasilnya seperti file terlampir.

Salam,
HK

From: "mbah_t@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: belajar-excel@yahoogroups.com
Sent: Wednesday, 18 February 2015, 23:51
Subject: [belajar-excel] Cara Copy Paste Tranpose (tapi bukan tranpose) [1 Attachment]

Misi.. Ingin bertanya lagi..
Ini sya pengen copas tranpose data biodata yang bentuknya 2 kolom menjadi beberapa kolom sesuai dengan isiannya..
Contoh terlampir

Klo macam kasus ini namanya apa ya? pahamnya cuman tranpose :)

terima kasih sbelumnya :)

Thu Feb 19, 2015 11:12 pm (PST) . Posted by:

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

hehehe... iya betul Pak. Untuk hal itu, silakan disesuaikan rujukannya.
Jika rujukan dalam formula tersebut ke area data dan data ada di sheet
lain, maka rujukkan ke sheet lain tersebut.

2015-02-20 10:48 GMT+11:00 Hendrik Karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:

>
>
> Mr Kid,
> Kalau sumber data dan outputnya berbeda, bukankah formulanya harus
> merujuk ke sheet sumber datanya?
>
> Salam,
> HK
>
>
> Sent from Samsung Mobile
>
>
> -------- Original message --------
> From: "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]"
> Date:20/02/2015 01:32 (GMT+07:00)
> To: BeExcel
> Subject: Re: [belajar-excel] Cara Copy Paste Tranpose (tapi bukan
> tranpose)
>
>
>
> Contoh formula yang dipersingkat : (formula untuk 6 kolom mengambil data
> di kolom C saja)
> =INDEX($C:$C,(ROW($A1)-1)*6+COLUMN(A$1))
> copy ke kanan dan ke bawah
>
> *** jika regional setting komputer setempat adalah Indonesian, ganti
> karakter koma menjadi titik koma
> *** tanpa kolom bantu dan tidak boleh insert row atau kolom di area sumber
> data (sumber data dan output di sheet yang berbeda bukan ?)
>
> Wassalam,
> Kid.
>
>
>
> On Fri, Feb 20, 2015 at 3:24 AM, hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>>
>>
>> Hai Misi,
>> Untuk mempersingkat formula diperlukan kolom bantu yang menggabungkan No
>> Urut (diisi penuh) dengan Judul (Nama,TTL,NIK,Alamat,Status,Pekerjaan).
>> Kemudian gunakan gabungan Fungsi Index dan Match.
>> Hasilnya seperti file terlampir.
>>
>> Salam,
>> HK
>>
>>
>> ------------------------------
>> *From:* "mbah_t@yahoo.com [belajar-excel]" <
>> belajar-excel@yahoogroups.com>
>> *To:* belajar-excel@yahoogroups.com
>> *Sent:* Wednesday, 18 February 2015, 23:51
>> *Subject:* [belajar-excel] Cara Copy Paste Tranpose (tapi bukan
>> tranpose) [1 Attachment]
>>
>>
>> Misi.. Ingin bertanya lagi..
>> Ini sya pengen copas tranpose data biodata yang bentuknya 2 kolom
>> menjadi beberapa kolom sesuai dengan isiannya..
>> Contoh terlampir
>>
>> Klo macam kasus ini namanya apa ya? pahamnya cuman tranpose :)
>>
>> terima kasih sbelumnya :)
>>
>>
>>
>
>

Thu Feb 19, 2015 5:38 pm (PST) . Posted by:

"Nang Agus"

Asalamualaikum warahmatullah,

Mas Kid,
Terima kasih atas cekrip yang diberikan.
sudah saya coba di Excel 2003, 2007, dan 2010 hasilnya berbeda semuanya.
sayang saya tidak punya Excel 2013. (karena kompie saya tidak dapat
diinstall Office 2013, maklumlah orang jadul masih suka menggunakan OS
Miccrosoft XP yang sudah kedaluwarsa)
terima kasih, syukron.

wasalamualaikum warahmatullah

nangAgus

2015-02-16 16:50 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Wa'alaikumussalam wr wb
>
> coba buat sebuah prosedur di sebuah general module dan copy script berikut
> :
> dim lRow as long, lBar as long, lCtl as long
> dim sBarName as string, sBarLocal as string
>
> lrow=1
> sheets(1).cells.clear
> sheets(1).cells(1,1).resize(1,3).value=array("cBar","ctlID","ctlCaption")
> for lbar=1 to commandbars.count
> with commandbars(lbar)
> sbarname=.name
> if len(sbarname)>2 then
> if .controls.count<>0 then
> for lctl=1 to .controls.count
> lrow=lrow+1
> sheets(1).cells(lrow,1).value=sbarname
> sheets(1).cells(lrow,2).value=.controls(lctl).id
>
> sheets(1).cells(lrow,3).value=.controls(lctl).caption
> next lctl
> endif
> endif
> end with
> next lbar
> msgbox "Done.",vbinformation,"CommandBars beserta Controls-nya"
>
> Yang sering diatur-atur oleh kebanyakan pengguna Excel VBA adalah
> commandbar bernama Worksheet, Cell, Ply, Column, Row
> Commandbar lainnya juga bisa dimanfaatkan walau hanya oleh sedikit
> pengguna Excel VBA
>
> ;)
> kalau ada error, dibenerkan sendiri ya, soale objectnya sekedar hasil
> inget-inget. bisa jadi penulisannya ndak tepat. Tapi targetnya memang
> commandbars dan controls. Propertinya yang bisa jadi ndak bener. Kalau ndak
> ada Caption, coba ganti dengan Name atau text. Moga-moga beneran masih
> Caption.
>
> kemudian, bandingkan hasil running script di atas ketika di-run di xl2003,
> xl2007, xl2010, dan xl2013
> sapa tahu ada bedanya
>
> Wassalam,
> Kid.
>
>
>
>
>
> 2015-02-16 16:00 GMT+11:00 Nang Agus nangagus@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Asalamualaikum warahmatullah.
>>
>> Makasih mas Kid,
>> banyak penjelasan yang belum saya mengerti menjadi jelas sekarang.
>> contohnya perintah untuk mengaktifkan tombol delete
>> (Application.CommandBars.FindControl(ID:=847).Enabled = True)
>> namun dimana saya dapat menemukan penjelasan untuk ID yang lain?
>>
>> Terima kasih mas Kid
>> Wasalamualaikumwarahmatullah
>>
>> KenangAgus
>>
>> On 2/16/15, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]
>>
>> <belajar-excel@yahoogroups.com> wrote:
>> > hehehe...
>> > akhirnya banyak yang hinggap juga di trit ini.
>> >
>> > file terlampir tidak berisi penjelasan apapun, sekedar urek-urek yang
>> sapa
>> > tahu bermangpangat.
>> > akan lebih baik jika file dibuka dalam keadaan macro securoty di-set
>> > disable.
>> >
>> > Regards,
>> > Kid.
>> >
>> >
>> >
>> >
>> >
>> > 2015-02-16 11:13 GMT+11:00 Jack Carmelo jackcarmelo@yahoo.co.id
>> > [belajar-excel] <belajar-excel@yahoogroups.com>:
>> >
>> >>
>> >>
>> >> Ok mas Nang Agus, makasih banyak. Yang sudah tau arah jalannya dan
>> >> sekarang saya tinggal pelajari code2nya.
>> >> Makasih lagi atas bantuannya. Jangan bosan2 bantu saya yang lagi
>> belajar
>> >> ya..
>> >> Hehehe
>> >>
>> >> --
>> >> Salam Sehat Selalu Dari Papua Timika
>> >> Jack
>> >>
>> >> Senin, 16 Februari 2015, 08:57AM +0900 dari "Nang Agus
>> nangagus@gmail.com
>> >> [belajar-excel]" <belajar-excel@yahoogroups.com>:
>> >>
>> >> Hallo Jack.
>> >> Tombol tersebut dibuat menggunakan ActiveX Control, agar dapat mengedit
>> >> gunakan cara:
>> >> Klik Ribbon Developer. (biasanya tidak tampak, untuk menampakkannya
>> klik
>> >> excel option show developper ribbon, (Excel 2007)) Pada Tab Control,
>> klik
>> >> design Mode. Jreng-jreng....... tombol Ad user dapat di klik Kanan.
>> >> salam
>> >> 2015-02-16 6:01 GMT+07:00 Jack Carmelo jackcarmelo@yahoo.co.id
>> >> [belajar-excel] < belajar-excel@yahoogroups.com > :
>> >> >
>> >> >Mas Nang Agus, makasih atas penjelasannya yang sangat bermanfaat. Tapi
>> >> masih ada problem ne.
>> >> >Code mana yang membuat button tambahwong itu tidak bisa di edit ya.
>> >> > Hanya
>> >> bisa di click. Gmna caranya membuat supaya tombol itu bisa di edit.
>> >> >Maaf saya cari tapi belum dapat jawaban yang bagian itu.
>> >> >Makasih...
>> >> >--
>> >> >Salam Sehat Selalu Dari Papua Timika
>> >> >Jack
>> >> >Sabtu, 14 Februari 2015, 02:09PM +0900 dari "Nang Agus
>> >> nangagus@gmail.com [belajar-excel]" < belajar-excel@yahoogroups.com >:
>> >> >Maaf file tenpa encript terlupa
>> >> >2015-02-14 12:08 GMT+07:00 Nang Agus < nangagus@gmail.com > :
>> >> >>Dear Jack,
>> >> >>
>> >> >>Salam Sejahtera
>> >> >>Saya juga sedang mulai belajar nih,
>> >> >>1. Tombol Add hanya untuk si admin, kalau semua orang bisa nambah
>> user
>> >> bisa jadi kacau deh programnya.
>> >> >> perintah untuk memunculkan dan tidak memunculkan Add User
>> ditititpkan
>> >> di Prosedur Worksheet_Active. Maksudnya macro akan jalan jika worksheet
>> >> diaktifkan (dalam contoh adalah worksheet2). Klik sheet2, View Code.
>> >> Cekrip
>> >> selengkapnya:
>> >> >>
>> >> >>Private Sub Worksheet_Activate()
>> >> >>If Sheets("Jeneng").Range("h2").Value = " admin " Then
>> >> >> TambahWong.Visible = True
>> >> >>Else
>> >> >> TambahWong.Visible = False
>> >> >>End If
>> >> >> Application.DisplayFullScreen = True
>> >> >>
>> >> >>End Sub
>> >> >>
>> >> >>Tombol Add diberi nama tambahWong. Sudah kelihatan khan apabila
>> usernya
>> >> admin maka tambahWong diperlihatkan.
>> >> >>
>> >> >>2. Tempat menyimpan cekrip AddUser di form frmNewUser, Klik Form,
>> >> frmNewUser, View Code. nama cekripnya cmdSave_Click() maksudnya jika
>> >> tombol
>> >> save pada form NewUser.
>> >> >>Jadi tombol AddUser hanya digunakan untuk menampilkan form
>> frmNewUser.
>> >> sedangkan nama pengguna baru disimpan setelah tombol Save pada form di
>> >> klik.
>> >> >>
>> >> >>3. Deliknasheet, adalah cekrip untuk menyembunyikan sheet (bahasa
>> >> jawanya sembunyikan = delikna); delikna sheet pemicunya adalah
>> >> Workbook_Open, tempatnya di This Workbook, view Code.
>> >> >>Jika workbook dibuka maka cekrip delikna sheet dijalankan. sedangkan
>> >> letaknya cekrip deliknasheet ada pada Modules LOgin. klik Modeles,
>> LOgin,
>> >> view Code. cekrip selengkapnya:
>> >> >>
>> >> >>Sub DeliknaSheets()
>> >> >> Dim W As Worksheet
>> >> >> Sheets("Sheet1").Visible = -1 ' (sheet 1 tampak)
>> >> >> Sheets("Jeneng").[f2:h2] = "" '(menghapus user dan password yang
>> >> disimpan di F2:H2)
>> >> >> For Each W In Worksheets
>> >> >> If W.Name <> "Sheet1" Then W.Visible = 2 ' (selain sheet1
>> >> sembunyikan)
>> >> >> Next W
>> >> >>End Sub
>> >> >>
>> >> >>Semoga penjelasan ini tidak membingungkan, mungkin akan ada member
>> lain
>> >> yang penjelasannya lebih OK
>> >> >>Salam
>> >> >>
>> >> >>Nang Agus
>> >> >>
>> >> >>----------------------------------------------------------
>> >> >>Reply via web post • Reply to sender • Reply to group • Start a New
>> >> Topic • Messages in this topic (1)
>> >> >>============================================================
>> >> >>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
>> >> >>* New Members 12
>> >> >>• Privacy • Unsubscribe • Terms of Use
>> >> >>>.
>> >> >>
>> >>
>> >>
>> >>
>> >
>>
>>
>
>

Thu Feb 19, 2015 9:01 pm (PST) . Posted by:

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

Wa'alaikumussalam wr wb

Jadi antar versi Excel bisa berbeda id control nya walau merujuk ke proses
yang sama ya ?
hehehe...

Wassalamu'alaikum wr wb
Kid.

2015-02-20 12:38 GMT+11:00 Nang Agus nangagus@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Asalamualaikum warahmatullah,
>
> Mas Kid,
> Terima kasih atas cekrip yang diberikan.
> sudah saya coba di Excel 2003, 2007, dan 2010 hasilnya berbeda semuanya.
> sayang saya tidak punya Excel 2013. (karena kompie saya tidak dapat
> diinstall Office 2013, maklumlah orang jadul masih suka menggunakan OS
> Miccrosoft XP yang sudah kedaluwarsa)
> terima kasih, syukron.
>
> wasalamualaikum warahmatullah
>
> nangAgus
>
> 2015-02-16 16:50 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Wa'alaikumussalam wr wb
>>
>> coba buat sebuah prosedur di sebuah general module dan copy script
>> berikut :
>> dim lRow as long, lBar as long, lCtl as long
>> dim sBarName as string, sBarLocal as string
>>
>> lrow=1
>> sheets(1).cells.clear
>> sheets(1).cells(1,1).resize(1,3).value=array("cBar","ctlID","ctlCaption")
>> for lbar=1 to commandbars.count
>> with commandbars(lbar)
>> sbarname=.name
>> if len(sbarname)>2 then
>> if .controls.count<>0 then
>> for lctl=1 to .controls.count
>> lrow=lrow+1
>> sheets(1).cells(lrow,1).value=sbarname
>> sheets(1).cells(lrow,2).value=.controls(lctl).id
>>
>> sheets(1).cells(lrow,3).value=.controls(lctl).caption
>> next lctl
>> endif
>> endif
>> end with
>> next lbar
>> msgbox "Done.",vbinformation,"CommandBars beserta Controls-nya"
>>
>> Yang sering diatur-atur oleh kebanyakan pengguna Excel VBA adalah
>> commandbar bernama Worksheet, Cell, Ply, Column, Row
>> Commandbar lainnya juga bisa dimanfaatkan walau hanya oleh sedikit
>> pengguna Excel VBA
>>
>> ;)
>> kalau ada error, dibenerkan sendiri ya, soale objectnya sekedar hasil
>> inget-inget. bisa jadi penulisannya ndak tepat. Tapi targetnya memang
>> commandbars dan controls. Propertinya yang bisa jadi ndak bener. Kalau ndak
>> ada Caption, coba ganti dengan Name atau text. Moga-moga beneran masih
>> Caption.
>>
>> kemudian, bandingkan hasil running script di atas ketika di-run di
>> xl2003, xl2007, xl2010, dan xl2013
>> sapa tahu ada bedanya
>>
>> Wassalam,
>> Kid.
>>
>>
>>
>>
>>
>> 2015-02-16 16:00 GMT+11:00 Nang Agus nangagus@gmail.com [belajar-excel] <
>> belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Asalamualaikum warahmatullah.
>>>
>>> Makasih mas Kid,
>>> banyak penjelasan yang belum saya mengerti menjadi jelas sekarang.
>>> contohnya perintah untuk mengaktifkan tombol delete
>>> (Application.CommandBars.FindControl(ID:=847).Enabled = True)
>>> namun dimana saya dapat menemukan penjelasan untuk ID yang lain?
>>>
>>> Terima kasih mas Kid
>>> Wasalamualaikumwarahmatullah
>>>
>>> KenangAgus
>>>
>>> On 2/16/15, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]
>>>
>>> <belajar-excel@yahoogroups.com> wrote:
>>> > hehehe...
>>> > akhirnya banyak yang hinggap juga di trit ini.
>>> >
>>> > file terlampir tidak berisi penjelasan apapun, sekedar urek-urek yang
>>> sapa
>>> > tahu bermangpangat.
>>> > akan lebih baik jika file dibuka dalam keadaan macro securoty di-set
>>> > disable.
>>> >
>>> > Regards,
>>> > Kid.
>>> >
>>> >
>>> >
>>> >
>>> >
>>> > 2015-02-16 11:13 GMT+11:00 Jack Carmelo jackcarmelo@yahoo.co.id
>>> > [belajar-excel] <belajar-excel@yahoogroups.com>:
>>> >
>>> >>
>>> >>
>>> >> Ok mas Nang Agus, makasih banyak. Yang sudah tau arah jalannya dan
>>> >> sekarang saya tinggal pelajari code2nya.
>>> >> Makasih lagi atas bantuannya. Jangan bosan2 bantu saya yang lagi
>>> belajar
>>> >> ya..
>>> >> Hehehe
>>> >>
>>> >> --
>>> >> Salam Sehat Selalu Dari Papua Timika
>>> >> Jack
>>> >>
>>> >> Senin, 16 Februari 2015, 08:57AM +0900 dari "Nang Agus
>>> nangagus@gmail.com
>>> >> [belajar-excel]" <belajar-excel@yahoogroups.com>:
>>> >>
>>> >> Hallo Jack.
>>> >> Tombol tersebut dibuat menggunakan ActiveX Control, agar dapat
>>> mengedit
>>> >> gunakan cara:
>>> >> Klik Ribbon Developer. (biasanya tidak tampak, untuk menampakkannya
>>> klik
>>> >> excel option show developper ribbon, (Excel 2007)) Pada Tab Control,
>>> klik
>>> >> design Mode. Jreng-jreng....... tombol Ad user dapat di klik Kanan.
>>> >> salam
>>> >> 2015-02-16 6:01 GMT+07:00 Jack Carmelo jackcarmelo@yahoo.co.id
>>> >> [belajar-excel] < belajar-excel@yahoogroups.com > :
>>> >> >
>>> >> >Mas Nang Agus, makasih atas penjelasannya yang sangat bermanfaat.
>>> Tapi
>>> >> masih ada problem ne.
>>> >> >Code mana yang membuat button tambahwong itu tidak bisa di edit ya.
>>> >> > Hanya
>>> >> bisa di click. Gmna caranya membuat supaya tombol itu bisa di edit.
>>> >> >Maaf saya cari tapi belum dapat jawaban yang bagian itu.
>>> >> >Makasih...
>>> >> >--
>>> >> >Salam Sehat Selalu Dari Papua Timika
>>> >> >Jack
>>> >> >Sabtu, 14 Februari 2015, 02:09PM +0900 dari "Nang Agus
>>> >> nangagus@gmail.com [belajar-excel]" < belajar-excel@yahoogroups.com
>>> >:
>>> >> >Maaf file tenpa encript terlupa
>>> >> >2015-02-14 12:08 GMT+07:00 Nang Agus < nangagus@gmail.com > :
>>> >> >>Dear Jack,
>>> >> >>
>>> >> >>Salam Sejahtera
>>> >> >>Saya juga sedang mulai belajar nih,
>>> >> >>1. Tombol Add hanya untuk si admin, kalau semua orang bisa nambah
>>> user
>>> >> bisa jadi kacau deh programnya.
>>> >> >> perintah untuk memunculkan dan tidak memunculkan Add User
>>> ditititpkan
>>> >> di Prosedur Worksheet_Active. Maksudnya macro akan jalan jika
>>> worksheet
>>> >> diaktifkan (dalam contoh adalah worksheet2). Klik sheet2, View Code.
>>> >> Cekrip
>>> >> selengkapnya:
>>> >> >>
>>> >> >>Private Sub Worksheet_Activate()
>>> >> >>If Sheets("Jeneng").Range("h2").Value = " admin " Then
>>> >> >> TambahWong.Visible = True
>>> >> >>Else
>>> >> >> TambahWong.Visible = False
>>> >> >>End If
>>> >> >> Application.DisplayFullScreen = True
>>> >> >>
>>> >> >>End Sub
>>> >> >>
>>> >> >>Tombol Add diberi nama tambahWong. Sudah kelihatan khan apabila
>>> usernya
>>> >> admin maka tambahWong diperlihatkan.
>>> >> >>
>>> >> >>2. Tempat menyimpan cekrip AddUser di form frmNewUser, Klik Form,
>>> >> frmNewUser, View Code. nama cekripnya cmdSave_Click() maksudnya jika
>>> >> tombol
>>> >> save pada form NewUser.
>>> >> >>Jadi tombol AddUser hanya digunakan untuk menampilkan form
>>> frmNewUser.
>>> >> sedangkan nama pengguna baru disimpan setelah tombol Save pada form di
>>> >> klik.
>>> >> >>
>>> >> >>3. Deliknasheet, adalah cekrip untuk menyembunyikan sheet (bahasa
>>> >> jawanya sembunyikan = delikna); delikna sheet pemicunya adalah
>>> >> Workbook_Open, tempatnya di This Workbook, view Code.
>>> >> >>Jika workbook dibuka maka cekrip delikna sheet dijalankan. sedangkan
>>> >> letaknya cekrip deliknasheet ada pada Modules LOgin. klik Modeles,
>>> LOgin,
>>> >> view Code. cekrip selengkapnya:
>>> >> >>
>>> >> >>Sub DeliknaSheets()
>>> >> >> Dim W As Worksheet
>>> >> >> Sheets("Sheet1").Visible = -1 ' (sheet 1 tampak)
>>> >> >> Sheets("Jeneng").[f2:h2] = "" '(menghapus user dan password yang
>>> >> disimpan di F2:H2)
>>> >> >> For Each W In Worksheets
>>> >> >> If W.Name <> "Sheet1" Then W.Visible = 2 ' (selain sheet1
>>> >> sembunyikan)
>>> >> >> Next W
>>> >> >>End Sub
>>> >> >>
>>> >> >>Semoga penjelasan ini tidak membingungkan, mungkin akan ada member
>>> lain
>>> >> yang penjelasannya lebih OK
>>> >> >>Salam
>>> >> >>
>>> >> >>Nang Agus
>>> >> >>
>>> >> >>----------------------------------------------------------
>>> >> >>Reply via web post • Reply to sender • Reply to group • Start a New
>>> >> Topic • Messages in this topic (1)
>>> >> >>============================================================
>>> >> >>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
>>> >> >>* New Members 12
>>> >> >>• Privacy • Unsubscribe • Terms of Use
>>> >> >>>.
>>> >> >>
>>> >>
>>> >>
>>> >>
>>> >
>>>
>>>
>>
>
>

Thu Feb 19, 2015 11:48 pm (PST) . Posted by:

"Dede"

Dear Be Exceler,

Mohon bantuan dari rekan-rekan sekalian terkait kasus terlampir.

Salam,
DD

________________________________
This e-mail and any files transmitted with it are confidential and intended solely for the use of the individual to whom it is addressed. If you have received this email in error please send it back to the person that sent it to you. Any views or opinions presented are solely those of its author and do not necessarily represent those of NABATI or any of its subsidiary companies. Unauthorized publication, use, dissemination, forwarding, printing or copying of this email and its associated attachments is strictly prohibited.

Fri Feb 20, 2015 12:42 am (PST) . Posted by:

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

Coba formula : (untuk berangkat) -> regional setting komputer english ya
=IF(B3<1,B3,SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(B3,"'",":"),"""",":"),".",":"),",",":")*1)

Wassalam,
Kid.

On Fri, Feb 20, 2015 at 6:48 PM, Dede pmaho_log4@nabatisnack.co.id
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

>
>
> Dear Be Exceler,
>
>
>
> Mohon bantuan dari rekan-rekan sekalian terkait kasus terlampir.
>
>
>
> Salam,
>
> DD
>
> ------------------------------
> This e-mail and any files transmitted with it are confidential and
> intended solely for the use of the individual to whom it is addressed. If
> you have received this email in error please send it back to the person
> that sent it to you. Any views or opinions presented are solely those of
> its author and do not necessarily represent those of NABATI or any of its
> subsidiary companies. Unauthorized publication, use, dissemination,
> forwarding, printing or copying of this email and its associated
> attachments is strictly prohibited.
>
>
>

Fri Feb 20, 2015 1:37 am (PST) . Posted by:

"Dede"

Dear Mr. Kid, dan BeExceler,

Terimakasih atas pencerahannya, namun ada sedikit masalah pada sheet "Rekap" cell C6.

Dan satu lagi mohon bantuannya untuk sheet "Form", bagaimana seting data validationnya.

Salam,

DD

From: 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] [mailto:belajar-excel@yahoogroups.com]
Sent: 20 Februari 2015 15:36
To: BeExcel
Subject: Re: [belajar-excel] Waktu

Coba formula : (untuk berangkat) -> regional setting komputer english ya
=IF(B3<1,B3,SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(B3,"'",":"),"""",":"),".",":"),",",":")*1)

Wassalam,

Kid.

On Fri, Feb 20, 2015 at 6:48 PM, Dede pmaho_log4@nabatisnack.co.id [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

Dear Be Exceler,

Mohon bantuan dari rekan-rekan sekalian terkait kasus terlampir.

Salam,

DD

_____

This e-mail and any files transmitted with it are confidential and intended solely for the use of the individual to whom it is addressed. If you have received this email in error please send it back to the person that sent it to you. Any views or opinions presented are solely those of its author and do not necessarily represent those of NABATI or any of its subsidiary companies. Unauthorized publication, use, dissemination, forwarding, printing or copying of this email and its associated attachments is strictly prohibited.

Fri Feb 20, 2015 1:38 am (PST) . Posted by:

"Dede"

Maaf lampirannya tertinggal..

From: Dede [mailto:pmaho_log4@nabatisnack.co.id]
Sent: 20 Februari 2015 16:38
To: 'belajar-excel@yahoogroups.com'
Subject: RE: [belajar-excel] Waktu

Dear Mr. Kid, dan BeExceler,

Terimakasih atas pencerahannya, namun ada sedikit masalah pada sheet "Rekap" cell C6.

Dan satu lagi mohon bantuannya untuk sheet "Form", bagaimana seting data validationnya.

Salam,

DD

From: 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] [mailto:belajar-excel@yahoogroups.com]
Sent: 20 Februari 2015 15:36
To: BeExcel
Subject: Re: [belajar-excel] Waktu

Coba formula : (untuk berangkat) -> regional setting komputer english ya
=IF(B3<1,B3,SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(B3,"'",":"),"""",":"),".",":"),",",":")*1)

Wassalam,

Kid.

On Fri, Feb 20, 2015 at 6:48 PM, Dede pmaho_log4@nabatisnack.co.id [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

Dear Be Exceler,

Mohon bantuan dari rekan-rekan sekalian terkait kasus terlampir.

Salam,

DD

_____

This e-mail and any files transmitted with it are confidential and intended solely for the use of the individual to whom it is addressed. If you have received this email in error please send it back to the person that sent it to you. Any views or opinions presented are solely those of its author and do not necessarily represent those of NABATI or any of its subsidiary companies. Unauthorized publication, use, dissemination, forwarding, printing or copying of this email and its associated attachments is strictly prohibited.

============================================================
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:

Poskan Komentar