File terlampir tidak menggunakan VBA. Copas data dari MS Access ke sheet database di kolom A mulai baris ke-5. Bila perlu, data mulai baris ke-5 sampai yang terakhir yang ada di sheetdatabase bisa dihapus lebih dulu (blok, klik kanan, delete, entire row).
Tentang cara hitung komisi intensif yang tetap mengacu (berdasar) nilai Gaji Pokok yang 100% bisa disesuaikan pada formula di G4 sheet database dan di-copy ke seluruh record yang ada disana. Wassalam, Kid. 2012/10/16 Darmoka Purba <[email protected]> > ** > > > *Yang terhormat,* > *Kepada Para Guru/master excel > * > Mohon bantuannya atas kebingungan saya[image: '@^@||| pusing] dalam > membuat aplikasi menggunakan macro excel[image: :( sedih]. > > Berikut penjelasan singkat : > SheetA (input) berisi, :: rate Komisi, rate Bonus, rate > lain-lain, rate insentif dan rate potongan pensiun (rate nya dalam > persentase). Ada juga Tabel Gaji per lama kerja. > > SheetB (perhitungan) berisi, :: > * Basic Information : Nomor > Id, Nama, Usia, Mulai kerja dan Lama kerja > * Perhitungan : Gaji > bruto, Insentif dan potongan pensiun > * Gaji Bulanan > > Formula : 1. Lama kerja = Year(Now()) – year(mulai > kerja) > 2. Gaji Pokok = Vlookup(lama kerja, > tbl gaji,2,false) > 3. Insentif = Input!rateinsentif * > Gaji Pokok > 4. Potongan pensiun > =input!ratepotonganpensiun * Gaji pokok > > 5. Komisi dari gaji pokok = > input!ratekomisi * gaji pokok > 6. Bonus dari gaji pokok = > input!ratebonus * gaji pokok > 7. lain-lain dari gaji pokok = > input!ratelain-lain * gaji pokok > 8. Total untuk gaji pokok = Gaji pokok + komisi dari gaji pokok + bonus > dari gaji pokok + lain-lain dari gaji pokok > Total untuk Insentif = Insentif + komisi dari insentif + bonus dari > insentif + lain-lain dari insentif > Total untuk potongan pensiun = Potongan pensiun + komisi dari insentif + > bonus dari insentif + lain-lain dari insentif > 9. Gaji bulanan = total untuk gaji pokok + total untuk insentif + total > untuk potongan pensiun > > SheetC (database) berisi , : : Portopolio : Nomor Id, Nama, > Usia, Mulai kerja, Lama kerja dan *GAJI BULANAN* > > Catatan : > 1. SheetB (perhitungan) berhubungan dengan SheetA (input) > 2. Nilai pada Input dapat berubah setiap bulan > 3. Nilai atau isi di SheetC(database) adalah data hasil paste yang > dicopy dari Access, kecuali Gaji Bulanan > > Pertanyaan : > > Bagaimana code macro agar ketika data di paste ke SheetC(database) dari > acces langsung secara terprogram mendapat hasil hitungan *GAJI BULANAN ?* > > Untuk lebih jelasnya, berikut saya lampirkan file Excelnya. > > Atas bantuannya[image: =D> tepuk tangan][image: =D> tepuk tangan][image: > =D> tepuk tangan][image: O:-) malaikat], sbelumnya saya ucapkan banyak > terima kasih. > > > Regards, > Moka > > > > > > > > >
re-Aplikasi perhitungan Gaji Bulanan.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet

