Re: [belajar-excel] Monitoring Umur Hutang

['Mr. Kid' mr.nm...@gmail.com [belajar-excel]]

Bukannya sudah saya sampaikan agar sesuai syarat dan ketentuan yang berlaku
?

data yang kata Anda sudah di-sort itu seperti ini :

​tapi ini bukan april mop kan ya...
kalau bukan april mop, Anda yakin bahwa data tersebut sudah Anda sort
sesuai syarat dan ketentuan yang berlaku ?

hehehe...







On Tue, Sep 19, 2017 at 9:44 AM, Iwan Setiawan iwel...@yahoo.com
[belajar-excel]  wrote:

>
>
> Iya Mr Kid seharusnya sperti itu. Tapi kenapa dalam ilustrasi tidak sesuai
> ya..
>
>
>
> On Tuesday, 19 September 2017, 9:29, "'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]"  wrote:
>
>
>
> Apakah harusnya begini ?
>
>
> ​
> Regards,
> Kid
>
>
> On Tue, Sep 19, 2017 at 8:45 AM, Iwan Setiawan iwel...@yahoo.com
> [belajar-excel]  wrote:
>
>
> Sudah saya urut sesuai dengan rumus yang ada, tp kenapa setelah saya input
> data seperti contoh terlampir tidak ketidaksesuaian hasil reportnya. Yang
> kemarin saya lihat hanya cara menggunakan Pivot Table. Karena lebih simple
> dan menarik makanya cara itu sedang saya pelajari.
>
> *Iwan *
>
>
> On Monday, 18 September 2017, 14:11, "'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]"  wrote:
>
>
>
> Wa'alaikumussalam wr wb
>
> Hai Iwan,
> Apakah sudah mengikuti syarat dan ketentuan yang ada?
> Data source terurut (sorted) dengan kondisi tertentu seperti yang sudah
> diterangkan dalam file lampiran tempo lalu.
>
> Wassalamu'alaikum wr wb
> Kid
> Sent from my smart enough phone
>
> On Sep 18, 2017, at 12:33, Iwan Setiawan iwel...@yahoo.com
> [belajar-excel]  wrote:
>
>
> Assalamualaikum Wr Wb
>
> Mr. Kid
>
> Hasil dari Pivot kemarin ada ketidaksesuaian seperti contoh yang saya
> kirimkan ini.
> Antara Sisa Hutang dan Umur tidak sesuai hasil nilainya. Saya ambilkan
> contoh data yang tidak sesuai tersebut.
> Sebelumnya diucapkan Terima kasih.
> Wassalamualaikum Wr Wb
>
> *Iwan*
>
>
> On Sunday, 17 September 2017, 6:10, "Iwan Setiawan iwel...@yahoo.com
> [belajar-excel]"  wrote:
>
>
>
> Terima Kasih Mr. Kid. Akan saya coba dan terapkan. Sangat membantu sekali
> untuk monitor pembayaran..
>
>
>
>
> On Saturday, 16 September 2017, 5:40, "'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]"  wrote:
>
>
>
> Sorry, salah file lampiran pada postingan yang sebelumnya.
> Berikut adalah file yang sesuai dengan asumsi berbunyi :
>
> Asumsinya, setiap pembayaran digunakan untuk menutup hutang sebelumnya
> yang terdekat lebih dulu.
> Jadi, jika ada hutang bulan Januari dan Juni, lalu pembayaran adanya di
> bulan April dan September,
> maka pembayaran September digunakan untuk menyelesaikan hutang Juni lebih
> dulu. Jika masih ada sisa pembayaran, maka sisa pembayaran tersebut
> digunakan untuk menyelesaikan hutang Januari bersama dengan pembayaran
> April.
>
>
>
> Regards,
> Kid
>
>
>
>
> 2017-09-16 5:03 GMT+07:00 Mr. Kid :
>
> Hai Iwan,
>
> File terlampir dengan 2 cara, yaitu seluruhnya formula dan gabungan
> formula dengan pivot table.
> Asumsinya, setiap pembayaran digunakan untuk menutup hutang sebelumnya
> yang terdekat lebih dulu.
> Jadi, jika ada hutang bulan Januari dan Juni, lalu pembayaran adanya di
> bulan April dan September,
> maka pembayaran September digunakan untuk menyelesaikan hutang Juni lebih
> dulu. Jika masih ada sisa pembayaran, maka sisa pembayaran tersebut
> digunakan untuk menyelesaikan hutang Januari bersama dengan pembayaran
> April.
>
> Regards,
> Kid
>
>
>
>
>
>
> On Fri, Sep 15, 2017 at 9:23 AM, Iwan Setiawan iwel...@yahoo.com
> [belajar-excel]  wrote:
>
>
> Akan saya coba kembali dengan yang lebih besar kapasitasnya.
>
> Haturnuhun
>
>
>
>
> On Thursday, 14 September 2017, 22:43, "'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]"  wrote:
>
>
>
> Wa'alaikumussalam wr wb
>
> File lampirannya tidak dapat dibuka.
>
> Wassalamu'alaikum wr wb
> Kid
>
>
> 2017-09-14 17:04 GMT+07:00 iwel...@yahoo.com [belajar-excel] <
> belajar-excel@yahoogroups.com >:
>
>
>
> Assalamualaikum Warahmatullahi Wabarakatuh
> Allhamdulillah akhirnya saya dapat bergabung di sini.
>
> Dear para suhu Excel yang saya hormati,
>
> Mohon bantuannya untuk memecahkan masalah umur hutang yang sudah beberapa
> kali uji coba tidak sesuai dengan harapan.
>
>- 1.  Bila Hasil Sisa Kosong / nol maka Umur Hutang pun kosong /
>Nol.
>
>
>- 2.   Bila Hasil Sisa lebih dari 0 (nol) maka Umur Hutang terisi
>sesuai dengan data pivotnya
>
>
>- 3.   Bila Hasil Sisa Minus maka Umur Hutang kosong / Nol tapi
>dalam kolom Keterangan  di isi "Salah Posting"
>
> Bagaimanakah rumusnya.
>
> Terlampir data dan report yang di inginkan
>
>
> Terimakasih
>
> Iwan
>
>
>
>
>
>
>
>
>
>
>
> [image: alt]
> 
>  

