Senin, 04 Desember 2017

[belajar-excel] Digest Number 4368

10 Messages

Digest #4368
1b
Re: Nilai Komulatif dari Array Data (VBA) by "Zainul Ulum" zainul_ulum
2a
Re: Mengambil nilai dari pola tertentu by "Berni Karanza" karanza.berni
2b
2c
Re: Mengambil nilai dari pola tertentu by "Berni Karanza" karanza.berni
3a
Resend - VBA for Pivot by "Stephen Saputro"
3b
Re: Resend - VBA for Pivot by "Mr. Kid" nmkid.family@ymail.com
3c
Re: Resend - VBA for Pivot by "Stephen Saputro"
3d
Re: Resend - VBA for Pivot by "Mr. Kid" nmkid.family@ymail.com
4a

Messages

Sun Dec 3, 2017 8:43 pm (PST) . Posted by:

prasaja_satria

Asslamu'alaimum Wr.Wb Be Exceller

Masih berkaitan dengan Array nih,
saya punya kode vba sebagai berikut:

for i = 1 to Total
Hitung =Abs(.Cells((4 * i), (2 + n))) - Abs(.Cells((4 * i), (3 + n)))
next i

Yg saya ingin tanyakan adalah :

Saya ingin membuat variable nilai komulatif dari hasil diatas
jadi nanti saya ingin menambahkan per tiap hasil variable "Hitung" ditambahkan ke hasil variable "Hitung" berikutnya nilkom1 = ((hitungke1 + Hitungke2),,,nilkkom2 = (hitungke2 + hitungke3),,,, nilkom3 = (hitungke3 + hitungke4),,,,dst).
Tadinya saya buatnya seperti ini :
for i = 1 to Total
NilaiKomulatif = Hitung(i) + Hitung(i+1)
next i
tapi sayang sekali gak bisa. Mungkin teman - teman bisa membantu.

Jaakallah khair sebelumnya
Wasslamu'alaikum wr.wb


Sun Dec 3, 2017 9:59 pm (PST) . Posted by:

"Zainul Ulum" zainul_ulum

Mas Prasaja,
sebenarnya kalo ada contoh sebagian atau dummy spreadsheet lebih bagus.
coba rumah code menjadi:

Hitung=0
for i = 1 to Total
Hitung =Hitung+Abs(.Cells((4 * i), (2 + n))) - Abs(.Cells((4 * i),(3 + n)))
next i

#dikirim_pakai_mail.yahoo.com_tanpa_pulsa#

--------------------------------------------
On Mon, 4/12/17, prasaja_satria@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

Subject: [belajar-excel] Nilai Komulatif dari Array Data (VBA)
To: belajar-excel@yahoogroups.com
Date: Monday, 4 December, 2017, 11:43 AM


 









Asslamu'alaimum Wr.Wb Be Exceller

Masih berkaitan dengan Array
nih,
saya punya kode vba sebagai
berikut:

for i = 1 to
Total
   
Hitung =Abs(.Cells((4 * i), (2 + n))) - Abs(.Cells((4 * i),
(3 + n)))
next i

Yg saya ingin tanyakan adalah :

   Saya ingin membuat
variable nilai komulatif dari hasil diatas
    
jadi nanti saya ingin menambahkan per tiap hasil
variable "Hitung" ditambahkan ke hasil variable
"Hitung"     
berikutnya nilkom1 = ((hitungke1 +
Hitungke2),,,nilkkom2 = (hitungke2 + hitungke3),,,, nilkom3
= (hitungke3 + hitungke4),,,,dst).
    
Tadinya saya buatnya seperti ini :
          for i = 1 to Total
          
  NilaiKomulatif = Hitung(i) + Hitung(i+1)
                next i
     tapi sayang sekali gak bisa. Mungkin
teman - teman bisa membantu.

Jaakallah khair sebelumnya
Wasslamu'alaikum wr.wb

   











#yiv5541997250 #yiv5541997250 --
#yiv5541997250ygrp-mkp {
border:1px solid #d8d8d8;font-family:Arial;margin:10px
0;padding:0 10px;}

#yiv5541997250 #yiv5541997250ygrp-mkp hr {
border:1px solid #d8d8d8;}

#yiv5541997250 #yiv5541997250ygrp-mkp #yiv5541997250hd {
color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}

#yiv5541997250 #yiv5541997250ygrp-mkp #yiv5541997250ads {
margin-bottom:10px;}

#yiv5541997250 #yiv5541997250ygrp-mkp .yiv5541997250ad {
padding:0 0;}

#yiv5541997250 #yiv5541997250ygrp-mkp .yiv5541997250ad p {
margin:0;}

#yiv5541997250 #yiv5541997250ygrp-mkp .yiv5541997250ad a {
color:#0000ff;text-decoration:none;}
#yiv5541997250 #yiv5541997250ygrp-sponsor
#yiv5541997250ygrp-lc {
font-family:Arial;}

#yiv5541997250 #yiv5541997250ygrp-sponsor
#yiv5541997250ygrp-lc #yiv5541997250hd {
margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}

#yiv5541997250 #yiv5541997250ygrp-sponsor
#yiv5541997250ygrp-lc .yiv5541997250ad {
margin-bottom:10px;padding:0 0;}

#yiv5541997250 #yiv5541997250actions {
font-family:Verdana;font-size:11px;padding:10px 0;}

#yiv5541997250 #yiv5541997250activity {
background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}

#yiv5541997250 #yiv5541997250activity span {
font-weight:700;}

#yiv5541997250 #yiv5541997250activity span:first-child {
text-transform:uppercase;}

