Senin, 23 Mei 2011

[belajar-excel] Digest Number 1167

Messages In This Digest (14 Messages)

Messages

1a.

Re: Form Input dengan syarat-syarat (syarat di tabel dan di form)

Posted by: "Reza 2002" puhaba2005@yahoo.com   puhaba2005

Sun May 22, 2011 6:44 am (PDT)



Salam mas Mr.Kid....
Akhirnya setelah ngulik2 dan ngubek2 formulanya Mr.Kid dan dimodifikasi sana-sini VBnya, selesai juga Point of Sales yg saya inginkan... Makasi banyak mas Mr.Kid... d^^b

Hanya ada sedikit lagi yg ingin saya tanyakan nih.
1. Jika data transaksi di input tidak di baris pertama, tapi di baris kedua akan muncul msgbox "data ada yg kurang". Apakah harus diinput sesuai baris (baris 1, lalu baris 2, dst)? Mengapa tidak bisa sembarang (baris 1 kosong, baris 2 input)?

2. saya memodifikasi tombol VB mas Mr.Kid sehingga bisa melakukan 2 inputan di sheet yg sama dalam cell range yg berbeda dengan menggunakan satu tombol "simpan" saja. Jadi seperti ini VB tombol simpannya:

Private Sub CommandButton3_Click()
Dim lOffset As Long
Dim rngData As Range
Dim sMsg As String
Dim lNewRec As Long
Dim shtTrn As Worksheet

Application.ScreenUpdating = False
Application.EnableEvents = False

'LIST-TRX
Set shtTrn2 = Sheets("ListTrx")
shtTrn2.Visible = xlSheetVisible

ActiveSheet.Calculate
lOffset = Range("L3").Value

'copy formula validasi
lNewRec = Range("L5").Value
If lNewRec > 0 Then
Range("O3:W3").Copy Range("O6").Resize(lNewRec)
ActiveSheet.Calculate
End If

'cek hasil validasi
Set rngData = Range("O5")
If rngData.Value <> 0 Then
rngData.Offset(1, 2).CurrentRegion.Copy
shtTrn2.Range("a1").Offset(lOffset).PasteSpecial xlPasteValuesAndNumberFormats

sMsg = "Terima Kasih"
lOffset = vbInformation
Range("B6:B10").ClearContents
Range("O6:W10").ClearContents
Else
sMsg = "Transaksi Batal?"
lOffset = vbCritical
End If
ActiveSheet.Calculate
MsgBox sMsg, lOffset, "Kode Transaksi"

shtTrn2.Visible = xlSheetVeryHidden


'CUST-TRX
Set shtTrn3 = Sheets("CustTrx")
shtTrn3.Visible = xlSheetVisible

ActiveSheet.Calculate
lOffset = Range("M3").Value

'copy formula validasi
lNewRec = Range("M5").Value
If lNewRec > 0 Then
Range("O12:Y12").Copy Range("O14").Resize(lNewRec)
ActiveSheet.Calculate
End If
'cek hasil validasi
Set rngData = Range("O13")
If rngData.Value <> 0 Then
rngData.Offset(1, 2).CurrentRegion.Copy
shtTrn3.Range("a1").Offset(lOffset).PasteSpecial xlPasteValuesAndNumberFormats

sMsg = "Terima Kasih"
lOffset = vbInformation
Range("B14:B21").ClearContents
Range("E14:E21").ClearContents
Range("O14:Y21").ClearContents

Else
sMsg = "TIDAK ADA CUSTOMER?"
lOffset = vbCritical
End If
ActiveSheet.Calculate
MsgBox sMsg, lOffset, "Kode Customer"

shtTrn3.Visible = xlSheetVeryHidden

Application.ScreenUpdating = True
Application.EnableEvents = True

End Sub

Problem VB yg terjadi sbb: jika pada kolom inputan List Transaksi belum di input (masih kosong) dan tombol "simpan" diklik akan keluar message box "Transaksi Batal?". Ketika tombol OK diklik, proses VB akan berlanjut ke inputan Customer Transaksi. Jika kolom Customer Transaksi sudah diinput, proses akan berlanjut ke akhir dan data inputan kolom Customer Trx tersimpan.

Pertanyaannya: bagaimana caranya memunculkan mesage box dengan pilihan OK untuk lanjut ke proses berikutnya dan cancel untuk membatalkan proses VB yg terjadi setelah tombol "simpan" di klik jika salah satu kolom input belum terisi? Seperti apa kode IF...THEN...nya? Mohon pencerahan lagi nih mas...

Makasi atas perhatiannya dan pencerahannya,

Wassalam

1b.

Re: Form Input dengan syarat-syarat (syarat di tabel dan di form)

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Sun May 22, 2011 2:37 pm (PDT)



maaf ikut masuk threads...

tanpa melihat proses sebelumnya (karena tidak ada workbook yg dilampirkan)
contoh di bawah ini adalah hal yg baru sama sekali, tidak ada hubungan
dengan
macro yg dicontohkan pak Reza 2001;
Ini hanya contoh penggunaan Msgbox function yg* mencabangkan dua kemungkinan
*
*berdasarkan pilihan user* (di mana user pementukan pilihan dgn menceklik
Tombol)