Re: [belajar-excel] tanya coding pindah data?????

[hendrik karnadi hendrikkarn...@yahoo.com [belajar-excel]]

 Hai Shenly,Bisa dilampirkan dummy filenya ?
Salam,HK

On Monday, September 18, 2017, 5:04:18 PM GMT+7, 
shenly_excelma...@yahoo.co.id [belajar-excel]  
wrote:  
 
     


asslamualakikum wr.wb

halo master, shenly kembali bertanya, sekrang sya ada masalah di coding macro, 

dlu saya mendapatkan coding dari salah satu master disni, yang berbunyi sbb: 



Sub cobalagiaja()




    Dim rngData As Range, lRows As Long     'variabel range data beserta jumlah 
barisnya

    Dim rngTarget As Range                  'variabel range posisi paste

    

    ActiveSheet.Unprotect Password:="mamamintapulsa"

    

    Set rngData = Range("A22").CurrentRegion.Offset(1).Resize(, 1)   'record 
data input kolom  + 1 baris kosong terbawah

    lRows = rngData.Rows.Count - 1                                  'jumlah 
record

        

        

    Sheets("Data").Select

    Set rngTarget = Cells(Rows.Count, "A").End(xlUp).Offset(1, 0)   'range 
posisi paste di kolom yg diingikn

    rngData.Resize(lRows, 1).Copy                                   'copy input 
kolom yg dinginkn

    rngTarget.PasteSpecial xlPasteValues                            'paste 
values di posisi target kolom yg dinginkn

    rngData.Offset(0, 1).Resize(lRows, 14).Copy                     'copy input 
yang 2 kolom data setelah lompat 1 kolom ke kanan

    rngTarget.Offset(0, 1).PasteSpecial xlPasteValues               'paste 
values di posisi target kolom A lompat 2 kolom ke kanan    

            

    Sheets("Form").Select

    Rows("23:1500").Select

    Selection.Delete Shift:=xlUp

    Range("J22:O22").Select

    Selection.ClearContents     

    

    Range("F18").Select

     

    ActiveWorkbook.Save






End Sub

=
coding tersebut jika sya masukan di Command Buttom, akan terjadi kesalah recod, 
Seprti : data yang dipindah entah masuk ke mana, jadi hasilnya seperti mendelet 
data yg akan di pindah saja.Tapi ketika sya buat coding tsb di Module, maka 
akan berjalan sesuai dgn yg sya inginkn.kira2 itu apa ya masalahnya master? kok 
tidak bisa di masukin di Command buttom ???

Re: [belajar-excel] Monitoring Umur Hutang [1 Attachment]

[Iwan Setiawan iwel...@yahoo.com [belajar-excel]]

Iya Mr Kid seharusnya sperti itu. Tapi kenapa dalam ilustrasi tidak sesuai ya..






On Tuesday, 19 September 2017, 9:29, "'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel]"  wrote:



     Apakah harusnya begini ?




​
Regards,
Kid




On Tue, Sep 19, 2017 at 8:45 AM, Iwan Setiawan iwel...@yahoo.com 
[belajar-excel]  wrote:


     Sudah saya urut sesuai dengan rumus yang ada, tp kenapa setelah saya input 
data seperti contoh terlampir tidak ketidaksesuaian hasil reportnya. Yang 
kemarin saya lihat hanya cara menggunakan Pivot Table. Karena lebih simple dan 
menarik makanya cara itu sedang saya pelajari.
 Iwan


On Monday, 18 September 2017, 14:11, "'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel]"  wrote:



     Wa'alaikumussalam wr wb
Hai Iwan,Apakah sudah mengikuti syarat dan ketentuan yang ada?Data source 
terurut (sorted) dengan kondisi tertentu seperti yang sudah diterangkan dalam 
file lampiran tempo lalu.


Wassalamu'alaikum wr wbKid
Sent from my smart enough phone
On Sep 18, 2017, at 12:33, Iwan Setiawan iwel...@yahoo.com [belajar-excel] 
 wrote:




    Assalamualaikum Wr Wb
Mr. Kid
Hasil dari Pivot kemarin ada ketidaksesuaian seperti contoh yang saya kirimkan 
ini.Antara Sisa Hutang dan Umur tidak sesuai hasil nilainya. Saya ambilkan 
contoh data yang tidak sesuai tersebut.Sebelumnya diucapkan Terima kasih.
Wassalamualaikum Wr Wb Iwan


On Sunday, 17 September 2017, 6:10, "Iwan Setiawan iwel...@yahoo.com 
[belajar-excel]"  wrote:
 



     Terima Kasih Mr. Kid. Akan saya coba dan terapkan. Sangat membantu sekali 
untuk monitor pembayaran..
 



On Saturday, 16 September 2017, 5:40, "'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel]"  wrote:



     Sorry, salah file lampiran pada postingan yang sebelumnya.Berikut adalah 
file yang sesuai dengan asumsi berbunyi :
Asumsinya, setiap pembayaran digunakan untuk menutup hutang sebelumnya yang 
terdekat lebih dulu.
Jadi, jika ada hutang bulan Januari dan Juni, lalu pembayaran adanya di bulan 
April dan September,
maka pembayaran September digunakan untuk menyelesaikan hutang Juni lebih dulu. 
Jika masih ada sisa pembayaran, maka sisa pembayaran tersebut digunakan untuk 
menyelesaikan hutang Januari bersama dengan pembayaran April.




Regards,Kid






2017-09-16 5:03 GMT+07:00 Mr. Kid :


Hai Iwan,


File terlampir dengan 2 cara, yaitu seluruhnya formula dan gabungan formula 
dengan pivot table.
Asumsinya, setiap pembayaran digunakan untuk menutup hutang sebelumnya yang 
terdekat lebih dulu.
Jadi, jika ada hutang bulan Januari dan Juni, lalu pembayaran adanya di bulan 
April dan September,
maka pembayaran September digunakan untuk menyelesaikan hutang Juni lebih dulu. 
Jika masih ada sisa pembayaran, maka sisa pembayaran tersebut digunakan untuk 
menyelesaikan hutang Januari bersama dengan pembayaran April.


