Bls: [belajar-excel] menemukan baris terakhir di kolom tertentu

2014-02-12 Terurut Topik achmad adi
mohon maap,,,unutk mR.kid,,,apabila krusor yang dimaksd hanya kolom C tanpa 
melihat posisi terakhir kolom B terimakasih sebelumnya,,,ini saya lampirkan 
file nya





Pada Selasa, 28 Januari 2014 20:21, Mr. Kid mr.nm...@gmail.com menulis:

 
Coba :
Public Sub NextData(Optional bState As Boolean = False)
    With Sheet1.Shapes(Application.Caller).TopLeftCell.Offset(1).CurrentRegion
    Cells(.Resize(1, 1).Offset(.Rows.Count, 1).Row, 3).Activate
    End With
End Sub

Wassalam,
Kid.





2014-01-28 achmad adi dido...@ymail.com


 
terimakasih banyak Mr. Jam Raisin
kalo Next Data nya ada di Banyak tabel bagaimana?
saya lampirkan file nya...
terimakasih sebelumnya..






Pada Selasa, 28 Januari 2014 16:10, Jan Raisin miss.jan.rai...@gmail.com 
menulis:

 
coba 3 baris script ini ditulis pada sebuah modul


Sub NextData()
    Cells(Rows.Count, 3).End(xlUp).Offset(1).Select
End Sub


lalu di-assign ke sebuah shape yang berada di depan cel B2 s.d D2
file terlampir




-Miss Jan Raisin-


Pada 28 Januari 2014 15.44, achmad adi dido...@ymail.com menulis:


 
Dear master,,,
mohon bantuanya,,,untuk menemukan baris terakhir pada kolom tertentu,,,dengan 
bantuan sell tertentu,,,kalo pake hyperlink,,,apabila ada data msuk.,,,gak 
bisa ke baris terakhir,,

saya lampirkan file contoh,,,


sebelumnya saya ucapkan terimakasih..





re-mencari+baris+terakhir.xlsm
Description: application/download


[belajar-excel] Sumif vlookup [1 Attachment]

2014-02-12 Terurut Topik jackie yunianto

dear teman semua,
mohn bantuannya untuk case yg saya hadapi berikut, karena selalu muncul 
hasilnya menjadi 0,

thx


SUMIF.xls
Description: MS-Excel spreadsheet


Re: [belajar-excel] menemukan baris terakhir di kolom tertentu

2014-02-12 Terurut Topik Mr. Kid
Tambahkan .End(xlUp) sebelum .Activate

Wassalam,
Kid.



2014-02-12 13:27 GMT+07:00 achmad adi dido...@ymail.com:



 mohon maap,,,unutk mR.kid,,,apabila krusor yang dimaksd hanya kolom C
 tanpa melihat posisi terakhir kolom B terimakasih sebelumnya,,,ini saya
 lampirkan file nya



   Pada Selasa, 28 Januari 2014 20:21, Mr. Kid mr.nm...@gmail.com
 menulis:

  Coba :
 Public Sub NextData(Optional bState As Boolean = False)
 With
 Sheet1.Shapes(Application.Caller).TopLeftCell.Offset(1).CurrentRegion
 Cells(.Resize(1, 1).Offset(.Rows.Count, 1).Row, 3).Activate
 End With
 End Sub

 Wassalam,
 Kid.



 2014-01-28 achmad adi dido...@ymail.com


  terimakasih banyak Mr. Jam Raisin
 kalo Next Data nya ada di Banyak tabel bagaimana?
 saya lampirkan file nya...
 terimakasih sebelumnya..



   Pada Selasa, 28 Januari 2014 16:10, Jan Raisin 
 miss.jan.rai...@gmail.com menulis:

  coba 3 baris script ini ditulis pada sebuah modul

 Sub NextData()
 Cells(Rows.Count, 3).End(xlUp).Offset(1).Select
 End Sub

 lalu di-assign ke sebuah shape yang berada di depan cel B2 s.d D2
 file terlampir


 -Miss Jan Raisin-


 Pada 28 Januari 2014 15.44, achmad adi dido...@ymail.com menulis:


  Dear master,,,
 mohon bantuanya,,,untuk menemukan baris terakhir pada kolom
 tertentu,,,dengan bantuan sell tertentu,,,kalo pake hyperlink,,,apabila ada
 data msuk.,,,gak bisa ke baris terakhir,,
 saya lampirkan file contoh,,,

 sebelumnya saya ucapkan terimakasih..










