!!
*
*
*
*
2012/7/9 Mohammad Syafii piihs_klik_...@yahoo.com
**
sorry gan.
setelah saya coba cara dari ki semprul hasilnya masih sedikit ngawur
hasil penjumlahannya bukan di jumlahkan tapi ditambahkan di belakangnya
isi ku lampirkan file-nya
tolong gan solusinya
Klik Kanan pada cell(s) memang menimbulkan PopUp Menu; Tetapi bila yg
muncul bukan menu bawaan excel maka biasanya ada makro yg
mempengaruhinya yaitu (salah sau dari prosedur spt di bawah ini)
di Module level Sheet
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
Subject kok HELP ME ! Jadi Topiknya apa dong ??
Lagi pula ini kan sudah diatur di Peraturan Milis, Pernah dibaca kah ?
* caranya supaya setiap saya masukkan angka di textbox1 dan saya enter
textbox 6
langsung menunjukkan hasilnya dan seterusnya begitu juga dengan
textbox11
*
Syarat untuk
Barangkali cara paling sederhana: Tiap record hanya mencatat bulan yang sama
misal jika hotel X dihuni tgl 29 Maret 2011 sampai 2 April 2011. maka
dicatatnya 2 kali
yaitu mencatat penjualan MARET dan penjualan APRIL
dengan data spt itu SUMPRODUCT juga akan jalan dengan gampang..
Jawaban ini
KALAU MAU: lihat-lihat-lah juga posting² lawas, misalnya:
http://tech.groups.yahoo.com/group/belajar-excel/message/17774
Thead ini berisi 12 posting membahas Login untuk membuka file
dan tiap user hanya dapat melihat 1 sheet yg memang menjadi haknya
(kecualiuser ber nama boss
Sebelumnya Login
lampiran ketinggalan, maaf
2012/7/3 Ki Semprul semprul...@gmail.com:
Nyok kita coba rumus yg memanfaatkan Fungsi COUNTIF nyoook..
=COUNTIF($D$3:$D$9,* C12 *)
=COUNTIF($D$3:$D$9,* C13 *)
Semprul..Ki!
2012/7/3 nyok Nyok nyo...@yahoo.com
Saya masih sangat awam ttg excel, mohon dibantu
Pak Hendrik,
Ini hanya berdasar apa yg ki Semprul alami saja
MenSelect Range / mengaktifkan 1 Cell, Sheetnya harus sudah AKTIF lebih
dulu.
Menuliskan [B!C1] memang lebih lamban karena [ ] katanya adalah perintah
evaluasi
Jadi saya kira jika memang suatu range akan di SELECT pilihan ke 2 paling
Nyok kita coba rumus yg memanfaatkan Fungsi COUNTIF nyoook..
*=COUNTIF($D$3:$D$9,* C12 *)
=COUNTIF($D$3:$D$9,* C13 *)*
*
*
*Semprul..Ki!* *
*
2012/7/3 nyok Nyok nyo...@yahoo.com
**
Saya masih sangat awam ttg excel, mohon dibantu.
Bagaimana formula untuk menjumlah berdasarkan 1 (satu)
ooo begitu, itu memang terserah pemakainya, member lain hanya menyodorkan
alternatip-alternatip;
nyang penting pemakai memahami isi mangsudnya
=*SUMIFS*($D$6:$D$25,$C$6:$C$25,=$D$2,$C$6:$C$25,=$D$2)
=*SUMPRODUCT*($D$6:$D$25*($C$6:$C$25=$D$2)*($C$6:$C$25=$C$2))
bisa dilihat sendiri apanya yang
Anda dianggap pakai excel 2003 (habis gak kirim contoh sih)
Semua cells pada sheet ybs di format dulu: LOCKED dan (kalau perlu) HIDDEN
Menu: Format Cells Pilih Tab Protection...
Locked = mengenai cellnya apakah nantinya (setelah sheet diproteksi) bisa
diubah atau tidak
Hidden = menenai
dimungkinkan , menggunakan macro juga tidak apa2. :-)
Sebelumnya saya haturkan banyak terima kasih atas bantuannya,
regards,
Rkn
fungsi Baris Terakhir.PNG
menampilkan nr record terakhir (Ki Semprul).xlsb
Description: Binary data
sedang ada workshop yang sangat tight waktunya.
Salam,
Ratno
Memberi delimiter pada tempat yg memang diperlukan (Ki Semprul).xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
database yang berbeda
file terlampir
wassalam
faisal*
fungsi Baris Terakhir.PNG
menampilkan nr record terakhir (Ki Semprul).xlsb
Description: Binary data
Mohon maaf, ada sebaris kata (baris 2) dlm posting Ki Semprul yg bisa
ditangkap secara salah, saya ingin memperbaiki:
*Tertulis*
(karena mau membuat versi yg pendek = blum 'jegoss'.. ha ha ha..)
*seharusnya / lebih lengkap:*
(karena KI SEMPRUL mau membuat versi yg pendek = blum 'jegoss'.. ha ha
/ mendownload lampiran
*http://www.mail-archive.com/belajar-excel@yahoogroups.com/ *
(memang tidak semua files bisa ditemuka karena mail archive pernah ada
perubahan setting)
atau (sejak 25-Apr-2011) bisa juga di :
*http://milis-belajar-excel.1048464.n5.nabble.com/ *
Selain itu, Ki Semprul, dlm
Maaf bukan suhu ikut menjawab..
Setahu saya, Conditional Formatting ialah format cells / range (yg
menyangkkut warna latar, warna style font, borders) yg dapat berubah-ubah
otomatis MENURUT BEBERAPA KONDISI.
Misalnya jika suatu cell berisi data bilangan *bernilai diatas 100* warna
latarnya
(kenapa gak bilang?) carilah padanan nya
[image: Inline image 2]
Ki Semprul
*2012/4/13 Faiz Fay faiz...@yahoo.com
Dear Master excel yang terhormat.
Bagaimana cara meng-lock/unlock formula dalam sel tertentu.
Tolong pencerahannya dan terimakasih sebelumnya.
Fay *
format cells.JPG
=INDEX($B$3:$B$4, MAX(ISNUMBER(FIND(*$B$3:$B$4*,E3))*{1;2}) )
Semprul..Ki!!
*
*
*2012/4/13 Yusril Ramadani yusrilramad...@gmail.com
*
* *
* *
*Dear para pakar *
*Mohon bantuannya formulasi pengelompokkan data dengan melihat undur yg
sama di deskripsinya*
*Contoh deskripsi yg ada unsur
/a6aeaa8d37bdc0666a58
'--Daftar Fungsi di Excel 2003
http://www.box.com/s/d636d17c1681b69b22bb
'-- Link berguna dlm belajar fungsi --
' penjelasan langsung praktek di sheets, downloadable..
http://www.xlfdic.com/
2012/4/11 Mulki mu...@aop.component.astra.co.id
**
Mohon maaf ki semprul, saya
Kata yg benar, katanya REMUNERASI
Apa bukan pekerjaan konsultan tuh mbak ? Tapi kalau mampu menyusun sendiri
tentunya lebih oke..
Ingat uwak saya yg th 80 an bekerja di suatu bank besar (sekarang sudah
dimerger menjadi bk mandiri)..
Biro personalia-nya diberi tugas menyusun system penggajian baru
kalau mau dipanjang-panjangkan
array formula:
=INDEX(B$1:$U$1,MATCH(FALSE,B$1:$U$1=0,0))
Tapi pakailah rumus dari pak Raya yg praktis itu..
2012/4/11 Arie Bowo Witjaksono arie_...@yahoo.com
Dear Pakar Exceller,
Saya ingin mengambil sebuah deret data dengan kondisi jika deret
pertama
wadauw.. ! kok *subject-nya diganti *ya Mas Mulki ini,
padahal masih membicarakan topik yg sama; jadi pecah deh Threads-nya...
hiks..
(lihat Peraturan Milis pasal LAIN-LAIN / Sub Saran Tips / Ayat (b)
KUTIP:
*LAIN LAIN: *
*==
Ikut senang, bahwa suatu jalan akhirnya telah ditemukan, Asal jangan
salah tangkap maksud saja..
Maksud pak Kusnadi = begitu; ditangkap oleh pak Sarma = begini
Menurut penangkapan aki.. maksud pak Kusnadi adalah: suatu dokumen
( workbook Excel ) yg *sudah siap, sudah JADI, yaitu hasil
Ysh Bapak Dayat Shogun...
Bapak datang sbg pendekar bertangan kosong, tak selembar data pun
diajukan sbg contoh
(misal oret-oretan yg KATANYA sudah mengikuti prosedur yg
disarankan, seperti apa ?)
- padahal kasus yg Bapak ajukan adalah kasus yg sudah lewat 1 bulan y.l
(
Masalah sebelum ini re: Std Apllikasi 1 Mar 2012; tanggapan mas Huda
Yusmaul
dan neng iHaps: 2 Mar 2012)
http://tech.groups.yahoo.com/group/belajar-excel/message/16046 +1644 dan
16048
tidak ada *kabar-kabur-kubur*nya. jangankan anggukan, gelengan pun tak
ada...
(ternyata sebagian yg ditulis
atau genap; juga
harus ditebak
apakah bilangan positif ataukah negatif.
CONTOH Penyelesaian VBA, dengan memanfaatkan struktur Select Case
Sub TebakBilangan_diA1()
' Ki Semprul mainan SelectCase
Dim GanGen As String
Dim PosNeg As String
Dim Katego As String
GanGen = IIf(Cells(1).Value
Sampai dengan email terakhirpun Sdr Pecut tetap bertahan dengan gigih:
TIDAK SUDI MENJAWAB permintaan : *References apa yg MISSING ??*
*
*
Barangkali ADA kan bisa untuk bahan menjawab .. walaupun belum tentu
dapat menyeleswaikan masalah...
Masalah yg Pak Pecut hadapi kemungkinan besar bukan
bagian-bagian dari suatu tabel dapat di pisah2 lalu ketika mau dicetak
disatukan lagi
agar terasa lebih jreng... bisa pakai makro
sementara tiap bagian (sebelum disatukan) = bebas boleh dibuat
'mulur-mungkred'
(jumlah rows nya)
coba mas saif lihat posting beberapa hari y.l barangkali cusok..
Katanya (karena suatu sebab) ada library yg tidak dapat di loaded.
Kalau mau, ceklik menu Tools References.. (jika sedang tidak ada
prosedur yg sedang di RUN)
Tolong dilihat pada dialogbox 'References' barangkali ada MISSING REFERENCE
Tugas anda membuat VBA mengetahui tempat beradanya
*Minimum Bersyarat* - rasanya sudah sering di gelar di sini
*Array Formula*
=MIN(*IF($A$4:$A$99=F4,$B$4:$B$99)*)
dimana F4 adalah Nama Equipment (salah satu nilai yg ada di Kolom A4:A99)
*Semprul..Ki!*
2012/3/15 hartini...@yahoo.co.id
**
Met malam,
Mohon bantuannya, saya memiliki data
oops salahh,
mangap ..
harusnya ada syarat di atas 0
agar minimum tidak memilih angka 0
=MIN(IF(($A$4:$A$99=$F4)*(B$4:B$990),B$4:B$99))
*Semprul..Ki!*
jangan janganmasih salah...
2012/3/16 Ki Semprul semprul...@gmail.com
*Minimum Bersyarat* - rasanya sudah sering di gelar di sini
pakai rumus juga bisa pakai vba bisa banget
kalau dengan formula, kira-kira spt ini:
*=IF(ISNUMBER(SMALL(IF(B4:B80(blank),ROW(1:77)),ROW(1:77))),*
* INDEX(B4:B80,SMALL(IF(B4:B80(blank),ROW(1:77)),ROW(1:77))),)*
*
*
*array formula* multi-hasil / ditulis sekaligus pada 77 cells sekolom
kalau di
rumus iseng-iseng / iseng-iseng rumus
*=IF(SUM(A2:O2)=0,,*
* SUBSTITUTE(
TEXT(--CONCATENATE(A2,B2,C2,D2,E2,F2,G2,H2,I2,J2,K2,L2,M2,N2,O2),*
* 00-000-000-0-000-000),-,.)**)*
jika hasil HARUS berada di sheet lain; rujukan ke *=A2* diganti *=**
DTB!A2* dst..
bagian Biru
pak Ade maupun teman-teman lain menginginkan *contoh kasus nyata*
(atau *data-data yg nyata*) dlm sheet
- *ada contoh data (input) / tabel referensi / given values*
- *ada syarat2 / kondisi yg jelas*
- *kalau perlu ada gambaran hasil yg diinginkan*
dengan hanya bilang metode variasi
bukankah yg akan dievaluasi ada di sheet DTB
mengapa anda sulit sekali menuliskan *=IF(SUM(DTB!A5:O5)*
malah menuliskan *=IF(SUM(A5:O5) *
jika ditulis di sheet DTB(2) tentunya merujuk ke A5:05 di sheet DTB(2)
sedangkan isi A5:05 di sheet DTB(2) bukan bilangan yg bisa di SUM
*Semprul..Ki!*
Private Sub Semprul_Sum_Bersyarat()
Dim TabRef As Range, Items
Dim i As Integer, Totaal As Long, r As Long
Set TabRef = Range(B6).CurrentRegion
Items = Array(MAKANAN, MINUMAN)
For i = 0 To UBound(Items)
Totaal = 0
For r = 2 To TabRef.Rows.Count
'
Kasus ini sudah beberapa kali dijelaskan di milis
yang terakhir masih dapat anda lihat di msg list tgl 1 Feb 2012
http://tech.groups.yahoo.com/group/belajar-excel/message/15549
Atau kalau Jarum Black ingin mendapatkan file lemper-nya, sebaiknya ke sini
*1 :*
Sesuai wisik (bisikan ghoib) dari si empunya project (ctv, yg sedang
mengasingkan diri (semoga lekas sehat kembali ya mbak...)
katanya begini:
Prosedur ini ( ada di dalam module Frm_NewUser)
Sub SaveIt(sUser As String, sPass As String, sSheet As String)
With Sheets(User)
iRow =
Lha... itu kan sudah ada rumusnya
=SUM(OFFSET($C$6,0,0,1,C9))
tinggal memperbaiki sedikit menjadi:
*=SUM(OFFSET($B$6,0,C8,1,C9-C8+1))*
*Semprul..Ki!*
2012/3/1 sepriansyah encep citra_en...@yahoo.co.id
**
Dear All.
Mohon pencerahannya,
Bagaimana menjumlahkan dalam suatu range tertentu
maukah pak encep menambahkan info ke milis
[image: Inline image 1]
arti (bahasa indonesia-nya) *Bulan Achievement (ex B9)*
dengan bahasa yg masih ada hubungannya dengan *Mulai Bulan (ex B8)*
agar rumus-rumus yg kami ajukan dapat dibuat dengan gamfang
tidak ferlu mengira-kira arti Bulan
=IF( OR( yayaya=kosong, yeyeye=kosong), , rumus_lama )
mungkin si deni ini member lama yg setatusnya sudah UnModerated
sehingga bisa lolos postingnya walaupaun OGAH menuliskan masalahnya di
BADAN eMail
semprul.. Ki!
2012/3/1 deni ramdhani alkuninja...@yahoo.com
terlampir data excel, mohon
sebaiknya kita menyebut VBA sebagai VBA jangan VB
karena VBA bukan VB walaupun masih sodaranya)
problem:
* agar rumus pada kolom lookup tidak terlihat gimana caranya*
*Cara1,*
Dengan meng-asumsi-kan: tabel di kolom O:P itu data di kolom O nya
pasti angka urut 1,2,3,... dst
Kelemahan makro ini
saya juga melihat even baru : Set TabelRef =
Range(O9).CurrentRegion apa batasan kolom terbaca terus sesuai
*
*batasan kolom tabel yg dibuat? atau klw nambah data pada tabel lookup
akan terbaca juga?*
*
*
*salam
*
*neza
*
*
*
--
*Dari:* Ki Semprul
Dear A,
Biasanya untuk soal seperti ini digunakan fungsi WORDAY
Sayang-di-sayang; sampeyan *tidak berkenan* kirim contoh data-set-nya
(knape si..?)
Misalnya ADA, kita akan berusaha sharing formula yg sesuai dengan data set
tsb
(sharing itu, katanya, memerlukan keikhlasan dari semua pihak yg
Lha ini kan sudah sering moencoel !
Coba pakai rumus ini
=SUBTOTAL(2,*D$4:D4*)
jrngng...
(seperti suara gitar ibanez)
*catatan gak penting: *
Kolom yg diSubtotal dengan fungsi 2/ count; (dlm contoh kolom D)
harus kolom yg pasti PENUH yaitu sekolom dlm tabel yg tidak ada cell
kosongnya
dan
coding dipanjang-panjangkan biar panjang..
di tulis di module sheet terkait
Private Sub Worksheet_Change(ByVal Target As Range)
Dim iKol As Integer, sms As String
If Target(1).Address = $F$2 Then
If WorksheetFunction.CountIf(Range(G6:IP6), Target(1)) 0 Then
iKol =
Kalau tidak salah sangka, ini sepertinya hanya main IF-IF-an saja
*=IF($C7=0+SUBSTITUTE(D$6,Kategori,),1,)*
[image: Inline image 1]
*Substitute* tugasnya hanya *mengganti *karakter
semula: *Kategori1000*, jika *Kategori*nya diganti * [blank]* lha
kan tinggal *1000 *- nya
*Semprul.. Ki!*
Dibuat sbg *prosedur Sub* saja, jangan prosedur Fungsi.
Jadi penulisannya ke range selalu PAS dengan jumlah temuan
On Sat, Feb 25, 2012 at 7:36 AM, nor hidayat dayatshogu...@yahoo.co.id
wrote:
Mohon bantuan exceler untuk masalah array
Macro List file yang saya gunakan seperti dibawah ini.
*
*
*
*
*
2012/2/15 Ki Semprul semprul...@gmail.com
*start*
=MIN(IF(F20:Q20 0, $F$16:$Q$16))
dan:
*finish*:
=EOMONTH(MAX(IF(F20:Q20 0, $F$16:$Q$16)), 0)
Kedua-nya adalah *Array Formula ! * sekali lagi: *Array Formula*
Pada formula tsb, tanda pemisah argument dlm fungsi: , (KOMA), mungkin
harus
*start*
=MIN(IF(F20:Q20 0, $F$16:$Q$16))
dan:
*finish*:
=EOMONTH(MAX(IF(F20:Q20 0, $F$16:$Q$16)), 0)
Kedua-nya adalah *Array Formula ! * sekali lagi: *Array Formula*
Pada formula tsb, tanda pemisah argument dlm fungsi: , (KOMA), mungkin
harus anda ganti dengan ; (titik koma), sesuai regional
makronya bukan tak ada, melainkan tersembunyi
( module² makro dapat disembunyikan (locked for viewing) dan diberi
password.
pak hendrik (dan members lain) melocked VBA-project-nya bukan tanpa maksud
tetapi beliau mengharapkan anda menulis sendiri makronya seperti contoh yg
*sudah di dituliskan*
Di Word - nya, mungkin
{ MERGEFIELD Date_PKWT }
dapat anda ganti dengan:
{ Date_PKWT \@ h:mm am/pm, , d }
Lebih lengkapnya.. anda dipersilakan mengunjungi minimal salah dua sites
ini (Kalau Mau!..)
http://www.ehow.com/how_4619985_numbers-ms-word-mail-merge.html
...@hotmail.com
*
* *
*Dear Be-exceler,
Fungsi apa yang tepat, untuk memberikan evaluasi sebagai berikut.
Sudah mencoba memakai fungsi IF, dan If-Hlookup tetapi hasil yang
diperoleh jauh dari sempurna.
Thank a lot for your advice.
Best regards,
Ratno*
Fungsi IF dan COUNTIF (Ki Semprul).xlsx
oops salah...!
tertulis
dapat anda ganti dengan: { Date_PKWT \@ h:mm am/pm, , d }
seharusnya
dapat anda ganti dengan: *{ Date_PKWT \@ / }*
On Mon, Feb 13, 2012 at 9:47 PM, Ki Semprul semprul...@gmail.com wrote:
Di Word - nya, mungkin
{ MERGEFIELD Date_PKWT }
dapat anda
Langsung saja menjawab walaupun mungkin salah
Rumus Mr. Kid Oke banget, Top Markotop, Mantabs Surantabs...
tetapi mari kita coba dgn PDKT lain
( 1 )
*=MAX(IF(A3:A10=C3,ROW(1:8))) - LARGE(IF(A3:A10=C3,ROW(1:8)),2)*
Array Formula ini mengasumsikan data yg ditanyakan (kriteria) ditulis di
mengapa image yg anda tempelkan ke sheet kok sizenya 1 MB atau lebih?
apa tidak bisa di kecilkan dulu baru ditempelkan ?
*On Wed, Feb 8, 2012 at 11:03 AM, Aliif Akbar aliif.ak...@yahoo.co.id
wrote:
Selamat siang,
Dear master XL, mau tanya, saya ada file excel yang bergambar, tapi
ketika
Setting = English(US)
Jika makro ini tidak bagus jalannya di pc pak mansor berarti kemungkinan
besar
Regional Setting pak mansor = Indonesian / atau regional lain yg
menghasilkan
simbol pemisah disimal = KOMA (bukan TITIK)
Sub *FilterBulan*(KriTGL As Date)
* ' Ki Semprul - 30 jan 2012
dikehendaki penanya..
Ki Semprul (semprul, Ki!)
2012/1/30 widodo aji boss...@yahoo.com
**
Thanks untuk file yang dibuat, btw ada sedikit kesalahpahaman mengenai
diskon ratenya.
Untuk diskon, hanya diberikan jika total lama tinggal (total untuk semua,
baik low high maupun peak) lebih dari 7 hari dan
Ki semprul
bikin menjadi seperti ini :*
* *
={SUM(IF(('data entry'!$D$3:$D$15=C$25)*('data
entry'!$C$3:$C$15=C$26)*(('data entry'!$K$3:$K$15)24);1))}
* *
*Tetapi masih ada kendala jika ada nama yang sama dengan jam masing2
lebih dari 24 jam*
*maka akan di hitung 2, inginnya dihitung 1 saja
pakailah fungsi *ConcatIf *( pinjaman dari *boss siti *)
(singkatan dari ConcatenateIf; = penggabunan bersyarat )
=ConcatIf($A$2:$A$9,F2,$B$2:$B$9)
kalau sempat dan berkenan lihatlah posting lawas di toko sebelah:
ini link-nya http://tech.groups.yahoo.com/group/XL-mania/message/13436
sudah
termasuk Removable (?) Employee, he
he... (spidol.. kali !?)
Mohon ampun kalau salah,
hormat kami
Ki Semprul (Semprul.., ki!)
--
From: i Haps hapsari.stlizb...@gmail.com
Date: 2012/1/25
Subject: Re: [belajar-excel]mensummary data tanpa pivot table
To: belajar-excel@yahoogroups.com
TANGGAL-BULAN-TAHUN
VI-IX-MMXI
XVIII-VII-MMXI
XXIII-XI-MMX
VI-V-MMXI
XIX-II-MMX
XVIII-IX-MMX
Ingin hasil (data tanggal) tidak harus diformat
06-Sep-2011
18-Jul-2011
23-Nov-2010
---dst---
Mohon bantuan RUMUS yg paling praktis, mohon jangan makro dulu...
Ki Semprul
62 matches
Mail list logo