Regards,
Kid












On Fri, Sep 15, 2017 at 9:23 AM, Iwan Setiawan iwel...@yahoo.com 
[belajar-excel]  wrote:


     Akan saya coba kembali dengan yang lebih besar kapasitasnya.


Haturnuhun 



On Thursday, 14 September 2017, 22:43, "'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel]"  wrote:



     Wa'alaikumussalam wr wb


File lampirannya tidak dapat dibuka.


Wassalamu'alaikum wr wb
Kid




2017-09-14 17:04 GMT+07:00 iwel...@yahoo.com [belajar-excel] 
:


  
Assalamualaikum Warahmatullahi WabarakatuhAllhamdulillah akhirnya saya dapat 
bergabung di sini.
Dear para suhu Excel yang saya hormati,
Mohon bantuannya untuk memecahkan masalah umur hutang yangsudah beberapa kali 
uji coba tidak sesuai dengan harapan.
   - 1.  Bila Hasil Sisa Kosong / nol maka Umur Hutangpun kosong / Nol.

   - 2.  Bila Hasil Sisa lebih dari 0 (nol) maka UmurHutang terisi sesuai 
dengan data pivotnya

   - 3.  Bila Hasil Sisa Minus maka Umur Hutang kosong /Nol tapi dalam 
kolom Keterangan  di isi"Salah Posting"
Bagaimanakah rumusnya.
Terlampirdata dan report yang di inginkan  Terimakasih Iwan






















