Re: [belajar-excel] Jumlah dengan VBA

Hai Baguse,

Dalam script Anda sudah ada variabel object bernama area_formula yang berisi 2 kolom yang akan diberi formula perkalian data.

Grand total per kolomnya dari seluruh baris berformula memiliki formula Sum( alamat range yang di-sum )

Baris kode yang sudah Anda buat adalah pada bagian yang berbunyi :
"=sum( j:J )"

Bagian yang dibiru diganti dengan :

" & area_formula.resize(,1).address(false,false) & "

Maka akan menjadi :
"=sum( " & area_formula.resize(,1).address(false,false) & " )"

Jadi, area_formula diubah luasannya menjadi 1 kolom dan sekian baris yang ada. Kemudian diambil teks (string) alamat range-nya dengan properti Address disertai pelepasan absolute reference sisi baris dan kolom oleh bagian (FALSE,FALSE) -> [baris,kolom]

Jika grand total per kolom ini akan diletakkan di J1 dan K1, maka baris kode

Range("L3").Value = "=sum( j:J )"

diubah menjadi :

Range("j1:k1").formula = "=sum( " & area_formula.resize(,1).address(false,false) & " )"

Pada kasus pemasangan formula grand total per kolom ini :
1. Apa untungnya diletakkan di baris 1 ?

** dengan header data di baris 3, maka proses penentuan variabel area_formula yang menggunakan properti currentregion tidak perlu berubah karena baris 2 tetap kosong.

2. Bagaimana jika tetap ngotot harus diletakkan di baris 2, yaitu pada J2:K2

** sebelum pendefinisian variabel range area_formula harus dilakukan clear pada baris 2 lebih dulu agar proses currentregion bisa tetap menghasilkan area_formula yang tepat.
** proses clear baris 2 ini diletakkan setelah baris deklarasi bariabel. Baris kode tersebut adalah :

rows(2).clearcontents

** kemudian, alamat range peletakan formula adalah di j2:k2, sehingga baris kode yang tadinya berbunyi :

Range("j1:k1").formula = "=sum( " & area_formula.resize(,1).address(false,false) & " )"

berubah menjadi :

Range("j2:k2").formula = "=sum( " & area_formula.resize(,1).address(false,false) & " )"

:)

Wassalam,

Kid.

2013/11/10 dhen.baguse <bagusejogja@yahoo.com>

Salam Exceler.....

Saya coba belajar VBA tentang VBA Formula di http://b-excel.blogspot.com/2013/11/belajarvba-012-formula.html dari situ ada yang menarik dicoba untuk saya kembangkan sesuai butuh saya, dan saya coba untuk mengembangakannya dan dari coba coba tersebut timbul maslaah..:). Saya mencoba menambahi rumus sum/tambah untuk kolom J yang hasilnya dikolom L dan hasilnya lancar, yang saya tanyakan bagiaman VBAnya jikan yang dijumlah kolom J4 sampai tidak tau data samapi baris ke berapa dan hasilnya juga di kolom J2. Jika menggunakan rmus sum(J:J)hasilnya erorr..

mohon masukkannya untuk exceler di millis ini..

maturnuwun.. wassalam

__._,_.___

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

Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___