Re: [belajar-excel] Sumif vlookup

2014-02-12 Terurut Topik Mr. Kid
Hai Yunianto,

*** lain kali ndak usah pakai cc, bcc, atau to ke selain akun milis ya...

cell M3 diberi formula :
=SUMPRODUCT(ISNUMBER(FIND(TRIM(LOWER($H$3:$H$8)),LOWER(L3)))*$I$3:$I$8)-SUMPRODUCT(ISNUMBER(MATCH($E$4:$E$34,INDEX(ISNUMBER(FIND(TRIM(LOWER($H$11:$H$16)),LOWER(L3)))*$I$11:$I$16,0),0)*FIND(TRIM(LOWER($C$4:$C$34)),LOWER(L3)))*$D$4:$D$34)

Wassalam,
Kid.




2014-02-12 13:35 GMT+07:00 jackie yunianto tanfidzula...@yahoo.co.id:




 dear teman semua,
 mohn bantuannya untuk case yg saya hadapi berikut, karena selalu muncul
 hasilnya menjadi 0,

 thx
  



Re: [belajar-excel] Menampilkan Grafic dg bbrp kriteria

2014-02-12 Terurut Topik Jan Raisin
Wa'alaikumsalam wr. wb.,

pak Mulki, sudah coba fitur Pivot Chart?
langkah-labgkahnya sama dengan pembuatan Pivot Table, hanya saja hasil yang
ditampilkan sudah dalam bentuk grafik.

silakan dibaca teknis pembuatannya dari blognya mr. Kid (di milis ini yang
punya blog cuma mr Kid ya?)

jika nanti ada kesulitan, silakan ditanyakan kembali ke sini.

Wassalam,

-MJR-


Pada 12 Februari 2014 11.45, Mulki mu...@aop.component.astra.co.idmenulis:



 Assalamu'alaikum Wr. Wb.   Mohon bantuan rekan dan guru2
 B-Xlers  Saya memiliki data seperti dlm lampiran yg ingin
 ditampilkan dlm sebuah grafic dg ketentuan sbb :1. Menampilkan Qty
 Pesan (Kolom H)  Qty Terkirim (Kolom I) berdasarkan Tgl Actual Stuffing
 (Kolom K)2. Selain Qty tersbt jg ingin ditampilkan Nama Customer
 (Kolom C)  Brandnya (Kolom F) dg ketentuan, jika ada lebih dari 1 customer
 yg memiliki Tgl Actual Stuffing yg sama maka Qty Pesan  Qty Terkirim akan
 di Totalkan pada tanggal Stuffing yg sama trsbt.   Terimakasih atas
 pencerahan dari rekan2  guru2 B-Xlers.   Wassalam,

  



[belajar-excel] Mohon bantuan bagaimana caranya menggunakan formula if di vba

2014-02-12 Terurut Topik Fahri.S
Mohon bantuannya,... bagaimana caranya menggantikan formula if ke dalam vba
ini adalah contoh filenya Belajar_membuat_data.xlsm
http://milis-belajar-excel.1048464.n5.nabble.com/file/n5723691/Belajar_membuat_BKU.xlsm
  



--
View this message in context: 
http://milis-belajar-excel.1048464.n5.nabble.com/Mohon-bantuan-bagaimana-caranya-menggunakan-formula-if-di-vba-tp5723691.html
Sent from the Milis Belajar Excel mailing list archive at Nabble.com.

[belajar-excel] Extract Data dari Database