Pencabangan bisa dengan menggunakan struktur IF-Then maupun Select Case
Tombol apa saja yg akan di"tempelkan pada MsgBox" dapat ditentukan melalui
argument / parameter = 'Button'
Tiap Tombol punya nilai (konstanta) tertentu, *bisa dilihat di Help Msgbox*
(salinannya saya lampirkan di sinihh..)

Nilai sebuah Button berupa datatype Long, tetapi anda akan lebih mudah
mengingat nilai
tsn dengan menggunakan constants nya misalnya vbYes, vbOK, vbNo, vbCancel
dsb..

Maaf kalau ternyata bukan seperti itulah yg sebenarnya ditanyakan..

'--------------------
Sub OK_Or_Cancel()

Dim ProsesSelanjutnya As Long, Pjlsn As String

Pjlsn = vbCr & vbCr & "OK" & vbTab & " = Lanjutkan Proses" & vbCr
Pjlsn = Pjlsn & "CANCEL" & vbTab & " = Batalkan Proses"

ProsesSelanjutnya = MsgBox("APA mau dilanjutkan, APA mau dibatalkan?" & _
Pjlsn, vbQuestion + vbOKCancel, "Minta Pendapat User")

*If ProsesSelanjutnya = vbOK* Then

MsgBox "Melajutkan Proses; coding ditulis di blok ini"
' bagian ini dituliskan coding proses yg dikehendaki

*ElseIf ProsesSelanjutnya* *= vbCancel* Then

MsgBox "Anda Pilih Membatalkan proses, Program di akhiri"
' dibagian ini tidak ada coding, selain memaksa
' program (sub) mengakhiri prosesnya
Exit Sub

*End If*

End Sub
'--------------------

karena hanya ada dua kemungkinan, maka statement :
*ElseIf ProsesSelanjutnya* *= vbCancel, *
sebetulnya bisa diganti dengan : *Else* saja.

di situ TIDAK digunakan* ELSE* dengan maksod hanya untuk
menunjukkan/menegaskan
penggunaan variable *'Proses selanjutnya'* (yg mewakili *Kemungkinan N**ilai
Button*
*yg diceklik*) dan *Aktual nilai Button yg terjadi*.

2011/5/22 Reza 2002 <puhaba2005@yahoo.com>

>
>
> Salam mas Mr.Kid....
> Akhirnya setelah ngulik2 dan ngubek2 formulanya Mr.Kid dan dimodifikasi
> sana-sini VBnya, selesai juga Point of Sales yg saya inginkan... Makasi
> banyak mas Mr.Kid... d^^b
>
> Hanya ada sedikit lagi yg ingin saya tanyakan nih.
> 1. Jika data transaksi di input tidak di baris pertama, tapi di baris kedua
> akan muncul msgbox "data ada yg kurang". Apakah harus diinput sesuai baris
> (baris 1, lalu baris 2, dst)? Mengapa tidak bisa sembarang (baris 1 kosong,
> baris 2 input)?
>
> 2. saya memodifikasi tombol VB mas Mr.Kid sehingga bisa melakukan 2 inputan
> di sheet yg sama dalam cell range yg berbeda dengan menggunakan satu tombol
> "simpan" saja. Jadi seperti ini VB tombol simpannya:
>
> Private Sub CommandButton3_Click()
> Dim lOffset As Long
> Dim rngData As Range
> Dim sMsg As String
> Dim lNewRec As Long
> Dim shtTrn As Worksheet
>
> Application.ScreenUpdating = False
> Application.EnableEvents = False
>
> 'LIST-TRX
> Set shtTrn2 = Sheets("ListTrx")
> shtTrn2.Visible = xlSheetVisible
>
> ActiveSheet.Calculate
> lOffset = Range("L3").Value
>
> 'copy formula validasi
> lNewRec = Range("L5").Value
> If lNewRec > 0 Then
> Range("O3:W3").Copy Range("O6").Resize(lNewRec)
> ActiveSheet.Calculate
> End If
>
> 'cek hasil validasi
> Set rngData = Range("O5")
>
> If rngData.Value <> 0 Then
> rngData.Offset(1, 2).CurrentRegion.Copy
> shtTrn2.Range("a1").Offset(lOffset).PasteSpecial
> xlPasteValuesAndNumberFormats
>
> sMsg = "Terima Kasih"
> lOffset = vbInformation
> Range("B6:B10").ClearContents
> Range("O6:W10").ClearContents
> Else
> sMsg = "Transaksi Batal?"
> lOffset = vbCritical
> End If
> ActiveSheet.Calculate
> MsgBox sMsg, lOffset, "Kode Transaksi"
>
> shtTrn2.Visible = xlSheetVeryHidden
>
>
> 'CUST-TRX
> Set shtTrn3 = Sheets("CustTrx")
> shtTrn3.Visible = xlSheetVisible
>
> ActiveSheet.Calculate
> lOffset = Range("M3").Value
>
> 'copy formula validasi
> lNewRec = Range("M5").Value
> If lNewRec > 0 Then
> Range("O12:Y12").Copy Range("O14").Resize(lNewRec)
> ActiveSheet.Calculate
> End If
> 'cek hasil validasi
> Set rngData = Range("O13")
>
> If rngData.Value <> 0 Then
> rngData.Offset(1, 2).CurrentRegion.Copy
> shtTrn3.Range("a1").Offset(lOffset).PasteSpecial
> xlPasteValuesAndNumberFormats
>
> sMsg = "Terima Kasih"
> lOffset = vbInformation
> Range("B14:B21").ClearContents
> Range("E14:E21").ClearContents
> Range("O14:Y21").ClearContents
>
> Else
> sMsg = "TIDAK ADA CUSTOMER?"
> lOffset = vbCritical
> End If
> ActiveSheet.Calculate
> MsgBox sMsg, lOffset, "Kode Customer"
>
> shtTrn3.Visible = xlSheetVeryHidden
>
> Application.ScreenUpdating = True
> Application.EnableEvents = True
>
> End Sub
>
> Problem VB yg terjadi sbb: jika pada kolom inputan List Transaksi belum di
> input (masih kosong) dan tombol "simpan" diklik akan keluar message box
> "Transaksi Batal?". Ketika tombol OK diklik, proses VB akan berlanjut ke
> inputan Customer Transaksi. Jika kolom Customer Transaksi sudah diinput,
> proses akan berlanjut ke akhir dan data inputan kolom Customer Trx
> tersimpan.
>
> Pertanyaannya: bagaimana caranya memunculkan mesage box dengan pilihan OK
> untuk lanjut ke proses berikutnya dan cancel untuk membatalkan proses VB yg
> terjadi setelah tombol "simpan" di klik jika salah satu kolom input belum
> terisi? Seperti apa kode IF...THEN...nya? Mohon pencerahan lagi nih mas...
>
> Makasi atas perhatiannya dan pencerahannya,
>
> Wassalam
>
>
>
1c.