#yiv5541997250 #yiv5541997250activity span a {
color:#5085b6;text-decoration:none;}

#yiv5541997250 #yiv5541997250activity span span {
color:#ff7900;}

#yiv5541997250 #yiv5541997250activity span
.yiv5541997250underline {
text-decoration:underline;}

#yiv5541997250 .yiv5541997250attach {
clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}

#yiv5541997250 .yiv5541997250attach div a {
text-decoration:none;}

#yiv5541997250 .yiv5541997250attach img {
border:none;padding-right:5px;}

#yiv5541997250 .yiv5541997250attach label {
display:block;margin-bottom:5px;}

#yiv5541997250 .yiv5541997250attach label a {
text-decoration:none;}

#yiv5541997250 blockquote {
margin:0 0 0 4px;}

#yiv5541997250 .yiv5541997250bold {
font-family:Arial;font-size:13px;font-weight:700;}

#yiv5541997250 .yiv5541997250bold a {
text-decoration:none;}

#yiv5541997250 dd.yiv5541997250last p a {
font-family:Verdana;font-weight:700;}

#yiv5541997250 dd.yiv5541997250last p span {
margin-right:10px;font-family:Verdana;font-weight:700;}

#yiv5541997250 dd.yiv5541997250last p
span.yiv5541997250yshortcuts {
margin-right:0;}

#yiv5541997250 div.yiv5541997250attach-table div div a {
text-decoration:none;}

#yiv5541997250 div.yiv5541997250attach-table {
width:400px;}

#yiv5541997250 div.yiv5541997250file-title a, #yiv5541997250
div.yiv5541997250file-title a:active, #yiv5541997250
div.yiv5541997250file-title a:hover, #yiv5541997250
div.yiv5541997250file-title a:visited {
text-decoration:none;}

#yiv5541997250 div.yiv5541997250photo-title a,
#yiv5541997250 div.yiv5541997250photo-title a:active,
#yiv5541997250 div.yiv5541997250photo-title a:hover,
#yiv5541997250 div.yiv5541997250photo-title a:visited {
text-decoration:none;}

#yiv5541997250 div#yiv5541997250ygrp-mlmsg
#yiv5541997250ygrp-msg p a span.yiv5541997250yshortcuts {
font-family:Verdana;font-size:10px;font-weight:normal;}

#yiv5541997250 .yiv5541997250green {
color:#628c2a;}

#yiv5541997250 .yiv5541997250MsoNormal {
margin:0 0 0 0;}

#yiv5541997250 o {
font-size:0;}

#yiv5541997250 #yiv5541997250photos div {
float:left;width:72px;}

#yiv5541997250 #yiv5541997250photos div div {
border:1px solid
#666666;min-height:62px;overflow:hidden;width:62px;}

#yiv5541997250 #yiv5541997250photos div label {
color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}

#yiv5541997250 #yiv5541997250reco-category {
font-size:77%;}

#yiv5541997250 #yiv5541997250reco-desc {
font-size:77%;}

#yiv5541997250 .yiv5541997250replbq {
margin:4px;}

#yiv5541997250 #yiv5541997250ygrp-actbar div a:first-child {
margin-right:2px;padding-right:5px;}

#yiv5541997250 #yiv5541997250ygrp-mlmsg {
font-size:13px;font-family:Arial, helvetica, clean,
sans-serif;}

#yiv5541997250 #yiv5541997250ygrp-mlmsg table {
font-size:inherit;font:100%;}

#yiv5541997250 #yiv5541997250ygrp-mlmsg select,
#yiv5541997250 input, #yiv5541997250 textarea {
font:99% Arial, Helvetica, clean, sans-serif;}

#yiv5541997250 #yiv5541997250ygrp-mlmsg pre, #yiv5541997250
code {
font:115% monospace;}

#yiv5541997250 #yiv5541997250ygrp-mlmsg * {
line-height:1.22em;}

#yiv5541997250 #yiv5541997250ygrp-mlmsg #yiv5541997250logo {
padding-bottom:10px;}


#yiv5541997250 #yiv5541997250ygrp-msg p a {
font-family:Verdana;}

#yiv5541997250 #yiv5541997250ygrp-msg
p#yiv5541997250attach-count span {
color:#1E66AE;font-weight:700;}

#yiv5541997250 #yiv5541997250ygrp-reco
#yiv5541997250reco-head {
color:#ff7900;font-weight:700;}

#yiv5541997250 #yiv5541997250ygrp-reco {
margin-bottom:20px;padding:0px;}

#yiv5541997250 #yiv5541997250ygrp-sponsor #yiv5541997250ov
li a {
font-size:130%;text-decoration:none;}

#yiv5541997250 #yiv5541997250ygrp-sponsor #yiv5541997250ov
li {
font-size:77%;list-style-type:square;padding:6px 0;}

#yiv5541997250 #yiv5541997250ygrp-sponsor #yiv5541997250ov
ul {
margin:0;padding:0 0 0 8px;}

#yiv5541997250 #yiv5541997250ygrp-text {
font-family:Georgia;}

#yiv5541997250 #yiv5541997250ygrp-text p {
margin:0 0 1em 0;}

#yiv5541997250 #yiv5541997250ygrp-text tt {
font-size:120%;}

#yiv5541997250 #yiv5541997250ygrp-vital ul li:last-child {
border-right:none !important;
}
#yiv5541997250


Sun Dec 3, 2017 11:41 pm (PST) . Posted by:

"Berni Karanza" karanza.berni

Dear Mr. Kid,

