Rabu, 11 Desember 2013

[belajar-excel] Digest Number 2688

6 New Messages

Digest #2688

Messages

Tue Dec 10, 2013 5:49 pm (PST) . Posted by:

"Ahmad Syaifullah Lubis" syaifullah

Dear Dwi,
terima kasih sebelumnya.
catata saya saat macro saya jalankan :
1. Nama Pelanggan masih manual, kalau bisa dibuatkan list dengan comba box ya.
2. Tidak ada Database nama produk, bila ada akan mengurangi salah tulis.
3. Nomor Invoice tidak berjalan dengan otomatis bertambah.
4. Salut pengambilan data invoice ke datasub bisa jelas sekali, cuman saya lihat yang masuk ke sheet datasubnya ketika saya input data invoice ke dua kalinya, maka invoice ke dua tsb akan jatuh ke baris ke dua dan ke empat, tidak menempati baris kosong setelah invoice pertama dimasukan.

Mudah2an macro Dwi bisa sempurna ya.

Salam,
ASL.

From: upiet29@yahoo.com
To: belajar-excel@yahoogroups.com
Date: Tue, 10 Dec 2013 01:40:07 -0800
Subject: Re: Bls: [belajar-excel] Membuat Rekap Invoice secara Otomatis

Dear ASL,
Filenya belum sempurna, untuk monthly report dan customer reportnya belum dicoba (karena bisa disesuaikan dengan kebutuhan)mudah-mudahan bisa lancar dan tidak ada kendala.Nanti kalau sudah benar-benar OK akan saya posting.
SalamDM

On Tuesday, December 10, 2013 4:11 PM, dwi mulyaningsih <upiet29@yahoo.com> wrote:



Dear ASL,Terlampir filenya. Bisa dijalankan kok, cuma nanti masih mau saya tambahkan lagi.silahkan di
copasSalamDM On Tuesday, December 10, 2013 3:44 PM, Ahmad Syaifullah Lubis <syaifullah@hotmail.com> wrote:


Dear Dwi,bolehkah disharing file rekap invoice tsb, untuk referensi bahan pembuatan invoice yang saya sedang kerjakan.terima kasih.ASLFrom: upiet29@yahoo.comTo: belajar-excel@yahoogroups.comDate: Mon, 9 Dec 2013 21:58:18 -0800Subject: Re: Bls: [belajar-excel] Membuat Rekap Invoice secara Otomatis

Dear All,Akhirnya filenya sudah bisa berjalan. Terima kasih semuanya Terima kasih Mr.
Kid, dan juga terima kasih banyak untuk Bapak
Hendrik.Sedikit koreksi untuk proses loopnya di kolom 9 dan 10 prosedurnya terbalik, seharusnya 9 untuk satuan dan 10 untuk harga.Terima kasih atas bantuannya.SalamDwi On Tuesday, December 10, 2013 6:24 AM, Mr. Kid <mr.nmkid@gmail.com> wrote:


Hai Dwi,Mestinya bagian yang menimbulkan error tersebut tidak dibutuhkan karena
definisi range subtbl cukup sampai baris subtbl.offset(blablaJadi 2 baris Set Subtbl setelahnya bisa dihapus.Jika enggan menghapusnya, coba tambahkan Sheets("datasub"). sebelum range(subtbl blabla

Pastikan pada sheet datasub, semua baris dikolom B terisi penuh (tidak ada yang blank).Pada prosedur yang digunakan untuk menyimpan data anak, sepertinya proses loop harus diperbaiki menjadi :

For r = 1 To JmlItem If .[a12:a30].Cells(r, 1) <> vbnullstring Then TblSub(NewSub + r, 0) = NewSub + r '# urut TblSub(NewSub + r, 1) = .[I3] ' Nr Inv

TblSub(NewSub + r, 2) = .[I5] ' Tgl Inv TblSub(NewSub + r, 2).NumberFormat = "dd mmm yy" TblSub(NewSub + r, 3) = .[P4] ' No Faktur Pajak TblSub(NewSub + r, 4) = .[B3] ' Nm Cust

TblSub(NewSub + r, 5) = .cells(11+r,4).value ' Nm Produk TblSub(NewSub + r, 8) = .cells(11+r,2).value ' Quantity TblSub(NewSub + r, 9) = .cells(11+r,8) ' Harga

TblSub(NewSub + r, 10) = .cells(11+r,3) ' satuan TblSub(NewSub + r, 11) = .cells(11+r,10) ' Jumlah TblSub(NewSub + r, 14) = .cells(11+r,14) ' Kurs

endif Next rWassalam,Kid.

2013/12/9 dwi mulyaningsih <upiet29@yahoo.com>

Terlampir error reportnya

On , dwi mulyaningsih <upiet29@yahoo.com> wrote:

Dear pakar excel,

File warisan yang saya dapat sudah saya modif, dan akhirnya saya buat seperti terlampir.Akan tetapi pada saat rekam data ke tabel masih ada debugnya, mohon solusinya.

terlampir error reportnya.Terima kasih

SalamDM



Wed Dec 11, 2013 3:23 am (PST) . Posted by:

"dwi mulyaningsih" upiet29

Dear ASL,

Terima kasih atas masukkannya, nanti saya akan coba aplikasikan.
Mengenai database nama produk memang belum saya buat, karena saya harus collect data terlebih dahulu, untuk nomor invoice juga saya baru perhatikan tidak otomatis ya. Masih harus diperbaiki lagi. Maklum buatnya juga curi-curi waktu jadi tidak terlalu fokus. Nanti coba saya perbaiki lagi, kalau sudah ok saya posting ya dan mohon masukkannya lagi.

Salam
Dwi

On Wednesday, December 11, 2013 8:50 AM, Ahmad Syaifullah Lubis <syaifullah@hotmail.com> wrote:

 
Dear Dwi,
terima kasih sebelumnya.
catata  saya saat macro saya jalankan :
1. Nama Pelanggan masih manual, kalau bisa dibuatkan list dengan comba box ya.
2. Tidak ada Database nama produk, bila ada akan mengurangi salah tulis.
3. Nomor Invoice tidak berjalan dengan otomatis bertambah.
4. Salut pengambilan data invoice ke datasub bisa jelas sekali, cuman saya lihat yang masuk ke sheet datasubnya ketika saya input data invoice ke dua kalinya, maka invoice ke dua tsb akan jatuh ke baris ke dua dan ke empat, tidak menempati baris kosong setelah invoice pertama dimasukan.

Mudah2an macro Dwi bisa sempurna ya.

Salam,
ASL.

________________________________
From: upiet29@yahoo.com
To: belajar-excel@yahoogroups.com
Date: Tue, 10 Dec 2013 01:40:07 -0800
Subject: Re: Bls: [belajar-excel] Membuat Rekap Invoice secara Otomatis

 

Dear ASL,

Filenya belum sempurna, untuk monthly report dan customer reportnya belum dicoba (karena bisa disesuaikan dengan kebutuhan)
mudah-mudahan bisa lancar dan tidak ada kendala.
Nanti kalau sudah benar-benar OK akan saya posting.

Salam
DM

On Tuesday, December 10, 2013 4:11 PM, dwi mulyaningsih <upiet29@yahoo.com> wrote:

 
Dear ASL,

Terlampir filenya. Bisa dijalankan kok, cuma nanti masih mau saya tambahkan lagi.
silahkan di copas

Salam
DM

On Tuesday, December 10, 2013 3:44 PM, Ahmad Syaifullah Lubis <syaifullah@hotmail.com> wrote:

 
Dear Dwi,
bolehkah disharing file rekap invoice tsb, untuk referensi bahan pembuatan invoice yang saya sedang kerjakan.
terima kasih.
ASL

________________________________
From: upiet29@yahoo.com
To: belajar-excel@yahoogroups.com
Date: Mon, 9 Dec 2013 21:58:18 -0800
Subject: Re: Bls: [belajar-excel] Membuat Rekap Invoice secara Otomatis

 

Dear All,

Akhirnya filenya sudah bisa berjalan. Terima kasih semuanya 
Terima kasih Mr. Kid, dan juga terima kasih banyak untuk Bapak Hendrik.
Sedikit koreksi untuk proses loopnya di kolom 9 dan 10 prosedurnya terbalik, seharusnya 9 untuk satuan dan 10 untuk harga.
Terima kasih atas bantuannya.

Salam
Dwi

On Tuesday, December 10, 2013 6:24 AM, Mr. Kid <mr.nmkid@gmail.com> wrote:

 
Hai Dwi,

Mestinya bagian yang menimbulkan error tersebut tidak dibutuhkan karena
definisi range subtbl cukup sampai baris subtbl.offset(blabla

Jadi 2 baris Set Subtbl setelahnya bisa dihapus.

Jika enggan menghapusnya, coba tambahkan Sheets("datasub"). sebelum range(subtbl blabla
Pastikan pada sheet datasub, semua baris dikolom B terisi penuh (tidak ada yang blank).

Pada prosedur yang digunakan untuk menyimpan data anak, sepertinya proses loop harus diperbaiki menjadi :
For r = 1 To JmlItem
         If .[a12:a30].Cells(r, 1) <> vbnullstring Then
            TblSub(NewSub + r, 0) = NewSub + r   '# urut
            TblSub(NewSub + r, 1) = .[I3]        ' Nr Inv
            TblSub(NewSub + r, 2) = .[I5]        ' Tgl Inv
            TblSub(NewSub + r, 2).NumberFormat = "dd mmm yy"
            TblSub(NewSub + r, 3) = .[P4]        ' No Faktur Pajak
            TblSub(NewSub + r, 4) = .[B3]        ' Nm Cust
            TblSub(NewSub + r, 5) = .cells(11+r,4).value   ' Nm Produk
            TblSub(NewSub + r, 8) = .cells(11+r,2).value   ' Quantity
            TblSub(NewSub + r, 9) = .cells(11+r,8)   ' Harga
            TblSub(NewSub + r, 10) = .cells(11+r,3)   ' satuan
            TblSub(NewSub + r, 11) = .cells(11+r,10)   ' Jumlah
            TblSub(NewSub + r, 14) = .cells(11+r,14)  ' Kurs

        endif        

      Next r

Wassalam,
Kid.

2013/12/9 dwi mulyaningsih <upiet29@yahoo.com>


>Terlampir error reportnya
>
>
>
>On , dwi mulyaningsih <upiet29@yahoo.com> wrote:
>
>Dear pakar excel,
>
>
>File warisan yang saya dapat sudah saya modif, dan akhirnya saya buat seperti terlampir.
>Akan tetapi pada saat rekam data ke tabel masih ada debugnya, mohon solusinya.
>terlampir error reportnya.
>Terima kasih
>
>
>Salam
>DM
>
>
>
>
>

Tue Dec 10, 2013 9:02 pm (PST) . Posted by:

"hendrik karnadi" hendrikkarnadi

Dear Be_Exceller,
Kuis ini khusus untuk rekan2 yang baru bermain2 dengan VBA (macro).
Apa perbedaan ketiga perintah di atas dan bagaimana dampaknya apabila sheet diprotect ?

Salam,
HK

Tue Dec 10, 2013 10:13 pm (PST) . Posted by:

"Aliif Akbar" aliif.akbar

Ada hadiahnya dunk pak hendrik kalo quiz?

Aliif Akbar
Sent from my Windows Phone Lumia 620

-----Original Message-----
From: "hendrik karnadi" <hendrikkarnadi@yahoo.com>
Sent: ‎11/‎12/‎2013 12:02
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Subject: [belajar-excel] Perbedaan perintah Delete, Clear dan ClearContents (kuis kecil)

Dear Be_Exceller,
Kuis ini khusus untuk rekan2 yang baru bermain2 dengan VBA (macro).

Apa perbedaan ketiga perintah di atas dan bagaimana dampaknya apabila sheet diprotect ?

Salam,
HK

Tue Dec 10, 2013 10:21 pm (PST) . Posted by:

Dear pak Hendrik,

Yang saya paham, Delete dan Clear apabila digunakan di object Range, selain menghapus isi range, juga menghapus format nya (font, fill, border, dll). CMIIW.

Salam
Sony
Powered by Telkomsel BlackBerry®

-----Original Message-----
From: hendrik karnadi <hendrikkarnadi@yahoo.com>
Sender: belajar-excel@yahoogroups.com
Date: Tue, 10 Dec 2013 21:02:37
To: belajar-excel@yahoogroups.com<belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] Perbedaan perintah Delete, Clear dan ClearContents (kuis kecil)

Dear Be_Exceller,
Kuis ini khusus untuk rekan2 yang baru bermain2 dengan VBA (macro).
Apa perbedaan ketiga perintah di atas dan bagaimana dampaknya apabila sheet diprotect ?


Salam,
HK

Tue Dec 10, 2013 10:31 pm (PST) . Posted by:

"Hendrik Karnadi" hendrikkarnadi

Hadiahnya? Tambahan ilmu....

Sent from Samsung MobileAliif Akbar <aliif.akbar@yahoo.co.id> wrote:Ada hadiahnya dunk pak hendrik kalo quiz?

Aliif Akbar
Sent from my Windows Phone Lumia 620
From: hendrik karnadi
Sent: ‎11/‎12/‎2013 12:02
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] Perbedaan perintah Delete, Clear dan ClearContents (kuis kecil)

 
Dear Be_Exceller,
Kuis ini khusus untuk rekan2 yang baru bermain2 dengan VBA (macro).

Apa perbedaan ketiga perintah di atas dan bagaimana dampaknya apabila sheet diprotect ?

Salam,
HK

GROUP FOOTER MESSAGE
=====================================================================
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================

---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com

berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages

melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/

menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke  belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

Tidak ada komentar:

Posting Komentar