Re: Form Input dengan syarat-syarat (syarat di tabel dan di form)

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Sun May 22, 2011 2:48 pm (PDT)



maaf
lampiran (berupa xls yg di compressed) ketinggalan .....

2011/5/23 STDEV(i) <setiyowati.devi@gmail.com>

> maaf ikut masuk threads...
>
> tanpa melihat proses sebelumnya (karena tidak ada workbook yg dilampirkan)
> contoh di bawah ini adalah hal yg baru sama sekali, tidak ada hubungan
> dengan
> macro yg dicontohkan pak Reza 2001;
> Ini hanya contoh penggunaan Msgbox function yg* mencabangkan dua
> kemungkinan*
> *berdasarkan pilihan user* (di mana user pementukan pilihan dgn menceklik
> Tombol)
>
> Pencabangan bisa dengan menggunakan struktur IF-Then maupun Select Case
> Tombol apa saja yg akan di"tempelkan pada MsgBox" dapat ditentukan melalui
> argument / parameter = 'Button'
> Tiap Tombol punya nilai (konstanta) tertentu, *bisa dilihat di Help Msgbox
> *
> (salinannya saya lampirkan di sinihh..)
>
> Nilai sebuah Button berupa datatype Long, tetapi anda akan lebih mudah
> mengingat nilai
> tsn dengan menggunakan constants nya misalnya vbYes, vbOK, vbNo, vbCancel
> dsb..
>
> Maaf kalau ternyata bukan seperti itulah yg sebenarnya ditanyakan..
>
> '--------------------
> Sub OK_Or_Cancel()
>
> Dim ProsesSelanjutnya As Long, Pjlsn As String
>
> Pjlsn = vbCr & vbCr & "OK" & vbTab & " = Lanjutkan Proses" & vbCr
> Pjlsn = Pjlsn & "CANCEL" & vbTab & " = Batalkan Proses"
>
> ProsesSelanjutnya = MsgBox("APA mau dilanjutkan, APA mau dibatalkan?" &
> _
> Pjlsn, vbQuestion + vbOKCancel, "Minta Pendapat User")
>
> *If ProsesSelanjutnya = vbOK* Then
>
> MsgBox "Melajutkan Proses; coding ditulis di blok ini"
> ' bagian ini dituliskan coding proses yg dikehendaki
>
> *ElseIf ProsesSelanjutnya* *= vbCancel* Then
>
> MsgBox "Anda Pilih Membatalkan proses, Program di akhiri"
> ' dibagian ini tidak ada coding, selain memaksa
> ' program (sub) mengakhiri prosesnya
> Exit Sub
>
> *End If*
>
> End Sub
> '--------------------
>
> karena hanya ada dua kemungkinan, maka statement :
> *ElseIf ProsesSelanjutnya* *= vbCancel, *
> sebetulnya bisa diganti dengan : *Else* saja.
>
> di situ TIDAK digunakan* ELSE* dengan maksod hanya untuk
> menunjukkan/menegaskan
> penggunaan variable *'Proses selanjutnya'* (yg mewakili *Kemungkinan N**ilai
> Button*
> *yg diceklik*) dan *Aktual nilai Button yg terjadi*.
>
>
>
2a.

Capture dengan Excel dan Web Cam bila ada slowmotion

Posted by: "Muhammad Robin" mrobin86@yahoo.co.id   mrobin86

Sun May 22, 2011 10:30 am (PDT)



Dear Be Exceler,

Mohon bantuannya, bagaimana cara mengkoneksikan excel dengan perangkat Web Cam, kemudian mengcapture secara otomatis bila pada object web cam terjadi gerakan. lalu menyimpan hasil capture di C:\data, dengan nama file adalah tanggal dan waktu capture terjadi.

Terima kasih banyak sebelumnya
Robin
2b.