|  | Virus-free. www.avast.com  |












  #yiv7846489919 #yiv7846489919 -- #yiv7846489919ygrp-mkp {border:1px solid 
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv7846489919 
#yiv7846489919ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv7846489919 
#yiv7846489919ygrp-mkp #yiv7846489919hd 
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 
0;}#yiv7846489919 #yiv7846489919ygrp-mkp #yiv7846489919ads 
{margin-bottom:10px;}#yiv7846489919 #yiv7846489919ygrp-mkp .yiv7846489919ad 
{padding:0 0;}#yiv7846489919 #yiv7846489919ygrp-mkp .yiv7846489919ad p 
{margin:0;}#yiv7846489919 #yiv7846489919ygrp-mkp .yiv7846489919ad a 
{color:#ff;text-decoration:none;}#yiv7846489919 #yiv7846489919ygrp-sponsor 

Re: [belajar-excel] Monitoring Umur Hutang

['Mr. Kid' mr.nm...@gmail.com [belajar-excel]]

Apakah harusnya begini ?


​
Regards,
Kid


On Tue, Sep 19, 2017 at 8:45 AM, Iwan Setiawan iwel...@yahoo.com
[belajar-excel]  wrote:

>
>
> Sudah saya urut sesuai dengan rumus yang ada, tp kenapa setelah saya input
> data seperti contoh terlampir tidak ketidaksesuaian hasil reportnya. Yang
> kemarin saya lihat hanya cara menggunakan Pivot Table. Karena lebih simple
> dan menarik makanya cara itu sedang saya pelajari.
>
> *Iwan *
>
>
> On Monday, 18 September 2017, 14:11, "'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]"  wrote:
>
>
>
> Wa'alaikumussalam wr wb
>
> Hai Iwan,
> Apakah sudah mengikuti syarat dan ketentuan yang ada?
> Data source terurut (sorted) dengan kondisi tertentu seperti yang sudah
> diterangkan dalam file lampiran tempo lalu.
>
> Wassalamu'alaikum wr wb
> Kid
> Sent from my smart enough phone
>
> On Sep 18, 2017, at 12:33, Iwan Setiawan iwel...@yahoo.com
> [belajar-excel]  wrote:
>
>
> Assalamualaikum Wr Wb
>
> Mr. Kid
>
> Hasil dari Pivot kemarin ada ketidaksesuaian seperti contoh yang saya
> kirimkan ini.
> Antara Sisa Hutang dan Umur tidak sesuai hasil nilainya. Saya ambilkan
> contoh data yang tidak sesuai tersebut.
> Sebelumnya diucapkan Terima kasih.
> Wassalamualaikum Wr Wb
>
> *Iwan*
>
>
> On Sunday, 17 September 2017, 6:10, "Iwan Setiawan iwel...@yahoo.com
> [belajar-excel]"  wrote:
>
>
>
> Terima Kasih Mr. Kid. Akan saya coba dan terapkan. Sangat membantu sekali
> untuk monitor pembayaran..
>
>
>
>
> On Saturday, 16 September 2017, 5:40, "'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]"  wrote:
>
>
>
> Sorry, salah file lampiran pada postingan yang sebelumnya.
> Berikut adalah file yang sesuai dengan asumsi berbunyi :
>
> Asumsinya, setiap pembayaran digunakan untuk menutup hutang sebelumnya
> yang terdekat lebih dulu.
> Jadi, jika ada hutang bulan Januari dan Juni, lalu pembayaran adanya di
> bulan April dan September,
> maka pembayaran September digunakan untuk menyelesaikan hutang Juni lebih
> dulu. Jika masih ada sisa pembayaran, maka sisa pembayaran tersebut
> digunakan untuk menyelesaikan hutang Januari bersama dengan pembayaran
> April.
>
>
>
> Regards,
> Kid
>
>
>
>
> 2017-09-16 5:03 GMT+07:00 Mr. Kid :
>
> Hai Iwan,
>
> File terlampir dengan 2 cara, yaitu seluruhnya formula dan gabungan
> formula dengan pivot table.
> Asumsinya, setiap pembayaran digunakan untuk menutup hutang sebelumnya
> yang terdekat lebih dulu.
> Jadi, jika ada hutang bulan Januari dan Juni, lalu pembayaran adanya di
> bulan April dan September,
> maka pembayaran September digunakan untuk menyelesaikan hutang Juni lebih
> dulu. Jika masih ada sisa pembayaran, maka sisa pembayaran tersebut
> digunakan untuk menyelesaikan hutang Januari bersama dengan pembayaran
> April.
>
> Regards,
> Kid
>
>
>
>
>
>
> On Fri, Sep 15, 2017 at 9:23 AM, Iwan Setiawan iwel...@yahoo.com
> [belajar-excel]  wrote:
>
>
> Akan saya coba kembali dengan yang lebih besar kapasitasnya.
>
> Haturnuhun
>
>
>
>
> On Thursday, 14 September 2017, 22:43, "'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]"  wrote:
>
>
>
> Wa'alaikumussalam wr wb
>
> File lampirannya tidak dapat dibuka.
>
> Wassalamu'alaikum wr wb
> Kid
>
>
> 2017-09-14 17:04 GMT+07:00 iwel...@yahoo.com [belajar-excel] <
> belajar-excel@yahoogroups.com >:
>
>
>
> Assalamualaikum Warahmatullahi Wabarakatuh
> Allhamdulillah akhirnya saya dapat bergabung di sini.
>
> Dear para suhu Excel yang saya hormati,
>
> Mohon bantuannya untuk memecahkan masalah umur hutang yang sudah beberapa
> kali uji coba tidak sesuai dengan harapan.
>
>- 1.  Bila Hasil Sisa Kosong / nol maka Umur Hutang pun kosong /
>Nol.
>
>
>- 2.   Bila Hasil Sisa lebih dari 0 (nol) maka Umur Hutang terisi
>sesuai dengan data pivotnya
>
>
>- 3.   Bila Hasil Sisa Minus maka Umur Hutang kosong / Nol tapi
>dalam kolom Keterangan  di isi "Salah Posting"
>
> Bagaimanakah rumusnya.
>
> Terlampir data dan report yang di inginkan
>
>
> Terimakasih
>
> Iwan
>
>
>
>
>
>
>
>
>
>
>
> [image: alt]
> 
>  Virus-free.
> www.avast.com
> 
> 
>
> 
>
>
>
> 
>

Re: [belajar-excel] Monitoring Umur Hutang

[Iwan Setiawan iwel...@yahoo.com [belajar-excel]]

Sudah saya urut sesuai dengan rumus yang ada, tp kenapa setelah saya input data 
seperti contoh terlampir tidak ketidaksesuaian hasil reportnya. Yang kemarin 
saya lihat hanya cara menggunakan Pivot Table. Karena lebih simple dan menarik 
makanya cara itu sedang saya pelajari.
 Iwan


On Monday, 18 September 2017, 14:11, "'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel]"  wrote:



     Wa'alaikumussalam wr wb
Hai Iwan,Apakah sudah mengikuti syarat dan ketentuan yang ada?Data source 
terurut (sorted) dengan kondisi tertentu seperti yang sudah diterangkan dalam 
file lampiran tempo lalu.


Wassalamu'alaikum wr wbKid
Sent from my smart enough phone
On Sep 18, 2017, at 12:33, Iwan Setiawan iwel...@yahoo.com [belajar-excel] 
 wrote:




    Assalamualaikum Wr Wb
Mr. Kid
Hasil dari Pivot kemarin ada ketidaksesuaian seperti contoh yang saya kirimkan 
ini.Antara Sisa Hutang dan Umur tidak sesuai hasil nilainya. Saya ambilkan 
contoh data yang tidak sesuai tersebut.Sebelumnya diucapkan Terima kasih.
Wassalamualaikum Wr Wb Iwan


On Sunday, 17 September 2017, 6:10, "Iwan Setiawan iwel...@yahoo.com 
[belajar-excel]"  wrote:



     Terima Kasih Mr. Kid. Akan saya coba dan terapkan. Sangat membantu sekali 
untuk monitor pembayaran..
 



On Saturday, 16 September 2017, 5:40, "'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel]"  wrote:



     Sorry, salah file lampiran pada postingan yang sebelumnya.Berikut adalah 
file yang sesuai dengan asumsi berbunyi :
Asumsinya, setiap pembayaran digunakan untuk menutup hutang sebelumnya yang 
terdekat lebih dulu.
Jadi, jika ada hutang bulan Januari dan Juni, lalu pembayaran adanya di bulan 
April dan September,
maka pembayaran September digunakan untuk menyelesaikan hutang Juni lebih dulu. 
Jika masih ada sisa pembayaran, maka sisa pembayaran tersebut digunakan untuk 
menyelesaikan hutang Januari bersama dengan pembayaran April.




Regards,Kid






2017-09-16 5:03 GMT+07:00 Mr. Kid :


Hai Iwan,


File terlampir dengan 2 cara, yaitu seluruhnya formula dan gabungan formula 
dengan pivot table.
Asumsinya, setiap pembayaran digunakan untuk menutup hutang sebelumnya yang 
terdekat lebih dulu.
Jadi, jika ada hutang bulan Januari dan Juni, lalu pembayaran adanya di bulan 
April dan September,
maka pembayaran September digunakan untuk menyelesaikan hutang Juni lebih dulu. 
Jika masih ada sisa pembayaran, maka sisa pembayaran tersebut digunakan untuk 
menyelesaikan hutang Januari bersama dengan pembayaran April.


Regards,
Kid












On Fri, Sep 15, 2017 at 9:23 AM, Iwan Setiawan iwel...@yahoo.com 
[belajar-excel]  wrote:


     Akan saya coba kembali dengan yang lebih besar kapasitasnya.


Haturnuhun 



On Thursday, 14 September 2017, 22:43, "'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel]"  wrote:



     Wa'alaikumussalam wr wb


File lampirannya tidak dapat dibuka.


Wassalamu'alaikum wr wb
Kid




2017-09-14 17:04 GMT+07:00 iwel...@yahoo.com [belajar-excel] 
:


  
Assalamualaikum Warahmatullahi WabarakatuhAllhamdulillah akhirnya saya dapat 
bergabung di sini.
Dear para suhu Excel yang saya hormati,
Mohon bantuannya untuk memecahkan masalah umur hutang yangsudah beberapa kali 
uji coba tidak sesuai dengan harapan.
   - 1.  Bila Hasil Sisa Kosong / nol maka Umur Hutangpun kosong / Nol.

   - 2.  Bila Hasil Sisa lebih dari 0 (nol) maka UmurHutang terisi sesuai 
dengan data pivotnya

   - 3.  Bila Hasil Sisa Minus maka Umur Hutang kosong /Nol tapi dalam 
kolom Keterangan  di isi"Salah Posting"
Bagaimanakah rumusnya.
Terlampirdata dan report yang di inginkan  Terimakasih Iwan






















|  | Virus-free. www.avast.com  |






  #yiv1731084733 #yiv1731084733 -- #yiv1731084733ygrp-mkp {border:1px solid 
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1731084733 
#yiv1731084733ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1731084733 
#yiv1731084733ygrp-mkp #yiv1731084733hd 
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 
0;}#yiv1731084733 #yiv1731084733ygrp-mkp #yiv1731084733ads 
{margin-bottom:10px;}#yiv1731084733 #yiv1731084733ygrp-mkp .yiv1731084733ad 
{padding:0 0;}#yiv1731084733 #yiv1731084733ygrp-mkp .yiv1731084733ad p 
{margin:0;}#yiv1731084733 #yiv1731084733ygrp-mkp .yiv1731084733ad a 
{color:#ff;text-decoration:none;}#yiv1731084733 #yiv1731084733ygrp-sponsor 
#yiv1731084733ygrp-lc {font-family:Arial;}#yiv1731084733 
#yiv1731084733ygrp-sponsor #yiv1731084733ygrp-lc #yiv1731084733hd {margin:10px 
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1731084733 
#yiv1731084733ygrp-sponsor #yiv1731084733ygrp-lc .yiv1731084733ad 
{margin-bottom:10px;padding:0 0;}#yiv1731084733 #yiv1731084733actions 
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1731084733 

Re: [belajar-excel] Help : List box by multiple table name

[nangagus nanga...@gmail.com [belajar-excel]]

Dear Ody,

1. Mohon bantuannya, bagaimanat caranya agar pada saat saya memilih 
listbox Area,
Misal : Area --> DPS, maka nama salesman akan mengambil nama salesman di 
tabel name ("area_DPS") dan sekaligus akan lookup: chaneel, Jenis 
kendaraan dan No. polisinya…


Lebih baik belajar sendiri akan menjadikan ilmu kita lebih berasa 
daripada dibuatkan langsung jadi, coba belajar tulisan mas Kid mulai 
dari sini 
jika 
masih ada kesulitan dapat diposting kembali


2. Bagimana mensetting Form Kalender agar yang muncul adalah bulan saat ini,

Buat cekrip form initialize di UserForm2:

Private Sub UserForm_Initialize()
MonthView1.Value = Now
End Sub

salam

GoeZ

On 18/09/2017 14:09, Odhy odhyz83_assas...@yahoo.com [belajar-excel] wrote:

Mohon maaf saya lampirkan ulang filenya

Terima Kasih atas pencerahannya,   Odhy.


- Forwarded Message -
*From:* Odhy 
*To:* BeExcel 
*Sent:* ‎Monday‎, ‎September‎ ‎18‎, ‎2017‎ ‎01‎:‎50‎:‎29‎ ‎PM
*Subject:* Help : List box by multiple table name

Dear Master,
Mohon bantuannya...
1. bagaimana caranya agar saya bisa menggambil data di table nama 
berdasarkan listbox.

2. bagimana merubah setting form kalender agar update bulan saat ini.
untuk lebih jelas penjelasaanya saya lampirkan filenya

atas bantuannya saya ucapkan banyak terima kasih.

Odhy.

Re: [belajar-excel] tanya coding pindah data?????

['Mr. Kid' mr.nm...@gmail.com [belajar-excel]]

Wa'alaikumussalam wr wb

Hai Shenly,

Coba lebih disiplin dalam penggunaan object.

Contoh : untuk merujuk ke range A1 di sheet bernama 'Kid', gunakan :
 Sheets("kid").range("a1")

Hindari penggunaan activesheet, selection, select, activate jika tidak
yakin apa sheet yang sedang aktif, range yang sedang dipilih, sesuai
kebutuhan atau tidak.


  ActiveSheet.Unprotect Password:="mamamintapulsa"
Lebih baik :
  Sheets("nama sheetnya").unprotect Password:="mamamintapulsa"


  Set rngData = Range("A22").CurrentRegion.Offset(1).Resize(, 1)
'record data input kolom  + 1 baris kosong terbawah
Lebih baik :
  Set rngData = Sheets("nama
sheetnya").Range("A22").CurrentRegion.Offset(1).Resize(,
1)   'record data input kolom  + 1 baris kosong terbawah


  Sheets("Data").Select
Lebih baik : dibuang saja, karena gak penting dan buang-buang energi


  Set rngTarget = Cells(Rows.Count, "A").End(xlUp).Offset(1, 0)
'range posisi paste di kolom yg diingikn
Lebih baik : (kalau memang merujuk ke sheet bernama 'data' yang di-select
di baris sebelumnya, yang sekarang sudah dibuang itu)
  Set rngTarget = Sheets("data").Cells(Sheets("data").Rows.Count,
"A").End(xlUp).Offset(1, 0)   'range posisi paste di kolom yg diingikn

  Sheets("Form").Select

Rows("23:1500").Select

Selection.Delete Shift:=xlUp
Lebih baik :
Sheets("form").range("a23:a1500").entirerow.delete xlshiftup


Range("J22:O22").Select
Selection.ClearContents
Lebih baik :
Sheets("nama sheetnya").range("j22:o22").clearcontents


 Range("F18").Select
Lebih baik : (kalau memang ingin mengatura agar yang ditampilkan ke user
adalah range tersebut di suatu sheet tertentu)
 Application.goto sheets("nama sheetnya").range("f18") , true


 ActiveWorkbook.Save
Lebih baik : (kalau memang akan save workbook yang berisi baris-baris kode
ini, alias bukan workbook lain)
 thisworkbook.save


So,
langsung to the point sajah
sebut nama emaknya, lalu sebut nama anaknya, lalu lakukan sesuatu terhadap
anaknya.
contoh :
   sheets("data").range("a1:x12345").copy
   sheets("salinan").range("g17").pastespecial
xlpastevaluesandnumberformats
kalau mau copy range A1:X12345 yang ada di sheet bernama 'data' dan di
paste values (termasuk format numbernya) ke sheet bernama 'salinan' mulai
di range G17

lugas... jadi lebih jelas dan mudah dilacak.

Kalau antar workbook
dim wbkSumber as workbook, wbkTarget as workbook
set wbksumber=thisworkbook'data dari workbook ini
set wbktarget=worbooks.open("fullpath dari file excel tujuan)

'copy dari workbook sumber sheet bernama 'data' area range A1:X12345, ke
workbook target di sheet bernama 'salinan' mulai range G17,
'paste values dan number format sajah
wbksumber.sheets("data").range("a1:x12345").copy
wbktarget.sheets("salinan").range("g17").pastespecial
xlpastevaluesandnumberformats
wbktarget.save'simpan workbook target, tapi gak ditutup
wbktarget.close true   'kalau tutup workbook target tapi di save lebih dulu
sebelum ditutup
wbksumber.activate   'kalau memang workbook sumber ingin menjadi
activeworkbook karena ada workbook lainnya lagi yang sedang dibuka


Jangan diapalin, tapi ikuti alurnya. Data dari workbook x, maka sebut
workbooknya, sheet yang entu maka sbut sheets("entu") yang area range itu,
sebut areanya, dst,dst



Wassalamu'alaikum wr wb
Kid





2017-09-18 17:04 GMT+07:00 shenly_excelma...@yahoo.co.id [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> asslamualakikum wr.wb
>
> halo master, shenly kembali bertanya, sekrang sya ada masalah di coding
> macro,
>
> dlu saya mendapatkan coding dari salah satu master disni, yang berbunyi
> sbb:
>
> 
>
> Sub cobalagiaja()
>
>
> Dim rngData As Range, lRows As Long 'variabel range data beserta
> jumlah barisnya
>
> Dim rngTarget As Range  'variabel range posisi paste
>
>
>
> ActiveSheet.Unprotect Password:="mamamintapulsa"
>
>
>
> Set rngData = Range("A22").CurrentRegion.Offset(1).Resize(, 1)
> 'record data input kolom  + 1 baris kosong terbawah
>
> lRows = rngData.Rows.Count - 1
>  'jumlah record
>
>
>
>
>
> Sheets("Data").Select
>
> Set rngTarget = Cells(Rows.Count, "A").End(xlUp).Offset(1, 0)   'range
> posisi paste di kolom yg diingikn
>
> rngData.Resize(lRows, 1).Copy   'copy
> input kolom yg dinginkn
>
> rngTarget.PasteSpecial xlPasteValues'paste
> values di posisi target kolom yg dinginkn
>
> rngData.Offset(0, 1).Resize(lRows, 14).Copy 'copy
> input yang 2 kolom data setelah lompat 1 kolom ke kanan
>
> rngTarget.Offset(0, 1).PasteSpecial xlPasteValues   'paste
> values di posisi target kolom A lompat 2 kolom ke kanan
>
>
>
> Sheets("Form").Select
>
> Rows("23:1500").Select
>
> Selection.Delete Shift:=xlUp
>
> Range("J22:O22").Select
>
> Selection.ClearContents
>
>
>
> Range("F18").Select

Re: [belajar-excel] Help : List box by multiple table name

['Mr. Kid' mr.nm...@gmail.com [belajar-excel]]

Hai Odhy,

1. Tentang combobox berjenjang dengan sumber data yang sudah dibuatkan nama
range.
> Coba disempatkan melihat coretan tentang combobox yang dimulai dari sini
.
> Pada name manager, ada 3 nama range yang akan dijadikan isi combobox1,
berdasar isian di combobox2.
> Nama range tersebut diawali teks 'Area_' diikuti teks pilihan di combobox2
> User memilih combobox2 lebih dulu, lalu daftar dalam combobox1
menyesuaikan sesuai pilihan user di combobox2.

A. Nama range yang diawali 'Area_' hanya berisi 1 kolom
> ini satu kerugian karena combobox maupun listbox mampu menerima
banyak kolom.
> jadi, ubah formula refers to dari setiap nama range dengan awalan
'Area_' agar melingkupi 4 kolom dan baris yang tepat.
> contoh untuk nama range Area_DPS memiliki isi formula refers to :
=OFFSET(dbase!$F$2,1,0,COUNTA(dbase!$F:$F)-2,4)

B. jika combobox2 diganti pilihannya, maka combobox1 berubah daftar
pilihannya
> artinya, combobox2 event change (combobox2 berubah nilai nya) diisi
dengan baris perintah untuk mengisi daftar pilihan di combobox1.
> begini bunyinya :
 combobox1.listindex= -1   'kosongkan nilai di combobox1
 if combobox2.listindex<>-1 then   'combobox2 ada item yang
dipilih
 combobox1.rowsource= "Area_" &
combobox2.text'sumber data untuk daftar pilihan ditentukan baru
 else

combobox1.rowsource=vbnullstring
'daftar pilihan dikosongkan (tanpa sumber data apapun)
 endif

C. jika combobox1 diganti pilihannya oleh user, maka textbox9,10,11
berurutan sama dengan urutan kolom sumber data pilihan combobox1
   dim lidx as long'variabel indeks yang dipilih user di
combobox1
   lidx=combobox1.listindex 'simpan nilai indeks yang
dipilih user di combobox1
   if lidx<>-1 then  'user memilih salah satu item di
combobox1, maka isi textbox9,10,11 berdasar nomor kolom, yaitu kolom 2,3,4
dari sumber data
  with range( combobox.rowsource ).resize(1).offset( lidx )
 'pada area range sumber data pilihan combobox1, 1 baris saja, lompat
lidx baris
  textbox9.text=.cells(1,2).text   'ambil kolom
ke-2 range sumber data
  textbox10.text=.cells(1,3).text   'ambil
kolom ke-2 range sumber data
  textbox11.text=.cells(1,4).text   'ambil
kolom ke-2 range sumber data
  end with
   else'user tidak memilih apapun, maka kosongkan textbox9,10,11
  textbox9.text=vbnullstring
  textbox10.text=vbnullstring
  textbox11.text=vbnullstring
   endif

Untuk urusan menulis ke tabel penyimpanannya, silakan disusun sendiri ya...


2. set nilai awal calendar control (properti bernama value)
> calendar control ada di userform2 dengan nama control MonthView1
> calendar control dipanggil ketika userform1 control bernama
CommandButton4 di klik.
> artinya, event click dari control bernama CommandButton4 diisi proses
mengaktifkan userform2.
 userform2.show 'begini bukan ?
> ketika userform2 sudah di-load (sebelum ditampilkan kepada user, alias
masih di-memory komputer -> disebut event initialize),
   dilakukan pengaturan nilai calendar control.
> buat event initialize di userform2 lalu isi dengan :
   monthview1.value=now

kalau monthview1 diklik (pilih salah satu tanggal), maka nilai tanggal akan
ditulis ke userform1 control textbox13
 > berarti, kalau userform1 control textbox13 sudah berisi tanggal
hasil pilihan sebelumnya, maka nilai dasar monthview bukan hari ini,
tetapi di tanggal yang ada di textbox13 userform1
> artinya, baris perintah
monthview1.value=now
   di event initialize userform2 di atas harus diubah menjadi :
   if len( userform1.textbox13.text ) <> 0 then  'textbox13 di
userform1 gak kosong
  if isdate( userform1.textbox13.text ) then   'textbox13
di userform1 berisi suatu nilai yang dapat diubah jadi bertipe date
monthview1.value=cdate( userform1.textbox13.text
)'monthview1 diisi nilai bertipe date dari textbox13 di userform1
  else'textbox13 di userform1 berisi nilai, tetapi gak bisa
diubah jadi bertipe date
monthview1.value=now   'jadikan nilai waktu saat
ini sebagai nilai awal monthview1
  endif
   else'textbox13 di userform1 kosong
   monthview1.value=now'jadikan nilai waktu saat ini
sebagai nilai awal monthview1
   endif

Regards,
Kid









2017-09-18 13:50 GMT+07:00 Odhy odhyz83_assas...@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Dear Master,
> Mohon bantuannya...
> 1. bagaimana caranya agar saya bisa menggambil data di table nama
> berdasarkan listbox.
> 2. bagimana merubah setting form 

Re: [belajar-excel] Help : List box by multiple table name

[nangagus nanga...@gmail.com [belajar-excel]]

Dear Ody; Coba beberapa cekrip diubah:

1.  Cekrip pada UserForm_Activate()

dibuang bagian pendefinisian combobox2:

Me.ComboBox1.Clear
For Each cPart In ws.Range("area_MTM")
  With Me.ComboBox1
    .AddItem cPart.Value
    End With
 Next cPart

2. Buat Cekrip Baru pada ComboBox2_Change()

Private Sub ComboBox2_Change()
Dim cPart As Range
Dim ws As Worksheet
Dim nmProduct As String
Set ws = Worksheets("dbase")
Dim addr As String
addr = "area_" & ComboBox2.Value
Me.ComboBox1.Clear
For Each cPart In ws.Range(addr)
  With Me.ComboBox1
    .AddItem cPart.Value
    End With
 Next cPart
End Sub

3. Ubah Cekrip ComboBox1_Change() menjadi:

Dim adds As String
Dim a As Integer
a = ComboBox2.ListIndex
adds = "area_" & ComboBox2.Value
    Channel = Me.ComboBox1.Value
With Range(adds)
   Set c = .Find(Channel, LookIn:=xlValues)
    If Not c Is Nothing Then
    baris = c.Row
    Me.TextBox9.Value = Worksheets("dbase").Cells(baris,a * 5 + 
2).Value

    Else
    MsgBox "Maaf, Channel Tidak ditemukan.."
    End If
    End With

    Jkendaraan = Me.ComboBox1.Value
    With Range(adds)
    Set c = .Find(Jkendaraan, LookIn:=xlValues)
    If Not c Is Nothing Then
    baris = c.Row
    Me.TextBox10.Value = Worksheets("dbase").Cells(baris, a * 5 
+ 3).Value

    Else
    MsgBox "Maaf, Channel Tidak ditemukan.."
    End If
    End With

    npolisi = Me.ComboBox1.Value
    With Range(adds)
    Set c = .Find(npolisi, LookIn:=xlValues)
    If Not c Is Nothing Then
    baris = c.Row
    Me.TextBox11.Value = Worksheets("dbase").Cells(baris, a * 5 
+ 4).Value

    Else
    MsgBox "Maaf, Channel Tidak ditemukan.."
    End If
    End With
End Sub

Salam

NangAgus


On 18/09/2017 14:09, Odhy odhyz83_assas...@yahoo.com [belajar-excel] wrote:

Mohon maaf saya lampirkan ulang filenya

Terima Kasih atas pencerahannya,   Odhy.


- Forwarded Message -
*From:* Odhy 
*To:* BeExcel 
*Sent:* ‎Monday‎, ‎September‎ ‎18‎, ‎2017‎ ‎01‎:‎50‎:‎29‎ ‎PM
*Subject:* Help : List box by multiple table name

Dear Master,
Mohon bantuannya...
1. bagaimana caranya agar saya bisa menggambil data di table nama 
berdasarkan listbox.

2. bagimana merubah setting form kalender agar update bulan saat ini.
untuk lebih jelas penjelasaanya saya lampirkan filenya

atas bantuannya saya ucapkan banyak terima kasih.

Odhy.

[belajar-excel] tanya coding pindah data?????

[shenly_excelma...@yahoo.co.id [belajar-excel]]

asslamualakikum wr.wb
 halo master, shenly kembali bertanya, sekrang sya ada masalah di coding macro, 
 dlu saya mendapatkan coding dari salah satu master disni, yang berbunyi sbb: 
 
 Sub cobalagiaja()
 

 Dim rngData As Range, lRows As Long 'variabel range data beserta 
jumlah barisnya
 Dim rngTarget As Range  'variabel range posisi paste
 
 ActiveSheet.Unprotect Password:="mamamintapulsa"
 
 Set rngData = Range("A22").CurrentRegion.Offset(1).Resize(, 1)   'record 
data input kolom  + 1 baris kosong terbawah
 lRows = rngData.Rows.Count - 1  'jumlah 
record
 
 
 Sheets("Data").Select
 Set rngTarget = Cells(Rows.Count, "A").End(xlUp).Offset(1, 0)   'range 
posisi paste di kolom yg diingikn
 rngData.Resize(lRows, 1).Copy   'copy 
input kolom yg dinginkn
 rngTarget.PasteSpecial xlPasteValues'paste 
values di posisi target kolom yg dinginkn
 rngData.Offset(0, 1).Resize(lRows, 14).Copy 'copy 
input yang 2 kolom data setelah lompat 1 kolom ke kanan
 rngTarget.Offset(0, 1).PasteSpecial xlPasteValues   'paste 
values di posisi target kolom A lompat 2 kolom ke kanan
 
 Sheets("Form").Select
 Rows("23:1500").Select
 Selection.Delete Shift:=xlUp
 Range("J22:O22").Select
 Selection.ClearContents 
 
 Range("F18").Select
  
 ActiveWorkbook.Save
 

 
 End Sub
 

 =
 

 coding tersebut jika sya masukan di Command Buttom, akan terjadi kesalah 
recod, Seprti : data yang dipindah entah masuk ke mana, jadi hasilnya seperti 
mendelet data yg akan di pindah saja.
 Tapi ketika sya buat coding tsb di Module, maka akan berjalan sesuai dgn yg 
sya inginkn.
 kira2 itu apa ya masalahnya master? kok tidak bisa di masukin di Command 
buttom ???
 

Re: [belajar-excel] Monitoring Umur Hutang

['Mr. Kid' mr.nm...@gmail.com [belajar-excel]]

Wa'alaikumussalam wr wb

Hai Iwan,
Apakah sudah mengikuti syarat dan ketentuan yang ada?
Data source terurut (sorted) dengan kondisi tertentu seperti yang sudah 
diterangkan dalam file lampiran tempo lalu.

Wassalamu'alaikum wr wb
Kid
Sent from my smart enough phone

> On Sep 18, 2017, at 12:33, Iwan Setiawan iwel...@yahoo.com [belajar-excel] 
>  wrote:
> 
> Assalamualaikum Wr Wb
> 
> Mr. Kid
> 
> Hasil dari Pivot kemarin ada ketidaksesuaian seperti contoh yang saya 
> kirimkan ini.
> Antara Sisa Hutang dan Umur tidak sesuai hasil nilainya. Saya ambilkan contoh 
> data yang tidak sesuai tersebut.
> Sebelumnya diucapkan Terima kasih.
> Wassalamualaikum Wr Wb
>  
> Iwan
> 
> 
> On Sunday, 17 September 2017, 6:10, "Iwan Setiawan iwel...@yahoo.com 
> [belajar-excel]"  wrote:
> 
> 
>  
> Terima Kasih Mr. Kid. Akan saya coba dan terapkan. Sangat membantu sekali 
> untuk monitor pembayaran.. 
>  
> 
> 
> 
> On Saturday, 16 September 2017, 5:40, "'Mr. Kid' mr.nm...@gmail.com 
> [belajar-excel]"  wrote:
> 
> 
>  
> Sorry, salah file lampiran pada postingan yang sebelumnya.
> Berikut adalah file yang sesuai dengan asumsi berbunyi :
> Asumsinya, setiap pembayaran digunakan untuk menutup hutang sebelumnya yang 
> terdekat lebih dulu.
> Jadi, jika ada hutang bulan Januari dan Juni, lalu pembayaran adanya di bulan 
> April dan September, 
> maka pembayaran September digunakan untuk menyelesaikan hutang Juni lebih 
> dulu. Jika masih ada sisa pembayaran, maka sisa pembayaran tersebut digunakan 
> untuk menyelesaikan hutang Januari bersama dengan pembayaran April.
> 
> 
> Regards,
> Kid
> 
> 
> 
> 
> 2017-09-16 5:03 GMT+07:00 Mr. Kid :
> Hai Iwan,
> 
> File terlampir dengan 2 cara, yaitu seluruhnya formula dan gabungan formula 
> dengan pivot table.
> Asumsinya, setiap pembayaran digunakan untuk menutup hutang sebelumnya yang 
> terdekat lebih dulu.
> Jadi, jika ada hutang bulan Januari dan Juni, lalu pembayaran adanya di bulan 
> April dan September, 
> maka pembayaran September digunakan untuk menyelesaikan hutang Juni lebih 
> dulu. Jika masih ada sisa pembayaran, maka sisa pembayaran tersebut digunakan 
> untuk menyelesaikan hutang Januari bersama dengan pembayaran April.
> 
> Regards,
> Kid
> 
> 
> 
> 
> 
> 
> On Fri, Sep 15, 2017 at 9:23 AM, Iwan Setiawan iwel...@yahoo.com 
> [belajar-excel]  wrote:
>  
> Akan saya coba kembali dengan yang lebih besar kapasitasnya.
> 
> Haturnuhun
>  
> 
> 
> 
> On Thursday, 14 September 2017, 22:43, "'Mr. Kid' mr.nm...@gmail.com 
> [belajar-excel]"  wrote:
> 
> 
>  
> Wa'alaikumussalam wr wb
> 
> File lampirannya tidak dapat dibuka.
> 
> Wassalamu'alaikum wr wb
> Kid
> 
> 
> 2017-09-14 17:04 GMT+07:00 iwel...@yahoo.com [belajar-excel] 
> :
>  
> 
> Assalamualaikum Warahmatullahi Wabarakatuh
> Allhamdulillah akhirnya saya dapat bergabung di sini.
> 
> Dear para suhu Excel yang saya hormati,
> 
> Mohon bantuannya untuk memecahkan masalah umur hutang yang sudah beberapa 
> kali uji coba tidak sesuai dengan harapan.
> 1.  Bila Hasil Sisa Kosong / nol maka Umur Hutang pun kosong / Nol.
> 2.   Bila Hasil Sisa lebih dari 0 (nol) maka Umur Hutang terisi sesuai 
> dengan data pivotnya
> 3.   Bila Hasil Sisa Minus maka Umur Hutang kosong / Nol tapi dalam kolom 
> Keterangan  di isi "Salah Posting"
> Bagaimanakah rumusnya.
> 
> Terlampir data dan report yang di inginkan
>  
>  
> Terimakasih
>  
> Iwan
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
>   Virus-free. www.avast.com
> 
>