2014-02-12 Terurut Topik ChordJR
Assalamualaikum Wr. Wb.
 
 Minta bantuan dari pada master untuk coding macro yang sudah ada sebelum 
 saya bekerja,karena ilmu saya yang masih awam mohon di berikan coding 
 yang tepat...karena saya mencoba untuk membuat file baru dengan bagan 
 yang sama tapi tidak bisa bekerja...saya rasa mungkin ada kekurangan 
 pada macro ini...
 
 Option Explicit
 Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Row = 2 And Target.Column = 4 Then
 'calculate criteria cell in case calculation mode is manual
 Sheets(DATA).Range(Criteria).Calculate
 Worksheets(DATA).Range(database) _
 .AdvancedFilter Action:=xlFilterCopy, _
 CriteriaRange:=Sheets(DATA).Range(criteria), _
 CopyToRange:=Range(A8:Ay8), Unique:=False
 End If
 End Sub
 
 *Untuk Name Range pada sheet Data :
 criteria=DATA!$B$1:$B$2
 database=DATA!$B$4:$DJ$3
 
 Saya rasa dengan penjelasan singkat ini dapat di mengerti oleh para 
 master...karena untuk mengupload file terlalu besar sizenya...
 
 Wassalam,
 
 Indra
 
- Mods -
Sample data dengan ukuran = 250 KB akan lebih memudahkan calon penanggap
silakan kirim sample workbook, tidak harus data asli, jumlah data tidak perlu 
banyak
yang penting mewakili kasus yang ditanyakan.

Berikan juga keterangan, apa2 saja yang diinginkan termasuk contoh hasil manual




Re: [belajar-excel] Mohon bantuan bagaimana caranya menggunakan formula if di vba

2014-02-12 Terurut Topik Jan Raisin
Hai Facry,

ternyata threadnya adalah bagaimana menyingkat If bertingkat yang panjang
banget sepanjang kereta api babaranjang di pulau sumatera..
sebagai awalan, mungkin link
inihttp://excel-mr-kid.blogspot.com/2013/09/menyingkat-if-yang-puanjung-buanget.htmlbisa
memberikan sedikit pencerahan... formula biasa bukan vba

Salam,

-MJR-


Pada 13 Februari 2014 10.24, Fahri.S fahri_litb...@ymail.com menulis:



 Mohon bantuannya,... bagaimana caranya menggantikan formula if ke dalam
 vba ini adalah contoh filenya 
 Belajar_membuat_data.xlsmhttp://milis-belajar-excel.1048464.n5.nabble.com/file/n5723691/Belajar_membuat_BKU.xlsm
 --
 View this message in context: Mohon bantuan bagaimana caranya menggunakan
 formula if di 
 vbahttp://milis-belajar-excel.1048464.n5.nabble.com/Mohon-bantuan-bagaimana-caranya-menggunakan-formula-if-di-vba-tp5723691.html
 Sent from the Milis Belajar Excel mailing list 
 archivehttp://milis-belajar-excel.1048464.n5.nabble.com/at Nabble.com.

  



Bls: Bls: [belajar-excel] Re: Cara Membuat Search Engine

2014-02-12 Terurut Topik Dedi Komarudin
Mohon ijin, maaf ikut menyimak, menarik sekali apa yang di sampaikan Miss jan, 
bolehkah saya mendapatkan lampiran seperti yang di sampaikan Miss jan, saya 
susah menemukan lampirannya untuk bahan pembelajaran.

Terima kasih.

Salam 
Dedi Komarudin
 

 - Mods -
Mungkin file yang dari bisa didownload melalui link :
http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-Cara-Membuat-Search-Engine-td5719606.html
 
http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-Cara-Membuat-Search-Engine-td5719606.html

Nama filenya: MJR-Search Engine_v2.xlsb 

 
 Pada Kamis, 13 Februari 2014 8:28, Jan Raisin menulis:
 
   pak Harry,
 

 silakan dipelajari langkah-langkahnya berdasarkan email Jan yang anda quote 
untuk pertanyaan ini, atau berdasarkan file dari mbak Siti yang telah 
dikirimkan oleh pak Hendrik.
 

 Jika dirasa kurang jelas, mungkin anda bisa mulai dari link ini 
http://b-excel.blogspot.com/2013/06/belajarvba-000-kenalan.html
 Belajar sedikit-sedikit dari yang sederhana akan lebih bermanfaat dibandingkan 
ingin langsung menguasai semuanya tetapi tidak memiliki dasar yang kuat.
 

 Salam,
 

 -MJR-
 









 
 
 
 