Re: Capture dengan Excel dan Web Cam bila ada slowmotion

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Sun May 22, 2011 12:04 pm (PDT)



Bagaimana *menggunting rumput* di taman dengan VBA?

Orang berfikir: kan sudah ada "Gunting rumput" dan sudah ada VBA !!
Mengapa tidak bisa keduanya disuruh bekerjasama untuk melakukan task tsb?

Tetapi dlm mainan ini secara garis besar hendaknya diingat bahwa kita perlu
perantara, "tukang terjamah" bhs vba agar diketahui oleh si gunting rumput
dan kebalikannya.
Apa anda sudah mengenalnya (si perantara itu), apa memang ada, dimana dia,
siapa namanya, harus dibayar dulu atau gratisan, sudah punya pacar apa
belum
dst.., dst...

Sedangkan sebuah "Gambar Tombol" yg sudah tampak menempel di layar
komputer
pun: *masih memerlukan* sebuah OCX atau DLL atau entah apa namanya, agar
'tombol' tsb bisa diajak bermain main (dikendalikan melalui bhs pemrograman)

Kalau tidak seperti itu, alangkah besarnya VBA kalau semua hal harus diurus
dan
disediakan librarynya langsung di dalam VBA itu sendiri.
Setiap device membawa perangkat lunaknya sendiri, dan itu *jangan
tidak*kekenali.
Devices yg sudah terlalu umum memang sudah disediakan perangkat lunaknya
(device driver) oleh O/S (misalnya di Windows, keyboard dan mouse tinggal
colok,
karena windows sudah menyediakan drivers nya)

Dlm menanggapi pertanyaan spt ini, mungkin member lain akan tidak banyak
cing-cong
kalau mampu langsung membuatkan codingnya. Lalu si penanya (kalau segalanya
beres)
langsung dapat mempraktek-kan persis apa yg ditanyakan.