Siap, terima kasih referensinya udah nambah ngerti (sedikit) :D. Izin
bertanya lagi, bagaimana jika kondisi tabel di atas sbb
(revisi dari tabel sebelumya, karena ketemu kondisi tersebut):

​di mana cell yang berwarna merah seharusnya tidak perlu diambil nilainya,
karena tidak berada di belakang teks berisi teks "CT",
contohnya untuk row A, seharusnya cukup sampai dengan kolom array ke 4
(angka 8), berikut juga saya lampirkan contoh file
untuk simulasinya, terima kalsih.

Salam,

Berni K

2017-12-03 11:46 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Hai Berni,
>
> Sila dipelajari, dipahami, dan dikembangkan.
> Disini
> <http://excel-mr-kid.blogspot.co.id/2011/03/array-formula-kenalan-yuuuk.html>
> ada sedikit coretan tentang array formula, moga-moga cukup memadai untuk
> menjadi awalan dalam memahami array formula.
>
> Regards,
> Kid
>
>
>
> 2017-12-03 11:42 GMT+07:00 Berni Karanza karanza.berni@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>>
>>
>> Hai Mr.Kid
>>
>> Terima kasih lagi atas bantuannya, bisa saya contoh formulanya untuk
>> diaplikasikan ke data yg sebenarnya. Walaupun secara logic terus terang
>> masih gagal paham :D, kayaknya mesti banyak belajar lagi mengenai konsep
>> array, bisa dibantu kalo ada referensi yg bagus?, terima kasih.
>>
>> Salam,
>> Berni K
>>
>>
>> Pada tanggal 2 Des 2017 6.31 PM, "'Mr. Kid' mr.nmkid@gmail.com
>> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>>
>>>
>>>
>>> Hai Berni,
>>>
>>> File terlampir menggunakan array block 1 baris x 7 kolom untuk
>>> menghindari kalkulasi berulang agar Excel tidak dituduh lambat dalam
>>> bekerja pada data yang banyak
>>>
>>> Regards,
>>> Kid
>>>
>>>
>>> 2017-12-02 13:43 GMT+07:00 Berni Karanza karanza.berni@gmail.com
>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>
>>>>
>>>>
>>>> Dear rekan-rekan milis,
>>>>
>>>> Mohon bantuannya terhadap contoh kasus berikut, yang merupakan bentuk
>>>> simulasi dari trend pola kerja karyawan:
>>>>
>>>>
>>>> ​Maksud dari gambar tersebut di atas, adalah bagaimana cara mengambil
>>>> nilai yang ada di dalam cell secara spesifik pada tabel di bagian atas,
>>>> yaitu dengan mengambil angka terbesar sebelum cell yang berisi teks "CT" ,
>>>> hasilnya dipindahkan ke tabel bagian bawah. Penyelesaiannya bisa
>>>> menggunakan formula atau macro, dan berikut juga saya kirimkan lampiran
>>>> file yang dimaksud.
>>>>
>>>> Demikian ditunggu tanggapannya, dan terima kasih banyak atas bantuannya.
>>>>
>>>> Salam,
>>>>
>>>> Berni K
>>>>
>>>>
>>>>
>>>
>
>

Sun Dec 3, 2017 11:46 pm (PST) . Posted by:

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

Hai Berni,

Sesuaikan saja kriteria-kriteria yang ada dalam formula dengan kriteria
Anda...

Regards,
Kid

2017-12-04 14:34 GMT+07:00 Berni Karanza karanza.berni@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com>:

>
>
> Dear Mr. Kid,
>
> Siap, terima kasih referensinya udah nambah ngerti (sedikit) :D. Izin
> bertanya lagi, bagaimana jika kondisi tabel di atas sbb
> (revisi dari tabel sebelumya, karena ketemu kondisi tersebut):
>
>
> ​di mana cell yang berwarna merah seharusnya tidak perlu diambil nilainya,
> karena tidak berada di belakang teks berisi teks "CT",
> contohnya untuk row A, seharusnya cukup sampai dengan kolom array ke 4
> (angka 8), berikut juga saya lampirkan contoh file
> untuk simulasinya, terima kalsih.
>
>
>
> Salam,
>
> Berni K
>
> 2017-12-03 11:46 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Hai Berni,
>>
>> Sila dipelajari, dipahami, dan dikembangkan.
>> Disini
>> <http://excel-mr-kid.blogspot.co.id/2011/03/array-formula-kenalan-yuuuk.html>
>> ada sedikit coretan tentang array formula, moga-moga cukup memadai untuk
>> menjadi awalan dalam memahami array formula.
>>
>> Regards,
>> Kid
>>
>>
>>
>> 2017-12-03 11:42 GMT+07:00 Berni Karanza karanza.berni@gmail.com
>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Hai Mr.Kid
>>>
>>> Terima kasih lagi atas bantuannya, bisa saya contoh formulanya untuk
>>> diaplikasikan ke data yg sebenarnya. Walaupun secara logic terus terang
>>> masih gagal paham :D, kayaknya mesti banyak belajar lagi mengenai konsep
>>> array, bisa dibantu kalo ada referensi yg bagus?, terima kasih.
>>>
>>> Salam,
>>> Berni K
>>>
>>>
>>> Pada tanggal 2 Des 2017 6.31 PM, "'Mr. Kid' mr.nmkid@gmail.com
>>> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>>>
>>>>
>>>>
>>>> Hai Berni,
>>>>
>>>> File terlampir menggunakan array block 1 baris x 7 kolom untuk
>>>> menghindari kalkulasi berulang agar Excel tidak dituduh lambat dalam
>>>> bekerja pada data yang banyak
>>>>
>>>> Regards,
>>>> Kid
>>>>
>>>>
>>>> 2017-12-02 13:43 GMT+07:00 Berni Karanza karanza.berni@gmail.com
>>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>>
>>>>>
>>>>>
>>>>> Dear rekan-rekan milis,
>>>>>
>>>>> Mohon bantuannya terhadap contoh kasus berikut, yang merupakan bentuk
>>>>> simulasi dari trend pola kerja karyawan:
>>>>>
>>>>>
>>>>> ​Maksud dari gambar tersebut di atas, adalah bagaimana cara mengambil
>>>>> nilai yang ada di dalam cell secara spesifik pada tabel di bagian atas,
>>>>> yaitu dengan mengambil angka terbesar sebelum cell yang berisi teks "CT" ,
>>>>> hasilnya dipindahkan ke tabel bagian bawah. Penyelesaiannya bisa
>>>>> menggunakan formula atau macro, dan berikut juga saya kirimkan lampiran
>>>>> file yang dimaksud.
>>>>>
>>>>> Demikian ditunggu tanggapannya, dan terima kasih banyak atas
>>>>> bantuannya.
>>>>>
>>>>> Salam,
>>>>>
>>>>> Berni K
>>>>>
>>>>>
>>>>>
>>>>
>>
>
>