Re: [belajar-excel] Mohon bantuan bagaimana caranya menggunakan formula if di vba

2014-02-12 Terurut Topik Fahri.S
makasi sebelumnya karna udh mau respon,... maksudnya gini,... pada sheet IBKU
adalah entry data, antara jumlah kolom IBKU dan ISPPD itu adalah sama
banyak. maksudnya bisa dak formula pada No BKU di ISPPD
*=IF(OR(IBKU!E8=Pengembalian Panjar,IBKU!E8=Pengembalian S P 2
D,IBKU!E8=Panjar,IBKU!E8=Tanpa
Panjar),,IF(OR(IBKU!H8=5.2.2.15.001,IBKU!H8=5.2.2.15.002),IBKU!A8,))*,
dirubah ke macro vba klu dia diautofilterkan dia akan terpaste spesial.
karna kalau dipakai copy formula dari atas ke bawah pada No BKU di sheet
ISPPD nya. filenya akan membengkak jadi puluhan MegaBite. nah,... dari
merujuk ke MB ni lah, bisa dak filenya jadi Kilobite.



--
View this message in context: 
http://milis-belajar-excel.1048464.n5.nabble.com/Mohon-bantuan-bagaimana-caranya-menggunakan-formula-if-di-vba-tp5723691p5723694.html
Sent from the Milis Belajar Excel mailing list archive at Nabble.com.


[belajar-excel] Formula Penyebaran Data [1 Attachment]

2014-02-12 Terurut Topik David Kurnia
Dear Master Excel,


Mohon bantuannya.
Saya ingin membuat laporan dengan kondisi sbb:
- Data terlampir ini ingin disebarkan ke dalam sheet laporan sesuai dengan kota 
keberadaannya dimana data tahun dan produksi juga sekaligus mengikutinya.
- Dan juga nomor yang muncul pada sheet laporan sesuai jumlah data yang 
terdeteksi pada tabel masing-masing

Terima kasih.
David

Coba-coba.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet


Re: [belajar-excel] Formula Penyebaran Data [1 Attachment]

2014-02-12 Terurut Topik Jan Raisin
Hai David,

coba susun data sehingga berkaidah database yang baik, bahan bacaannya bisa
dilihat di 
sinihttp://excel-mr-kid.blogspot.com/2011/02/susun-data-sebagai-tabel-yang-baik.html
setelah disusun sebagai tabel yang baik, maka coba manfaatkan fitur Pivot
table, bahan bacaannya bisa dimulai dari
sinihttp://excel-mr-kid.blogspot.com/2013/04/pivot-table-1-kenalan.html
sampai
dengan bagian yang ketiga

setelah itu lakukan filter sesuai dengan lokasi,
Pivot yang tadi bisa dicopas ke sheet lain lalu ubah lokasinya melalui
filter
jika ada perubahan data, cukup lakukan refresh pada pivot table pertama,
secara otomatis pivot table yang lain juga akan berubah sesuai dengan data
yang baru.

File terlampir sebagai awalan.. belum difilter, silakan difilter dan
dicopas sendiri ke sheet yang lain sesuai dengan keinginan

salam,

-Miss Jan Raisin-


Pada 13 Februari 2014 12.31, David Kurnia david.kurnia1...@yahoo.commenulis:



 Dear Master Excel,

 Mohon bantuannya.
 Saya ingin membuat laporan dengan kondisi sbb:
 - Data terlampir ini ingin disebarkan ke dalam sheet laporan sesuai dengan
 kota keberadaannya dimana data tahun dan produksi juga sekaligus
 mengikutinya.
 - Dan juga nomor yang muncul pada sheet laporan sesuai jumlah data yang
 terdeteksi pada tabel masing-masing

 Terima kasih.
 David
 __._,_._



re-Coba-coba.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet


[belajar-excel] RE: Cannot Insert ActiveX Control

2014-02-12 Terurut Topik hidup4jc
saya juga mengalami saat ini...cannot insert  object selalu keluar pesan error 
seperti itu.
kalau saya caranya register  active controlx  nanti arahin ke fm20.dll di 
windows/system32/fm20.dll  lalu open...jadi deh