Tetapi nanti, manakala pertanyaan bergeser ke *"bgmana mengepel lantai
dengan VBA"*
("Saya sudah sediakan ember, cairan-disinfektan dan kain-pel nya, lho
mas..." )
pastilah dimulai lagi dari pertanyaan awal, sebab apa yg diberikan berupa
"program jadi" tadi ternyata bukan bahan* belajar-excel* yang pasti baik.

Untuk mulai menyukai proses, cobalah buka mesin pencari , misal google,
ketikkan misalnya (misalnya saja..)

VBA Excel Controlling WebCam
control webcam using VBA
atau lebih spesifik
VBA WebCam API

Ditanggung akan banyak url dimunculkan, walaupun banyak yg tidak cucok
dengan
keinginan tetapi banyak pula yg menuntun kita ke arah yg benar.

Di dalam ulasan2 yg akan kita temui, kadang masih merujuk lagi ke situs
lain,
bertingkat-tingkat, dan tidak ada jaminan bahwa akhirnya ketemu persis apa
yg
kita kenhendaki.

Dalam banyak hal, kitalah yg harus menggabung-gabung temuan dari sana sini,
sering akhirnya terbengkalai dan membuat frustasi; tetapi sering pula tiba
tiba anda
meloncat dan berteriak " horee aku berhasil"!!

--------------------------------
(note: tulisan ini sama sekali *tidak* melarang/ menutup kemungkinan members
lain untuk
memeberikan coding langsung jadi, bila memang sudah ada),
monggo silakan, kita belajar dengan cara kita masing masing...

2011/5/22 Muhammad Robin <mrobin86@yahoo.co.id>

> Dear Be Exceler,
>
> Mohon bantuannya, bagaimana cara mengkoneksikan excel dengan perangkat Web
> Cam, kemudian mengcapture secara otomatis bila pada object web cam terjadi
> gerakan. lalu menyimpan hasil capture di C:\data, dengan nama file adalah
> tanggal dan waktu capture terjadi.
>
> Terima kasih banyak sebelumnya
> Robin
>
>
3a.

Bls: [belajar-excel] Mencari Pasangan Bersyarat

Posted by: "abdul hafidz" a.hafidz@yahoo.co.id   a.hafidz

Sun May 22, 2011 7:29 pm (PDT)




Dear Master Kid

Thanks before atas pencerahannya ya........
Ada beberapa pertanyaan yg ingin saya ajukan :

1. Untuk rumus yg ini &ABS(F2) kenapa ko' harus seperti itu, kenapa tdk langsung
saja dgn F2.
2. Untuk rumus yg ini =COUNTIF($I$2:$I$448,IF(H2="C","D;","C;")&MID(I2,3,500))
kalo dlm bahasa manusianya gimana dan kenapa ko' tdk ada teks "MATCH" untuk
menyatakan kesamaan dlm rumus tersebut.
3. Kenapa lampiran yg master kid sampaikan ko' yg "MATCH" nya hanya ada di
Curency USD saja

4. Rumus tersebut saya jalankan di data aslinya yg serupa dgn lampiran tersebut,
akan tetapi kenapa ko' tdk ada yg menghasilkan "MATCH" satupun, seharusnya yg di
Curency USD kan sama dgn lampiran yg master kid sampaikan.
Kurang lebih seperti itulah master kid,
mohon maaf bila tdk berkenan

rgd
hafidz

________________________________
Dari: Mr. Kid <mr.nmkid@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Terkirim: Ming, 22 Mei, 2011 05:54:24
Judul: Re: [belajar-excel] Mencari Pasangan Bersyarat

Dear Hafidz,

Memerlukan id record yang berupa gabungan seluruh kriteria, sebagai bahan untuk
hitung cacah berkriteria (CountIF)
Kemudian menghitung cacah berdasyaratnya.

File terlampir.

Kid.

2011/5/21 abdul hafidz <a.hafidz@yahoo.co.id>

>Dear rekans2 bE eXcel
>Selamat malam semuanya........
>
>Mohon pencerahannya yah, dalam case ini heheheheheh.........
>
>begini casenya :
>Bagaimanakah rumus dalam mencari record yg sama dalam satu worksheet dgn
>beberapa kreteria...!
>
>Penjelasannya seperti ini :
>> Jika A2 s/d J2 (yang meliputi :
>>Branch-User-Account-Curency-Description-Ammount-Refrensi) ada yg sama dgn A3 s/d
>>J3 maka "MATCH" tentunya dgn syarat D(debet) dan C(Credit).
>
>Contoh hasil dari yg telah "MATCH" :
>Branch User Account Curency Description Ammount Refrensi Kreteria
>99119 8119044 19511601 USD 2399119000702402 10.00
> 0002399119000702402 D Match
>
>99119 TL8119013 19511657 USD CREDIT IBT SUSPENSE ISSUING BRANCH
>(10.00) 0002399119000702402 C Match
>
>Kurang lebih seperti itulah penjelasannya,
>Mohon Pencerahannya yach.........
>
>Maaf bila tdk berkenan
>trims
>rgds
>hafidz

3b.

Re: Mencari Pasangan Bersyarat

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Sun May 22, 2011 11:30 pm (PDT)



sambil menunggu tanggapan dari Mr Kid
baik juga kalau kita merenungi dulu tiap FUNGSI yg ditanyakkan

1.
=ABS(Bilangan)
ABS singkatan dari ABSOLUTE
selalu mengahasilkan nilai absolut (*bilangan positip) terhadap* apapun SIGN
bilangan
yg dimasukkan ke dalamnya
Jadi ABS(*-100*) haslinya = 100, ABS(*100*) juga 100

Kalau kita mau membandingkan apakah bilangan ex DEBIT dan ex KREDIT adalah
sama
tau tidak., (dlm pengertian : apakah nilai post kredit teelah sebanding
dengan nilai debit?)
jika pmbandingannya tidak pakai fungsi ABS hasilnya tentu* selalu TIDAK SAMA
*
karena * -100* tidak akan sama dengan* +100 *(selisih 200 bok !)
Bandingkan dengan setelah dimasukkan ke dalam fungsi ABS ; logika, logka !

2.
penjelasan fungsi fungsi lain ada di HELP-nya., atau

ketikkan nama fungsi di cell misal *=COUNTIF(*
klik icon f yg ada di sebelah kiri FOrmulaBar >> muncul dialogBox
'Function Arguments)
di polok kiri bawah ada lik ke HELP nya

[image: helep func.GIF]

2011/5/23 abdul hafidz <a.hafidz@yahoo.co.id>

>
>
>
> Dear Master Kid
>
> Thanks before atas pencerahannya ya........
> Ada beberapa pertanyaan yg ingin saya ajukan :
>
> 1. Untuk rumus yg ini &ABS(F2) kenapa ko' harus seperti itu, kenapa tdk
> langsung saja dgn F2.
> 2. Untuk rumus yg ini
> =COUNTIF($I$2:$I$448,IF(H2="C","D;","C;")&MID(I2,3,500)) kalo dlm bahasa
> manusianya gimana dan kenapa ko' tdk ada teks "MATCH" untuk menyatakan
> kesamaan dlm rumus tersebut.
> 3. Kenapa lampiran yg master kid sampaikan ko' yg "MATCH" nya hanya ada di
> Curency USD saja
> 4. Rumus tersebut saya jalankan di data aslinya yg serupa dgn lampiran
> tersebut, akan tetapi kenapa ko' tdk ada yg menghasilkan "MATCH" satupun,
> seharusnya yg di Curency USD kan sama dgn lampiran yg master kid
> sampaikan.
> Kurang lebih seperti itulah master kid,
> mohon maaf bila tdk berkenan
>
> rgd
> hafidz
> ------------------------------
> *Dari:* Mr. Kid <mr.nmkid@gmail.com>
> *Kepada:* belajar-excel@yahoogroups.com
> *Terkirim:* Ming, 22 Mei, 2011 05:54:24
> *Judul:* Re: [belajar-excel] Mencari Pasangan Bersyarat
>
>
>
> Dear Hafidz,
>
> Memerlukan id record yang berupa gabungan seluruh kriteria, sebagai bahan
> untuk hitung cacah berkriteria (CountIF)
> Kemudian menghitung cacah berdasyaratnya.
>
> File terlampir.
>
> Kid.
>
>
> 2011/5/21 abdul hafidz <a.hafidz@yahoo.co.id>
>
>>
>>
>> Dear rekans2 bE eXcel
>> Selamat malam semuanya........
>>
>> Mohon pencerahannya yah, dalam case ini heheheheheh.........
>>
>> begini casenya :
>> Bagaimanakah rumus dalam mencari record yg sama dalam satu worksheet dgn
>> beberapa kreteria...!
>>
>> Penjelasannya seperti ini :
>> > Jika A2 s/d J2 (yang meliputi :
>> Branch-User-Account-Curency-Description-Ammount-Refrensi) ada yg sama dgn A3
>> s/d J3 maka "MATCH" tentunya dgn syarat D(debet) dan C(Credit).
>>
>> Contoh hasil dari yg telah "MATCH" :
>> *Branch* *User* *Account* *Curency* *Description* * Ammount * *
>> Refrensi* *Kreteria* 99119 8119044 19511601 USD 2399119000702402
>> 10.00 0002399119000702402 D Match 99119 TL8119013 19511657 USD CREDIT
>> IBT SUSPENSE ISSUING BRANCH (10.00) 0002399119000702402
>> C Match
>> Kurang lebih seperti itulah penjelasannya,
>> Mohon Pencerahannya yach.........
>>
>> Maaf bila tdk berkenan
>> trims
>> rgds
>> hafidz
>>
>>
>
>
4a.

Mohon bantuan untuk fungsi INDEX

Posted by: "Candra Herison Sihaloho - BTS" candraherisons@my.beyonics.com   candra.herison

Sun May 22, 2011 8:12 pm (PDT)



Dear Be-Xelers,

Mohon bantuannya untuk masalah terlampir.

Bagaimana rumus mengoptimalkan fungsi INDEX pada masalah terlampir?

Terima kasih sebelumnya

Regards,

Candra

+607-6612384

P Please consider the environment before printing this mail !

**********************************************************************
CONFIDENTIALITY CAUTION :

This email is intended only for the use of the individual or entity to whom it is addressed and contains information that is confidential and may also be privileged. If you, the reader of this email, are not the intended recipient, you are strictly prohibited from disseminating, distributing, copying, disclosing or in any way use or rely on information contained in this email or any attachment. If you have received this email in error, please notify us immediately by return email and delete the original email including any attachment.

www.beyonics.com
**********************************************************************

4b.

Re: Mohon bantuan untuk fungsi INDEX

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Sun May 22, 2011 9:31 pm (PDT)



mohon dicoba: formula di *cell G4*
***
*
=INDEX(Components,MATCH('Kit Plan'!E4,
OFFSET(Simulation!$C$4,1,MATCH(A4,Simulation!$D$1:$AE$1,0),10,1),0))

Baris D1:AE1 pada sheet Simulation itu ada tanda (1,2,3 dst pada kolom D,
H, L, P dst)
tanda itu mendai bahwa KOLOM itulah yg harus dirujuk

maka letak KOLOM itu dapat ditebak dengan fungsi MATCH
selanjutnya hasil MATCH menjadi IndexKolom bagi fungsi OFFSET
Sedangkan fungsi OFFSET merujuk range dari cell $C$4 (absolut) yg
* jarak kebawahnya = 1
* jarak ke kanannya = hasil MATCH (yg baru dibicarakan)
* setinggi : 10 baris
* selebar : 1 KOLOM

Sampailah kita ke klimax ceritaknya, yaitu sebuah pertanyaan:
*Range manakah yg punya SPEC spt itu ??*
*Jawabannya:*
** Jika ditulisnya di G4 maka rang yg dimaksud adalah D5:D14 (sheet
Simulation)
** Jika ditulisnya di G15 dst setiap 10 baris kebawah = anda dapat menjawab
sendiri...

On Mon, May 23, 2011 at 10:10 AM, Candra Herison Sihaloho - BTS <
candraherisons@my.beyonics.com> wrote:

> Dear Be-Xelers,
>
>
>
> Mohon bantuannya untuk masalah terlampir.
>
> Bagaimana rumus mengoptimalkan fungsi INDEX pada masalah terlampir?
>
> Terima kasih sebelumnya
>
>
>
> Regards,
>
> Candra
>
4c.

Re: Mohon bantuan untuk fungsi INDEX

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Sun May 22, 2011 9:42 pm (PDT)



maaf ada kelewat sedikit,

Kolom kolom di sheet Simulation yg diberi tanda Seq 1, 2, 3 dst itu
dapat dikenali dari sheet KitPlan karena di sheet ini kita punya kolom A
(=Seq)
yg nilainya sama dengan nilai tanda kolom di sheet Simulation...

Seandainya pak SIhaloho* BELUM punya* kolom Seq, kita lah yg akan membuatnya
sebagai Kolom Bantu....

2011/5/23 STDEV(i) <setiyowati.devi@gmail.com>

> mohon dicoba: formula di *cell G4*
> ***
> *
> =INDEX(Components,MATCH('Kit Plan'!E4,
> OFFSET(Simulation!$C$4,1,MATCH(A4,Simulation!$D$1:$AE$1,0),10,1),0))
>
> Baris D1:AE1 pada sheet Simulation itu ada tanda (1,2,3 dst pada kolom D,
> H, L, P dst)
> tanda itu mendai bahwa KOLOM itulah yg harus dirujuk
>
> maka letak KOLOM itu dapat ditebak dengan fungsi MATCH
> selanjutnya hasil MATCH menjadi IndexKolom bagi fungsi OFFSET
> Sedangkan fungsi OFFSET merujuk range dari cell $C$4 (absolut) yg
> * jarak kebawahnya = 1
> * jarak ke kanannya = hasil MATCH (yg baru dibicarakan)
> * setinggi : 10 baris
> * selebar : 1 KOLOM
>
> Sampailah kita ke klimax ceritaknya, yaitu sebuah pertanyaan:
> *Range manakah yg punya SPEC spt itu ??*
> *Jawabannya:*
> ** Jika ditulisnya di G4 maka rang yg dimaksud adalah D5:D14 (sheet
> Simulation)
> ** Jika ditulisnya di G15 dst setiap 10 baris kebawah = anda dapat
> menjawab sendiri...
>
>
>
> On Mon, May 23, 2011 at 10:10 AM, Candra Herison Sihaloho - BTS <
> candraherisons@my.beyonics.com> wrote:
>
>> Dear Be-Xelers,
>>
>>
>>
>> Mohon bantuannya untuk masalah terlampir.
>>
>> Bagaimana rumus mengoptimalkan fungsi INDEX pada masalah terlampir?
>>
>> Terima kasih sebelumnya
>>
>>
>>
>> Regards,
>>
>> Candra
>>
>
4d.

Re: Mohon bantuan untuk fungsi INDEX

Posted by: "Candra Herison Sihaloho - BTS" candraherisons@my.beyonics.com   candra.herison

Sun May 22, 2011 9:43 pm (PDT)



Dear Mbak Siti,

Terima kasih banyak, rumusnya berhasil

Akhirnya penantian saya untuk tidak manual lagi terjawab juga hari ini
:-) :-)