Mon Dec 4, 2017 3:56 am (PST) . Posted by:

"Berni Karanza" karanza.berni

Dear Mr.Kid

Siap, saya gak otak-atik formula, cuma tambahin angka satu di setiap row di
ujung table, dan berhasil.

Salam,

Berni K

2017-12-04 14:45 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Hai Berni,
>
> Sesuaikan saja kriteria-kriteria yang ada dalam formula dengan kriteria
> Anda...
>
> Regards,
> Kid
>
>
>
>
>
>
>
> 2017-12-04 14:34 GMT+07:00 Berni Karanza karanza.berni@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>>
>>
>> Dear Mr. Kid,
>>
>> Siap, terima kasih referensinya udah nambah ngerti (sedikit) :D. Izin
>> bertanya lagi, bagaimana jika kondisi tabel di atas sbb
>> (revisi dari tabel sebelumya, karena ketemu kondisi tersebut):
>>
>>
>> ​di mana cell yang berwarna merah seharusnya tidak perlu diambil
>> nilainya, karena tidak berada di belakang teks berisi teks "CT",
>> contohnya untuk row A, seharusnya cukup sampai dengan kolom array ke 4
>> (angka 8), berikut juga saya lampirkan contoh file
>> untuk simulasinya, terima kalsih.
>>
>>
>>
>> Salam,
>>
>> Berni K
>>
>> 2017-12-03 11:46 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
>> belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Hai Berni,
>>>
>>> Sila dipelajari, dipahami, dan dikembangkan.
>>> Disini
>>> <http://excel-mr-kid.blogspot.co.id/2011/03/array-formula-kenalan-yuuuk.html>
>>> ada sedikit coretan tentang array formula, moga-moga cukup memadai untuk
>>> menjadi awalan dalam memahami array formula.
>>>
>>> Regards,
>>> Kid
>>>
>>>
>>>
>>> 2017-12-03 11:42 GMT+07:00 Berni Karanza karanza.berni@gmail.com
>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>
>>>>
>>>>
>>>> Hai Mr.Kid
>>>>
>>>> Terima kasih lagi atas bantuannya, bisa saya contoh formulanya untuk
>>>> diaplikasikan ke data yg sebenarnya. Walaupun secara logic terus terang
>>>> masih gagal paham :D, kayaknya mesti banyak belajar lagi mengenai konsep
>>>> array, bisa dibantu kalo ada referensi yg bagus?, terima kasih.
>>>>
>>>> Salam,
>>>> Berni K
>>>>
>>>>
>>>> Pada tanggal 2 Des 2017 6.31 PM, "'Mr. Kid' mr.nmkid@gmail.com
>>>> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>>>>
>>>>>
>>>>>
>>>>> Hai Berni,
>>>>>
>>>>> File terlampir menggunakan array block 1 baris x 7 kolom untuk
>>>>> menghindari kalkulasi berulang agar Excel tidak dituduh lambat dalam
>>>>> bekerja pada data yang banyak
>>>>>
>>>>> Regards,
>>>>> Kid
>>>>>
>>>>>
>>>>> 2017-12-02 13:43 GMT+07:00 Berni Karanza karanza.berni@gmail.com
>>>>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>>>>
>>>>>>
>>>>>>
>>>>>> Dear rekan-rekan milis,
>>>>>>
>>>>>> Mohon bantuannya terhadap contoh kasus berikut, yang merupakan bentuk
>>>>>> simulasi dari trend pola kerja karyawan:
>>>>>>
>>>>>>
>>>>>> ​Maksud dari gambar tersebut di atas, adalah bagaimana cara mengambil
>>>>>> nilai yang ada di dalam cell secara spesifik pada tabel di bagian atas,
>>>>>> yaitu dengan mengambil angka terbesar sebelum cell yang berisi teks "CT" ,
>>>>>> hasilnya dipindahkan ke tabel bagian bawah. Penyelesaiannya bisa
>>>>>> menggunakan formula atau macro, dan berikut juga saya kirimkan lampiran
>>>>>> file yang dimaksud.
>>>>>>
>>>>>> Demikian ditunggu tanggapannya, dan terima kasih banyak atas
>>>>>> bantuannya.
>>>>>>
>>>>>> Salam,
>>>>>>
>>>>>> Berni K
>>>>>>
>>>>>>
>>>>>>
>>>>>
>>>
>>
>
>

Sun Dec 3, 2017 11:42 pm (PST) . Posted by:

"Stephen Saputro"

Selamat siang semuanya,

Mohon kiranya dapat di bantu kasus saya. Pada file saya ini, ada 2 Report
yang saya akan buat. Yaitu :

1. Tombol Balance
a. Bagaimana caranya agar pada waktu report di tarik, Tulisan "(blank)"
pada pivot yang di buat agar tidak muncul lagi.
b. Bisakah kalimat " sum of " pada kolom Principal USD - Kolom Gross USD
tidak muncul pada saat Report di tarik ?
c. Bagaimana caranya agar pada saat report di tarik, Pivot sudah
otomatis jadi berwarna ? saya sudah coba menggunakan perintah "
objTable.TableStyle = "PivotStyleMedium10" ", tapi tidak berhasil

2. Tombol Pembayaran
a. Bagaimana caranya, pada saat report di tarik, di kolom filter (
Penagihan/Pembayaran ) pada pivot, defaultnya adalah "pembayaran&quot;, Karena
selama ini setelah report pembayaran di tarik, saya harus memilih
"pembayaran&quot; secara manual. Kadangkala karena harus buru2, saya lupa untuk
memilih "pembayaran&quot; sehingga data yang di kasih salah
b. Apakah bisa pada saat report di tarik, maka reportnya langsung
otomatis muncul di layar kita ?

Mohon maaf karena langsung banyak pertanyaan yang di kasih. Terima kasih
banyak untuk bantuannya.

Mon Dec 4, 2017 12:04 am (PST) . Posted by:

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

Hai Stephen...

Bagaimana kalau mengoptimumkan pivot table saja...
1. Buat sheet baru bernama Balance
> Buat manual (gak usah pakai VBA dulu) pivot table untuk layout output
laporan Balance di sheet balance, lengkap dengan pernak perniknya.
> bila perlu, set pivot table supaya tidak usah menyimpan data dalam
pivot cache nya
> kalau gak suka ada teks berbunyi (blank), edit saja teks berbunyi
blank itu (langsung di-cells nya) agar berisi spasi misalnya.
> kalau gak suka bunyi sum of blabla, ganti saja bunyinya sesuai
keinginan Anda dengan ditambahkan spasi di akhirnya (JANGAN LUPA, tambahkan
1 spasi di akhirnya)
> save workbook
2. Buat sheet baru lagi, kali ini diberi nama Pembayaran
> copy pivot table yang ada di sheet Balance, dan paste ke sheet
Pembayaran
> atur pivot table hasil paste tadi agar sesuai layout output laporan
pembayaran, lengkap dengan segala pernak-perniknya.
> save workbook
3. Sekarang baru buat VBA-nya, tapi gak perlu VBA yang sophisticated untuk
membuat pivot table dari nol kaya begitu.
> setiap event si tombol, isinya adalah proses refresh all, lalu unhide
sheet yang sesuai, hide sheet yang gak perlu ditampilkan.
* sudah tahukan kalau status visible sebuah sheet itu ada 3 (tiga),
yaitu visible, hidden, dan very hidden. Kalau hidden, user bakalan bisa
un-hide dari tab sheet.
> bila perlu, buat tombol di setiap sheet pivot table untuk kembali ke
sheet utama (main menu).

Dengan begitu, kalau ada output laporan lainnya, seperti pemasukan,
cicilan, bla, blu, bli, dsb, maka cukup buat sheet baru, copy pivot table
yang ada di sheet lain, atur layout, siapkan tombol untuk hide/unhide sheet.

Cara di atas itu adalah contoh otomasi, bukan bikin program.
VBA itu ditujukan untuk menjadi alat otomasi.
Programming untuk automation itu bisa lebih sederhana.
Kalau proses otomasi disusun dengan cara bikin program, maka jadinya ruwet
buntet ketemunya hanya kesimpulan "Excel itu gak bisa begini begitu"
padahal yang gak bisa bukan Excel-nya...
wkwkwkwk

Regards,
Kid

2017-12-04 13:12 GMT+07:00 Stephen Saputro stephensaputro@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com>:

>
>
> Selamat siang semuanya,
>
> Mohon kiranya dapat di bantu kasus saya. Pada file saya ini, ada 2 Report
> yang saya akan buat. Yaitu :
>
> 1. Tombol Balance
> a. Bagaimana caranya agar pada waktu report di tarik, Tulisan "(blank)"
> pada pivot yang di buat agar tidak muncul lagi.
> b. Bisakah kalimat " sum of " pada kolom Principal USD - Kolom Gross
> USD tidak muncul pada saat Report di tarik ?
> c. Bagaimana caranya agar pada saat report di tarik, Pivot sudah
> otomatis jadi berwarna ? saya sudah coba menggunakan perintah "
> objTable.TableStyle = "PivotStyleMedium10" ", tapi tidak berhasil
>
> 2. Tombol Pembayaran
> a. Bagaimana caranya, pada saat report di tarik, di kolom filter (
> Penagihan/Pembayaran ) pada pivot, defaultnya adalah "pembayaran&quot;, Karena
> selama ini setelah report pembayaran di tarik, saya harus memilih
> "pembayaran&quot; secara manual. Kadangkala karena harus buru2, saya lupa untuk
> memilih "pembayaran&quot; sehingga data yang di kasih salah
> b. Apakah bisa pada saat report di tarik, maka reportnya langsung
> otomatis muncul di layar kita ?
>
>
> Mohon maaf karena langsung banyak pertanyaan yang di kasih. Terima kasih
> banyak untuk bantuannya.
>
>
>

Mon Dec 4, 2017 10:44 am (PST) . Posted by:

"Stephen Saputro"

Pak Kid,

Terima kasih untuk pencerahannya. Sudah saya coba renungkan saran Bapak di
bawah ini, namun maklum masih dangkal ilmu saya Pak, hehehe caplok sana
caplok sini soalnya. Yang saya tangkap dari kata2 Pak Kid kira2 seperti ini
ya :

1. Jadi Pivotnya kita buat manual dulu, terus tinggal di buat VBA untuk
refresh data pivot, sehingga setiap ada inputan data terbaru, kita tinggal
klik refresh dan data tersebut akan terefleksi dari Pivot yang sudah di
buat ? Begitu ya Pak ?
Kalau memang betul, bagaimana caranya Pak agar pivot tersebut dapat
mengambil setiap data baru yang di input ? mohon bimbingannya

2. kalau pemahaman saya salah, mohon bantuannya Pak Kid untuk lebih
menyederhanakan lagi ?hehehe

2017-12-04 15:04 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Hai Stephen...
>
> Bagaimana kalau mengoptimumkan pivot table saja...
> 1. Buat sheet baru bernama Balance
> > Buat manual (gak usah pakai VBA dulu) pivot table untuk layout
> output laporan Balance di sheet balance, lengkap dengan pernak perniknya.
> > bila perlu, set pivot table supaya tidak usah menyimpan data dalam
> pivot cache nya
> > kalau gak suka ada teks berbunyi (blank), edit saja teks berbunyi
> blank itu (langsung di-cells nya) agar berisi spasi misalnya.
> > kalau gak suka bunyi sum of blabla, ganti saja bunyinya sesuai
> keinginan Anda dengan ditambahkan spasi di akhirnya (JANGAN LUPA, tambahkan
> 1 spasi di akhirnya)
> > save workbook
> 2. Buat sheet baru lagi, kali ini diberi nama Pembayaran
> > copy pivot table yang ada di sheet Balance, dan paste ke sheet
> Pembayaran
> > atur pivot table hasil paste tadi agar sesuai layout output laporan
> pembayaran, lengkap dengan segala pernak-perniknya.
> > save workbook
> 3. Sekarang baru buat VBA-nya, tapi gak perlu VBA yang sophisticated untuk
> membuat pivot table dari nol kaya begitu.
> > setiap event si tombol, isinya adalah proses refresh all, lalu
> unhide sheet yang sesuai, hide sheet yang gak perlu ditampilkan.
> * sudah tahukan kalau status visible sebuah sheet itu ada 3 (tiga),
> yaitu visible, hidden, dan very hidden. Kalau hidden, user bakalan bisa
> un-hide dari tab sheet.
> > bila perlu, buat tombol di setiap sheet pivot table untuk kembali ke
> sheet utama (main menu).
>
> Dengan begitu, kalau ada output laporan lainnya, seperti pemasukan,
> cicilan, bla, blu, bli, dsb, maka cukup buat sheet baru, copy pivot table
> yang ada di sheet lain, atur layout, siapkan tombol untuk hide/unhide sheet.
>
> Cara di atas itu adalah contoh otomasi, bukan bikin program.
> VBA itu ditujukan untuk menjadi alat otomasi.
> Programming untuk automation itu bisa lebih sederhana.
> Kalau proses otomasi disusun dengan cara bikin program, maka jadinya ruwet
> buntet ketemunya hanya kesimpulan "Excel itu gak bisa begini begitu"
> padahal yang gak bisa bukan Excel-nya...
> wkwkwkwk
>
> Regards,
> Kid
>
>
>
>
>
>
>
> 2017-12-04 13:12 GMT+07:00 Stephen Saputro stephensaputro@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>>
>>
>> Selamat siang semuanya,
>>
>> Mohon kiranya dapat di bantu kasus saya. Pada file saya ini, ada 2 Report
>> yang saya akan buat. Yaitu :
>>
>> 1. Tombol Balance
>> a. Bagaimana caranya agar pada waktu report di tarik, Tulisan
>> "(blank)" pada pivot yang di buat agar tidak muncul lagi.
>> b. Bisakah kalimat " sum of " pada kolom Principal USD - Kolom Gross
>> USD tidak muncul pada saat Report di tarik ?
>> c. Bagaimana caranya agar pada saat report di tarik, Pivot sudah
>> otomatis jadi berwarna ? saya sudah coba menggunakan perintah "
>> objTable.TableStyle = "PivotStyleMedium10" ", tapi tidak berhasil
>>
>> 2. Tombol Pembayaran
>> a. Bagaimana caranya, pada saat report di tarik, di kolom filter (
>> Penagihan/Pembayaran ) pada pivot, defaultnya adalah "pembayaran&quot;, Karena
>> selama ini setelah report pembayaran di tarik, saya harus memilih
>> "pembayaran&quot; secara manual. Kadangkala karena harus buru2, saya lupa untuk
>> memilih "pembayaran&quot; sehingga data yang di kasih salah
>> b. Apakah bisa pada saat report di tarik, maka reportnya langsung
>> otomatis muncul di layar kita ?
>>
>>
>> Mohon maaf karena langsung banyak pertanyaan yang di kasih. Terima kasih
>> banyak untuk bantuannya.
>>
>>
>
>

Mon Dec 4, 2017 10:51 am (PST) . Posted by:

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

Hai Stephen,

Tentang :
1. Jadi Pivotnya kita buat manual dulu, terus tinggal di buat VBA untuk
refresh data pivot, sehingga setiap ada inputan data terbaru, kita tinggal
klik refresh dan data tersebut akan terefleksi dari Pivot yang sudah di
buat ? Begitu ya Pak ?
Kalau memang betul, bagaimana caranya Pak agar pivot tersebut dapat
mengambil setiap data baru yang di input ? mohon bimbingannya