Salut buat Mbak Siti

Regards,

Candra

+607-6612384

P Please consider the environment before printing this mail !

_____

From: belajar-excel@yahoogroups.com
[mailto:belajar-excel@yahoogroups.com] On Behalf Of STDEV(i)
Sent: Monday, May 23, 2011 12:32 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Mohon bantuan untuk fungsi INDEX

mohon dicoba: formula di cell G4

=INDEX(Components,MATCH('Kit
Plan'!E4,OFFSET(Simulation!$C$4,1,MATCH(A4,Simulation!$D$1:$AE$1,0),10,1
),0))

Baris D1:AE1 pada sheet Simulation itu ada tanda (1,2,3 dst pada kolom
D, H, L, P dst)

tanda itu mendai bahwa KOLOM itulah yg harus dirujuk

maka letak KOLOM itu dapat ditebak dengan fungsi MATCH

selanjutnya hasil MATCH menjadi IndexKolom bagi fungsi OFFSET

Sedangkan fungsi OFFSET merujuk range dari cell $C$4 (absolut) yg

* jarak kebawahnya = 1

* jarak ke kanannya = hasil MATCH (yg baru dibicarakan)

* setinggi : 10 baris

* selebar : 1 KOLOM

Sampailah kita ke klimax ceritaknya, yaitu sebuah pertanyaan:

Range manakah yg punya SPEC spt itu ??

Jawabannya:

** Jika ditulisnya di G4 maka rang yg dimaksud adalah D5:D14 (sheet
Simulation)

** Jika ditulisnya di G15 dst setiap 10 baris kebawah = anda dapat
menjawab sendiri...

On Mon, May 23, 2011 at 10:10 AM, Candra Herison Sihaloho - BTS
<candraherisons@my.beyonics.com> wrote:

Dear Be-Xelers,

Mohon bantuannya untuk masalah terlampir.

Bagaimana rumus mengoptimalkan fungsi INDEX pada masalah terlampir?

Terima kasih sebelumnya

Regards,

Candra

**********************************************************************
CONFIDENTIALITY CAUTION :

This email is intended only for the use of the individual or entity to whom it is addressed and contains information that is confidential and may also be privileged. If you, the reader of this email, are not the intended recipient, you are strictly prohibited from disseminating, distributing, copying, disclosing or in any way use or rely on information contained in this email or any attachment. If you have received this email in error, please notify us immediately by return email and delete the original email including any attachment.

www.beyonics.com
**********************************************************************

4e.

Re: Mohon bantuan untuk fungsi INDEX

Posted by: "Candra Herison Sihaloho - BTS" candraherisons@my.beyonics.com   candra.herison

Sun May 22, 2011 9:49 pm (PDT)



Iya mbak siti

Sheet Kit Plan kolom A berhubungan dengan sheet Simulation baris
pertama, tapi binun rumus apa yang bisa link antara row and column pada
fungsi index

Sekarang rumusnya berfungsi dengan baik

Terima kasih buat rumus and penjelasannya, sangat bermanfaat :-)

Regards,

Candra

+607-6612384

P Please consider the environment before printing this mail !

_____

From: belajar-excel@yahoogroups.com
[mailto:belajar-excel@yahoogroups.com] On Behalf Of STDEV(i)
Sent: Monday, May 23, 2011 12:40 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Mohon bantuan untuk fungsi INDEX

maaf ada kelewat sedikit,

Kolom kolom di sheet Simulation yg diberi tanda Seq 1, 2, 3 dst itu

dapat dikenali dari sheet KitPlan karena di sheet ini kita punya kolom A
(=Seq)

yg nilainya sama dengan nilai tanda kolom di sheet Simulation...

Seandainya pak SIhaloho BELUM punya kolom Seq, kita lah yg akan
membuatnya

sebagai Kolom Bantu....

2011/5/23 STDEV(i) <setiyowati.devi@gmail.com>

mohon dicoba: formula di cell G4