> Betul begitu.
> agar pivot tersebut dapat mengambil setiap data baru yang di input ?
Tentu saja dengan membuat si pivot table merujuk ke salah satu dari 2
hal berikut :
a. sebuah nama range yang menghasilkan range dinamis
atau
b. excel table object (lihat ribbon HOME -> grup menu Styles ->
Format as Table)

2. kalau pemahaman saya salah, mohon bantuannya Pak Kid untuk lebih
menyederhanakan lagi ?hehehe

> Tidak ada yang perlu disederhanakan kok
> Yang diperlukan berikutnya adalah membuat pivot table merujuk ke sebuah
nama range atau sebuah excel pivot table

Regards,
Kid

2017-12-04 20:16 GMT+07:00 Stephen Saputro stephensaputro@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com>:

>
>
> Pak Kid,
>
> Terima kasih untuk pencerahannya. Sudah saya coba renungkan saran Bapak di
> bawah ini, namun maklum masih dangkal ilmu saya Pak, hehehe caplok sana
> caplok sini soalnya. Yang saya tangkap dari kata2 Pak Kid kira2 seperti ini
> ya :
>
> 1. Jadi Pivotnya kita buat manual dulu, terus tinggal di buat VBA untuk
> refresh data pivot, sehingga setiap ada inputan data terbaru, kita tinggal
> klik refresh dan data tersebut akan terefleksi dari Pivot yang sudah di
> buat ? Begitu ya Pak ?
> Kalau memang betul, bagaimana caranya Pak agar pivot tersebut dapat
> mengambil setiap data baru yang di input ? mohon bimbingannya
>
> 2. kalau pemahaman saya salah, mohon bantuannya Pak Kid untuk lebih
> menyederhanakan lagi ?hehehe
>
>
> 2017-12-04 15:04 GMT+07:00 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Hai Stephen...
>>
>> Bagaimana kalau mengoptimumkan pivot table saja...
>> 1. Buat sheet baru bernama Balance
>> > Buat manual (gak usah pakai VBA dulu) pivot table untuk layout
>> output laporan Balance di sheet balance, lengkap dengan pernak perniknya.
>> > bila perlu, set pivot table supaya tidak usah menyimpan data dalam
>> pivot cache nya
>> > kalau gak suka ada teks berbunyi (blank), edit saja teks berbunyi
>> blank itu (langsung di-cells nya) agar berisi spasi misalnya.
>> > kalau gak suka bunyi sum of blabla, ganti saja bunyinya sesuai
>> keinginan Anda dengan ditambahkan spasi di akhirnya (JANGAN LUPA, tambahkan
>> 1 spasi di akhirnya)
>> > save workbook
>> 2. Buat sheet baru lagi, kali ini diberi nama Pembayaran
>> > copy pivot table yang ada di sheet Balance, dan paste ke sheet
>> Pembayaran
>> > atur pivot table hasil paste tadi agar sesuai layout output laporan
>> pembayaran, lengkap dengan segala pernak-perniknya.
>> > save workbook
>> 3. Sekarang baru buat VBA-nya, tapi gak perlu VBA yang sophisticated
>> untuk membuat pivot table dari nol kaya begitu.
>> > setiap event si tombol, isinya adalah proses refresh all, lalu
>> unhide sheet yang sesuai, hide sheet yang gak perlu ditampilkan.
>> * sudah tahukan kalau status visible sebuah sheet itu ada 3
>> (tiga), yaitu visible, hidden, dan very hidden. Kalau hidden, user bakalan
>> bisa un-hide dari tab sheet.
>> > bila perlu, buat tombol di setiap sheet pivot table untuk kembali
>> ke sheet utama (main menu).
>>
>> Dengan begitu, kalau ada output laporan lainnya, seperti pemasukan,
>> cicilan, bla, blu, bli, dsb, maka cukup buat sheet baru, copy pivot table
>> yang ada di sheet lain, atur layout, siapkan tombol untuk hide/unhide sheet.
>>
>> Cara di atas itu adalah contoh otomasi, bukan bikin program.
>> VBA itu ditujukan untuk menjadi alat otomasi.
>> Programming untuk automation itu bisa lebih sederhana.
>> Kalau proses otomasi disusun dengan cara bikin program, maka jadinya
>> ruwet buntet ketemunya hanya kesimpulan "Excel itu gak bisa begini begitu"
>> padahal yang gak bisa bukan Excel-nya...
>> wkwkwkwk
>>
>> Regards,
>> Kid
>>
>>
>>
>>
>>
>>
>>
>> 2017-12-04 13:12 GMT+07:00 Stephen Saputro stephensaputro@gmail.com
>> [belajar-excel] <belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Selamat siang semuanya,
>>>
>>> Mohon kiranya dapat di bantu kasus saya. Pada file saya ini, ada 2
>>> Report yang saya akan buat. Yaitu :
>>>
>>> 1. Tombol Balance
>>> a. Bagaimana caranya agar pada waktu report di tarik, Tulisan
>>> "(blank)" pada pivot yang di buat agar tidak muncul lagi.
>>> b. Bisakah kalimat " sum of " pada kolom Principal USD - Kolom Gross
>>> USD tidak muncul pada saat Report di tarik ?
>>> c. Bagaimana caranya agar pada saat report di tarik, Pivot sudah
>>> otomatis jadi berwarna ? saya sudah coba menggunakan perintah "
>>> objTable.TableStyle = "PivotStyleMedium10" ", tapi tidak berhasil
>>>
>>> 2. Tombol Pembayaran
>>> a. Bagaimana caranya, pada saat report di tarik, di kolom filter (
>>> Penagihan/Pembayaran ) pada pivot, defaultnya adalah "pembayaran&quot;, Karena
>>> selama ini setelah report pembayaran di tarik, saya harus memilih
>>> "pembayaran&quot; secara manual. Kadangkala karena harus buru2, saya lupa untuk
>>> memilih "pembayaran&quot; sehingga data yang di kasih salah
>>> b. Apakah bisa pada saat report di tarik, maka reportnya langsung
>>> otomatis muncul di layar kita ?
>>>
>>>
>>> Mohon maaf karena langsung banyak pertanyaan yang di kasih. Terima kasih
>>> banyak untuk bantuannya.
>>>
>>>
>>
>
>