=INDEX(Components,MATCH('Kit
Plan'!E4,OFFSET(Simulation!$C$4,1,MATCH(A4,Simulation!$D$1:$AE$1,0),10,1
),0))

Baris D1:AE1 pada sheet Simulation itu ada tanda (1,2,3 dst pada kolom
D, H, L, P dst)

tanda itu mendai bahwa KOLOM itulah yg harus dirujuk

maka letak KOLOM itu dapat ditebak dengan fungsi MATCH

selanjutnya hasil MATCH menjadi IndexKolom bagi fungsi OFFSET

Sedangkan fungsi OFFSET merujuk range dari cell $C$4 (absolut) yg

* jarak kebawahnya = 1

* jarak ke kanannya = hasil MATCH (yg baru dibicarakan)

* setinggi : 10 baris

* selebar : 1 KOLOM

Sampailah kita ke klimax ceritaknya, yaitu sebuah pertanyaan:

Range manakah yg punya SPEC spt itu ??

Jawabannya:

** Jika ditulisnya di G4 maka rang yg dimaksud adalah D5:D14 (sheet
Simulation)

** Jika ditulisnya di G15 dst setiap 10 baris kebawah = anda dapat
menjawab sendiri...

On Mon, May 23, 2011 at 10:10 AM, Candra Herison Sihaloho - BTS
<candraherisons@my.beyonics.com> wrote:

Dear Be-Xelers,

Mohon bantuannya untuk masalah terlampir.

Bagaimana rumus mengoptimalkan fungsi INDEX pada masalah terlampir?

Terima kasih sebelumnya

Regards,

Candra

**********************************************************************
CONFIDENTIALITY CAUTION :

This email is intended only for the use of the individual or entity to whom it is addressed and contains information that is confidential and may also be privileged. If you, the reader of this email, are not the intended recipient, you are strictly prohibited from disseminating, distributing, copying, disclosing or in any way use or rely on information contained in this email or any attachment. If you have received this email in error, please notify us immediately by return email and delete the original email including any attachment.

www.beyonics.com
**********************************************************************

5a.

SIMPAN NOTA

Posted by: "Ahmad Fauzi" fauzietha@yahoo.co.id   fauzietha

Sun May 22, 2011 8:28 pm (PDT)



Dear para master Excel,

Mohon bantuannya dengan masalah pembuatan nota jasa bengkel.
bagaimana caranya supaya data dari nota ini tersimpan tetapi tidak perlu copy
paste sheet NOTA, karena selama ini untuk menyimpan data dari nota ini saya
mengcopy paste sheet nota sesuai dengan nomor nota dan hal tersebut membuat file
saya menjadi lebih besar sehingga lama untuk membukanya.

Terima kasih atas bantuan para master Excel semua

file terlampir....
5b.

Re: SIMPAN NOTA

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Sun May 22, 2011 10:17 pm (PDT)



Setiap nota tidak disimpan lembar per lembar (sheet)
tetapi DATANYA disimpan sebagai tabel (tiap Nota menjadi 1 baris dlm tbel)
Tabel bisa hanya 1 tetapi bisa juga 2 tabel (tabel anak & tabel induk)

Setiap baris tabel dapat di UNDANG ke sebuah FORMULIR
(formulir dibuat dari 1 sheet / form penampil data )

mengisi tabel juga juga bisa dilakukan dengan FORMULIR (yg juga dibuat dari
sheet)
formulir ini disebut FORM ENTRY

soal KAPAN mencetaknya menjadi nota, terserah...
- apakah ketika sedang diisikan ke Sheet Formulir (lalu di SAVE sbg data
pada tabel)
- atau dari sheet / form Penampil (yaitu data yg sudah ada di tabel)

Penampilannya ke sheet / FORM Penampil secara satu nota persatu nota
(1 baris d tabel >> ditampilkan menjadi selembar nota di FORM Penampil)
dengan cara memberi RUMUS semacam VLOOKUP (bisa juga dengan makro)

Coba dilihat contoh yg sudah ada (Simple Invoicing
Sistem.xls<http://www.box.net/shared/dzuz701sqr>
)
bisa anda unduh "sendiri" ("dan teman teman juga") di warung sebelah
http://www.box.net/shared/dzuz701sqr

-siti-

2011/5/23 Ahmad Fauzi <fauzietha@yahoo.co.id>

> Dear para master Excel,
> Mohon bantuannya dengan masalah pembuatan nota jasa bengkel.
> bagaimana caranya supaya data dari nota ini tersimpan tetapi tidak perlu
> copy paste sheet NOTA, karena selama ini untuk menyimpan data dari nota ini
> saya mengcopy paste sheet nota sesuai dengan nomor nota dan hal tersebut
> membuat file saya menjadi lebih besar sehingga lama untuk membukanya.
> Terima kasih atas bantuan para master Excel semua
> file terlampir....
>
>
>
Recent Activity
Visit Your Group
Give Back

Yahoo! for Good

Get inspired

by a good cause.

Y! Toolbar

Get it Free!

easy 1-click access

to your groups.

Yahoo! Groups

Start a group

in 3 easy steps.

Connect with others.

Need to Reply?

Click one of the "Reply" links to respond to a specific message in the Daily Digest.

Create New Topic | Visit Your Group on the Web
---------------------------------------------------------------------
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