Mon Dec 4, 2017 3:42 pm (PST) . Posted by:

"nangagus"

Asalamualaikum warahmatullah,

Mas Kid,
Terima kasih atas penjelasannya.

jika saya akan menggunakan CodeName Sheet, untuk menghapus cell di lain
workbook,
bagaimanakah cara penulisan cekripnya?

saya coba gunakan:
Set wbBs = Workbooks("Book2.xlsm")
wbBs.Sheets1.Range("A2:A5").ClearContents

menjadi error "Object doesn't support this property or method"

namun apabila diubah menjadi:
Set wbBs = Workbooks("Book2.xlsm")
wbBs.Sheets(1).Range("A2:A5").ClearContents

akan berjalan dengan baik. dapatkah code name sheet digunakan? bagaimana
batasan menggunakan codeNameSheet?

Terima kasih,
wasalamualaikum warahmatullah wabarakatuh

Agus
On 03/12/2017 11:42, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] wrote:
> hmmm....
>
> Pak HK dan BeExceller semua...
>
> ActiveWorkbook dan ThisWorkbook itu 2 (dua) object yang berbeda.
> ActiveWorkbook berisi workbook yang sedang aktif
> ThisWorkbook berisi workbook tempat si baris kode berada, alias object
> ThisWorkbook di dalam folder Excel Object di VBProject tempat si baris
> kode ditulis
>
> Contoh :
> Ada workbook 'Book1' hasil new workbook (belum di-save) tapi terbuka
> di Excel Application.
> Kemudian ada workbook 're-DATA.xlsx' (dari file re-Data.xlsx) yang
> juga sedang terbuka di Excel Application yang sama dengan Book1 tadi.
> Ada sebuah prosedur di workbook 're-DATA.xlsx'. Bunyi prosedur
> tersebut beserta tampilan ketika si prosedur dijalankan adalah sebagai
> berikut :
>
> ​Ingat ya...
> 1. prosedur itu ada di re-DATA.xlsx, lalu dijalankan
> 2. baris kode Workbooks("Book1").Activate akan membuat workbook Book1
> menjadi aktif. Jadi, ActiveWorkbook berisi Book1, walaupun prosedur
> yang kerja ada di workbook re-DATA.xlsx
> 3. MsgBox yang muncul menjelaskan semuanya...
>
> Jadi, TIDAK SELALU ThisWorkbook adalah ActiveWorkbook, karena
> ActiveWorkbook dan ThisWorkbook adalah 2 (dua) object yang sejatinya
> berbeda
> walau terkadang mereka merujuk (MERUJUK bukan PERWUJUDAN) ke object
> workbook yang sama dan sedang aktif.
> Contoh prosedur di atas adalah bukti bahwa workbook yang aktif
> (ActiveWorkbook) tidak selalu merujuk ke workbook yang sama dengan
> ThisWorkbook.
>
> Regards,
> Kid
>
>
>
>
>
>
> On Sun, Dec 3, 2017 at 9:25 AM, hendrik karnadi
> hendrikkarnadi@yahoo.com <mailto:hendrikkarnadi@yahoo.com>
> [belajar-excel] <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com>> wrote:
>
> Sebelum Mr. Kid turun gunung, saya coba menjawab dari uraian mas Nang.
>
>
> Kesalahannya kayaknya disini
> set wb = ThisWorkbook
> Sel aktif kan masih ada di Workbook ThisWorkbook.
>
> Jadi ga mungkin wb dipakai untuk menunjuk ke workbook lain.
>
> Salam,
> HK
>
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Sun, Dec 3, 2017 at 7:49, nangagus nangagus@gmail.com
> <mailto:nangagus@gmail.com> [belajar-excel]
> <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com>> wrote:
>
> Asalamualaikum warahmatullah.
>
> 1. Saya membuat cekrip sederhana untuk menghapus cell.
> sheet1.Range("A1:A3).ClearContents
>
> cekrip tersebut dapat berjalan dengan baik.
>
> namun setelah saya tambahkan:
> set wb = ThisWorkbook
> wb.sheet1.Range("A1:A3).ClearContents
>
> terdapat eror, dimanakah kesalahannya? karena cekrip akan
> digunakan
> untuk menghapus cell di workbook lain.
>
> 2. Masih dalam cekrip yangsama:
> Workbooks("book1.xlsx").Sheets("Sheet1&quot;).Range("A1:A3").ClearContents
>
> dapat berjalan dengan baik pada office 2010 namun tidak dapat
> dilakukan
> di office 2013, bagaimana cara perbaikannya?
>
> Terima kasih
>
> Wasalamualaikum warahmatullah
>
> KenangAgus
>
>
>

============================================================
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
---------------------------------------------------------------------
Diposting oleh EXCEL FEED LEARNING di 17.55

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)