Selasa, 16 Oktober 2012

[belajar-excel] Digest Number 1847

15 New Messages

Digest #1847
2a
2c
3b
4a
unsubscribe by "Wahyudi Febrian"
4b
Re: unsubscribe by "aji mumpung"
4c
Re: unsubscribe by "Mr. Kid" nmkid.family@ymail.com
5b
Re: trial material substore gudang by "Mr. Kid" nmkid.family@ymail.com
7a
Re: Questioner Text Formula by "Abdi Pili" arn_doank
7b
Re: Questioner Text Formula by "Mr. Kid" nmkid.family@ymail.com

Messages

Mon Oct 15, 2012 10:37 am (PDT) . Posted by:

"ratim sugianto" ratimsugianto

wah mantap banget pak Kid, sudah saya cek satu persatu dengan data transaksi dan pemetaan jurnalnya, SEMPURNA (pas banget).
terimakasih banyak pak Kid atas bantuannya, problem sudah terselesaikan dengan baik.

bravo pak Kid.

wassalam
rsugianto

________________________________
Dari: Mr. Kid <mr.nmkid@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Selasa, 16 Oktober 2012 0:15
Judul: Re: [belajar-excel] Data Harian menjadi Sebuah JURNAL


 
Saya kirim file yang baru saja.

Moga-moga udah gak banyak error-nya.

Wassalam,
Kid.

2012/10/15 Mr. Kid <mr.nmkid@gmail.com>

Masya Allah,
>
>Ada yang salah formulanya Pak,
>Di G2seharusnya memiliki formula :
>=IF($D3="Dr",0,IF($D3="Cr",MAX(F2:F4),""))
>
>Maaf, gak teliti.
>
>Wassalam,
>Kid.
>
>
>
>
>
>
>2012/10/15 ratim sugianto <ratimsugianto@yahoo.co.id>
>
>
>> 
>>Mr. Kid makasih sebelumnya atas bantuannya.
>>
>>sementara memang saya tidak menggunakan kdmitra, karena nantinya akan saya tambahkan utk transaksi yang datanya tidak ada kode mitranya.
>>
>>mas Kid, kenapa yach utk yang pembayaran itu sebagaimana hasilnya dalam sheet Jurnal harian, kok jurnal no 9 Kredit nya tidak muncul nilai rupiahnya yach, sementara Debet nya sudah terisi. apa karena pengaruh di sheet transaksi tidak pake kdmitra mas?
>>
>>
>>wassalam
>>r sugianto
>>
>>
>>
>>
>>________________________________
>> Dari: Mr. Kid <mr.nmkid@gmail.com>
>>Kepada: belajar-excel@yahoogroups.com
>>Dikirim: Senin, 15 Oktober 2012 19:06
>>Judul: Re: [belajar-excel] Data Harian menjadi Sebuah JURNAL
>>
>>
>>
>> 
>>Coba file terlampir.
>>
>>Wassalam,
>>Kid.
>>
>>
>>2012/10/15 ratim sugianto <ratimsugianto@yahoo.co.id>
>>
>>
>>> 
>>>Halo para master xl
>>>selamat sore.
>>>Sebagaimana  disebut dalam subjek diatas, mohon kiranya bantuan formula utk mendefinisikan sebuah data transaksi harian (rekapitulasi harian) yang saya ambil dari copy paste dari aplikasi lain menjadi bentuk "Jurnal Harian"
>>>Data ini saya simpan di sheet "Transaksi", kemudian untuk keperluan penjurnalan di aplikasi lain, dari data ini harus mengisi ke sheet "Jurnal Harian" dengan criteria dan aturan yang sudah ditetapkan di sheet "Data" yang didalamnya berupa pemetaan jika transkasi A, maka harus dijurnal ke jurnal B, dan seterusnya.
>>>Utk lebih jelasnya, saya lampirkan attachmennya.
>>>Atas bantuan baik dalambentuk rumus/formula ataupun langsung menyempurnakan file yang saya attach, saya ucapkan banyak terima kasih.
>>>Wassalam
>>>R.
Sugianto
>>>
>>
>>
>>
>

Mon Oct 15, 2012 11:26 am (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

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 <darmokapurba@yahoo.com>

> **
>
>
> *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&gt; tepuk tangan][image: =D&gt; tepuk tangan][image:
> =D&gt; tepuk tangan][image: O:-) malaikat], sbelumnya saya ucapkan banyak
> terima kasih.
>
>
> Regards,
> Moka
>
>
>
>
>
>
>
>
>

Mon Oct 15, 2012 6:45 pm (PDT) . Posted by:

"Darmoka Purba" darmokapurba

Sebelumnya terima kasih atas tanggapannya pak Kid,
Pada kenyataan yg saya hadapi, data di sheet input lebih dari 20 buah dengan tabel referensi ada 6 tabel. Sheet Perhitungan juga menggunakan perhitungan yg sangat panjang, lagipula field yg di copas dari acces ke sheet database ada 45 field dengan total record mencapai 300.000.
file lampiran saya ini hanya contoh saja pak kid, selanjutnya saya akan kembangkan sendiri.
Apakah formula saya harus ganti dgn code vba nya?

Basic informastion yg ada di sheet perhitungan hanya mewakili saja, karena spt itulah bentuk field data yg akan di copas dari acces ke sheet database.

Tujuan saya adalah, ketika saya copas data dari acces ke baris yg dimulai dari baris B5:F5 sampai sebanyak data di acces maka secara otomatis atau dengan membuat tombol, macro akan berjalan membaca sebanyak data portopolio dan menghasilkan nilai GAJI BULANANAN.

Singkatnya begini :
Pada sheet perhitungan terintegrasi dengan sheet input.
Pada proses perhitungannya di sheet perhitungan, akan membaca data portopolio yg ada di sheet database lalu masuk ke basic information di sheet perhitungan (disni akan dihitung dan mendapat Gaji bulanan), GAJI BULANAN itu akan otomatis tampil ke sheet database. Jadi proses perhitungan terus berlanjut sepanjang banyak data yg di copas dari acces.

klu kata temen sih semacam looping data, tp saya kurang paham.

Terima kasih atas bantuannya.

 

________________________________
Dari: Mr. Kid <mr.nmkid@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Selasa, 16 Oktober 2012 1:25
Judul: Re: [belajar-excel] Aplikasi perhitungan Gaji Bulanan dengan MACRO EXCEL


 
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 sheet database 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 <darmokapurba@yahoo.com>


>Yang terhormat,
>Kepada Para Guru/master excel
>
>Mohon bantuannya atas kebingungan
saya dalam membuat aplikasi menggunakan macro excel.

>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, sbelumnya saya ucapkan banyak terima kasih.
>
>
>
>
>Regards,
>Moka
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>

Mon Oct 15, 2012 8:05 pm (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Andai saja detil proses perhitungan bisa di-share dengan beberapa baris
data buatan, tentu bisa menjadi bahan belajar untuk seluruh BeExceller.
Setidaknya bisa menjadi bahan untuk belajar menyusun formula.
Apa boleh buat, mungkin hal itu dirahasiakan.

btw,
File terlampir menggunakan VBA.
Cek lagi hasilnya, terutama ketika workbook telah berisi banyak formula
atau nama range. Karena proses kalkulasi oleh Excel yang agak lamban, bisa
ada kemungkinan bahwa hasil nilai yang disalin ke sheet data tidak tepat.

Wassalam,
Kid.

2012/10/16 Darmoka Purba <darmokapurba@yahoo.com>

> **
>
>
> Sebelumnya terima kasih atas tanggapannya pak Kid,
> Pada kenyataan yg saya hadapi, data di sheet input lebih dari 20 buah
> dengan tabel referensi ada 6 tabel. Sheet Perhitungan juga menggunakan
> perhitungan yg sangat panjang, lagipula field yg di copas dari acces ke
> sheet database ada 45 field dengan total record mencapai 300.000.
> file lampiran saya ini hanya contoh saja pak kid, selanjutnya saya akan
> kembangkan sendiri.
> Apakah formula saya harus ganti dgn code vba nya?
>
> Basic informastion yg ada di sheet perhitungan hanya mewakili saja, karena
> spt itulah bentuk field data yg akan di copas dari acces ke sheet database.
>
> Tujuan saya adalah, ketika saya copas data dari acces ke baris yg dimulai
> dari baris B5:F5 sampai sebanyak data di acces maka secara otomatis atau
> dengan membuat tombol, macro akan berjalan membaca sebanyak data portopolio
> dan menghasilkan nilai GAJI BULANANAN.
>
> Singkatnya begini :
> Pada sheet perhitungan terintegrasi dengan sheet input.
> Pada proses perhitungannya di sheet perhitungan, akan membaca data
> portopolio yg ada di sheet database lalu masuk ke basic information di
> sheet perhitungan (disni akan dihitung dan mendapat Gaji bulanan), GAJI
> BULANAN itu akan otomatis tampil ke sheet database. Jadi proses perhitungan
> terus berlanjut sepanjang banyak data yg di copas dari acces.
>
> klu kata temen sih semacam looping data, tp saya kurang paham.
>
> Terima kasih atas bantuannya.
>
>
>
>
>
>
> ------------------------------
> *Dari:* Mr. Kid <mr.nmkid@gmail.com>
> *Kepada:* belajar-excel@yahoogroups.com
> *Dikirim:* Selasa, 16 Oktober 2012 1:25
> *Judul:* Re: [belajar-excel] Aplikasi perhitungan Gaji Bulanan dengan
> MACRO EXCEL
>
>
> 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 <darmokapurba@yahoo.com>
>
> **
>
> *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&gt; tepuk tangan][image: =D&gt; tepuk tangan][image:
> =D&gt; tepuk tangan][image: O:-) malaikat], sbelumnya saya ucapkan banyak
> terima kasih.
>
>
> Regards,
> Moka
>
>
>
>
>
>
>
>
>
>
>
>

Mon Oct 15, 2012 11:26 am (PDT) . Posted by:

"face_call15@yahoo.com" face_call15

Ya mas trmksh banyak, maaf ni mau nanya lagi biasanya pada saat kita input data baru pasti masuknya di row 1, bisa gak/ada gak kode macro yg bisa membuat kita imput data baru berurutannya ke bawah bukan ke atas? Trmksh sebelumnya
Powered by Telkomsel BlackBerry�

-----Original Message-----
From: "Mr. Kid" <mr.nmkid@gmail.com>
Sender: belajar-excel@yahoogroups.com
Date: Tue, 16 Oct 2012 00:36:50
To: <belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Mohon bantuannya mengenai auto open untuk formuser

Sama-sama.

Oh iya, script yang digunakan adalah prosedur-prosedur event dan sebuah
deklarasi variabel ber-scope private. (lihat di VBE)
1. ThisWorkbook (event workbook open)
Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show
End Sub

2. UserForm1 :
>> Deklarasi variabel state tombol yang menutup userform
Private lState As Long

>> Event Initialize (saat userform di-load)
Private Sub UserForm_Initialize()
With Application
.ScreenUpdating = False
.DisplayFullScreen = True
Me.Height = .Height
Me.Width = .Width
.ScreenUpdating = True
End With
End Sub

>> Event Terminate (saat userform di-unload)
Private Sub UserForm_Terminate()
With Application
.ScreenUpdating = False
.WindowState = xlNormal
.WindowState = xlMaximized
.ScreenUpdating = True
ThisWorkbook.Save
.Visible = True
If lState = -1 Then
ThisWorkbook.Close False
End If
End With
End Sub

>> Event Click tombol 'Ke Workbook' [cmdToWbk] (untuk menutup userform dan
menampilkan workbook)
Private Sub cmdToWbk_Click()
lState = 0
Unload Me
End Sub

>> Event Click tombol 'Tutup' [cmdQuit] (untuk menutup userform kemudian
save dan menutup workbook)
Private Sub cmdQuit_Click()
lState = -1
Unload Me
End Sub

Wassalam,
Kid.




2012/10/15 HaDi SyaH <face_call15@yahoo.com>

> **
>
>
>
> terimaksih banyak mas,.. alhamdulilah sesuai harapan.
>
> ------------------------------
>
> On Mon, Oct 15, 2012 8:27 AM PDT Mr. Kid wrote:
>
> >Waalaikumussalam Wr. Wb.
> >
> >Coba file terlampir.
> >
> >Wassalamualaikum Wr. Wb.
> >Kid.
> >
> >2012/10/15 <face_call15@yahoo.com>
> >
> >> Assalamualaikum...
> >> Yang terhormat para mastr exel, ada beberapa hal yang ingin sy tanyakan,
> >> dan mohon bantuannya
> >> Yang ingin sy tanyakan bagaimana kode macro untuk auto open user form,
> >> yang pada saat mengklik file woorkbook/excel langsung muncul user form
> >> tanpa menampilkan workbooknya,
> >> Atas bantuannya sebelumnya sy ucapkan terima kasih
> >> Powered by Telkomsel BlackBerry�
> >>
> >> ------------------------------------
> >>
> >> ----------------------------------------------------------
> >> 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
> >> ----------------------------------------------------------Yahoo!
> >> Groups Links
> >>
> >>
> >>
> >>
>
>
>

Mon Oct 15, 2012 11:37 am (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Maksudnya bagaimana ya.
Biasanya lebih mudah setiap input baru selalu di *baris kosong
pertama*bukan di baris pertama.

Jika yang dimaksud adalah setiap entry data secara langsung di cell lalu
ketika di-Enter maka cell aktif pindah ke bawah, maka atur sebagai berikut
: (gambar di xl2007)
1. Ke Excel Options
[image: Inline image 1]

2. Ke page Advanced (sisi kiri) -> lihat sisi kanan -> centang item 'After
pressing Enter, move selection'
-> set Direction dengan memilih Down
[image: Inline image 2]

Tapi kayanya bukan itu yang dimaksud ya... ;)

Wassalam,
Kid.

2012/10/16 <face_call15@yahoo.com>

> **
>
>
> ** Ya mas trmksh banyak, maaf ni mau nanya lagi biasanya pada saat kita
> input data baru pasti masuknya di row 1, bisa gak/ada gak kode macro yg
> bisa membuat kita imput data baru berurutannya ke bawah bukan ke atas?
> Trmksh sebelumnya
> Powered by Telkomsel BlackBerry�
> ------------------------------
> *From: * "Mr. Kid" <mr.nmkid@gmail.com>
> *Sender: * belajar-excel@yahoogroups.com
> *Date: *Tue, 16 Oct 2012 00:36:50 +0700
> *To: *<belajar-excel@yahoogroups.com>
> *ReplyTo: * belajar-excel@yahoogroups.com
> *Subject: *Re: [belajar-excel] Mohon bantuannya mengenai auto open untuk
> formuser
>
>
>
> Sama-sama.
>
> Oh iya, script yang digunakan adalah prosedur-prosedur event dan sebuah
> deklarasi variabel ber-scope private. (lihat di VBE)
> 1. ThisWorkbook (event workbook open)
> Private Sub Workbook_Open()
> Application.Visible = False
> UserForm1.Show
> End Sub
>
> 2. UserForm1 :
> >> Deklarasi variabel state tombol yang menutup userform
> Private lState As Long
>
> >> Event Initialize (saat userform di-load)
> Private Sub UserForm_Initialize()
> With Application
> .ScreenUpdating = False
> .DisplayFullScreen = True
> Me.Height = .Height
> Me.Width = .Width
> .ScreenUpdating = True
> End With
> End Sub
>
> >> Event Terminate (saat userform di-unload)
> Private Sub UserForm_Terminate()
> With Application
> .ScreenUpdating = False
> .WindowState = xlNormal
> .WindowState = xlMaximized
> .ScreenUpdating = True
> ThisWorkbook.Save
> .Visible = True
> If lState = -1 Then
> ThisWorkbook.Close False
> End If
> End With
> End Sub
>
> >> Event Click tombol 'Ke Workbook' [cmdToWbk] (untuk menutup userform
> dan menampilkan workbook)
> Private Sub cmdToWbk_Click()
> lState = 0
> Unload Me
> End Sub
>
> >> Event Click tombol 'Tutup' [cmdQuit] (untuk menutup userform kemudian
> save dan menutup workbook)
> Private Sub cmdQuit_Click()
> lState = -1
> Unload Me
> End Sub
>
> Wassalam,
> Kid.
>
>
>
>
> 2012/10/15 HaDi SyaH <face_call15@yahoo.com>
>
>> **
>>
>>
>>
>> terimaksih banyak mas,.. alhamdulilah sesuai harapan.
>>
>> ------------------------------
>>
>> On Mon, Oct 15, 2012 8:27 AM PDT Mr. Kid wrote:
>>
>> >Waalaikumussalam Wr. Wb.
>> >
>> >Coba file terlampir.
>> >
>> >Wassalamualaikum Wr. Wb.
>> >Kid.
>> >
>> >2012/10/15 <face_call15@yahoo.com>
>> >
>> >> Assalamualaikum...
>> >> Yang terhormat para mastr exel, ada beberapa hal yang ingin sy
>> tanyakan,
>> >> dan mohon bantuannya
>> >> Yang ingin sy tanyakan bagaimana kode macro untuk auto open user form,
>> >> yang pada saat mengklik file woorkbook/excel langsung muncul user form
>> >> tanpa menampilkan workbooknya,
>> >> Atas bantuannya sebelumnya sy ucapkan terima kasih
>> >> Powered by Telkomsel BlackBerry�
>> >>
>> >> ------------------------------------
>> >>
>> >> ----------------------------------------------------------
>> >> 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
>> >> ----------------------------------------------------------Yahoo!
>> >> Groups Links
>> >>
>> >>
>> >>
>> >>
>>
>>
>
>

Mon Oct 15, 2012 6:40 pm (PDT) . Posted by:

"aji mumpung"

hai Yudi,

kenapa ingin keluar dari millis ini?

kalo mau keluar caranya sbb:

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com

kalo ingin keluar hanya karena mai box menjadi penuh, coba ubah settingan
email dari individual menjadi diggest, beberapa email akan disatukan
menjadi satu baru dikirim ke alamat email anda (mungkin 1 hari cuma 1 email
yang akan diterima), tentu saja attachment biasanya tidak akan muncul

wassalam,

-aji mumpung-

2012/10/16 Wahyudi Febrian <wahyudi.febrian@cpp.co.id>

> **
>
>
> ** **
>
>
>

Mon Oct 15, 2012 6:57 pm (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Dear Wahyudi,

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com

Bermasalah karena Inbox selalu penuh ? Coba email setting disini :
http://help.yahoo.com/kb/index?locale=en_US&page=content&y=PROD_GRPS&id=SLN2509

Wassalam,
Kid.

On Tue, Oct 16, 2012 at 8:28 AM, Wahyudi Febrian
<wahyudi.febrian@cpp.co.id>wrote:

> keluar dari membership milis (UnSubscribe):
> kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com
>

Mon Oct 15, 2012 6:34 pm (PDT) . Posted by:

"aji mumpung"

Pak Amin,

mungkin bisa sedikit diperjelas,
di sheet "Data yang ingin dihasilkan", data di kolom B sampai dengan kolom
F berasal dari mana ya?

wassalam,

-aji mumpung-

Pada 15 Oktober 2012 18:21, ngademin Thohari <ngademinth@yahoo.co.id>menulis:

> **
>
>
> be-exceller
>
> saya akan membuat data gudang, tapi belum mendapat bentuk yang sesuai
> dengan harapan, data ini hanya mewakili 1 konsumen saja, tapi konsumen
> ditempat saya ada beberapa, jadi mohon penjelantahannya
>
>
> Terima kasih atas dukungannya
>
>
> amin
>
>
>

Mon Oct 15, 2012 8:24 pm (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Pak Amin,

Menurut pendapat saya, penjelasan yang rinci akan memudahkan BeExceller
yang ingin membantu. Setahu saya, profesi BeExceller berbeda-beda dan *bisa
jadi ada* yang tidak tahu babar blas tentang gudang dan stok
(saya tunjuk jari kalo kelompok yang gak tahu babar blas, tapi pendek aja.
malu... udah besar kok gak tahu)

Beberapa hal yang sepertinya akan memudahkan jika diberi penjelasan lebih
antara lain :
1. Asal usul sheet data
2. Isi sheet data apa saja dan nilai apa saja yang akan digunakan dan
didapat dari kolom apa
3. Apa isi setiap kolom dari sheet hasil dan dapat darimana atau dihitung
berdasar apa
4. Maksud mewakili 1 konsumen itu apa, dan kalau beberapa konsumen itu
bentuknya seperti apa
5. Apa yang membedakan data untuk konsumen tertentu dengan yang untuk
konsumen lainnya
6. Nilai request itu apa dan kenapa kok 1 nilai dipakai banyak material
7. Hal-hal lain yang berkaitan dan bisa menjadi dongeng menarik tentang si
masalah

Wassalam,
Kid.

2012/10/15 ngademin Thohari <ngademinth@yahoo.co.id>

> **
>
>
> be-exceller
>
> saya akan membuat data gudang, tapi belum mendapat bentuk yang sesuai
> dengan harapan, data ini hanya mewakili 1 konsumen saja, tapi konsumen
> ditempat saya ada beberapa, jadi mohon penjelantahannya
>
>
> Terima kasih atas dukungannya
>
>
> amin
>
>
>

Mon Oct 15, 2012 7:59 pm (PDT) . Posted by:

"Arieyanto"

Terima kasih banyak Pak Kid atas solusinya.

Sangat sesuai dg apa yg saya inginkan.. MANTAPZZ

________________________________
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of Mr. Kid
Sent: Monday, October 15, 2012 7:24 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Menggabungkan dua bentuk data

Waalaikumussalam Wr. Wb.

Dengan asumsi bahwa sheet data tidak ter-sort berdasar kolom ObjcetID (apa adanya)
Pada sisi data dibutuhkan sebuah kolom bantu untuk menyusun Desc disii sheet Data.
Misal diletakkan pada kolom G sheet data. Cell G2 diberi formula :
=IF(COUNTIF(B$1:B1,B2),LOOKUP(2,1/(B$1:B1=B2),G$1:G1)&" / ","")&A2

Pada sisi sheet output, kolom Desc me-lookup data terakhir ObjectID terkait pada sheet Data untuk mengambil nilai Desc sheet Data.
Misal diletakkan pada kolom G sheet 162. Cell G2 diberi formula :
=IF(COUNTIF(Data!$B$1:$B$481,A2),LOOKUP(2,1/(Data!$B$1:$B$481=A2),Data!$G$1:$G$481),"")

Pemeriksaan ada atau tidaknya ObjectID terkait dikomputasi dengan fungsi CountIF.

Wassalam,
Kid.
2012/10/15 Arieyanto <Arieyanto@osielectronics.com<mailto:Arieyanto@osielectronics.com>>

Assalamualaikum Para Masters,

Mohon bantuannya pada kasus saya ini.
Langsung saja dilihat pada lampiran ya..

Terima Kasih

Wassalam,
Arie

Tue Oct 16, 2012 1:45 am (PDT) . Posted by:

"Abdi Pili" arn_doank

Mr. Kid,

Utk item nomor 4, saat di copas ke kanan dan ke bawah (bukan workbook dr mr. Kid) terdapat error reference pada row D10:P10.
Mohon penjelasan dan bantuannya.

Terima kasih.

Salam,
Abdi

"Cogito ergo sum, ergo sum prosperitas"

-----Original Message-----
From: "Kid Mr." <mr.nmkid@gmail.com>
Sender: belajar-excel@yahoogroups.com
Date: Fri, 12 Oct 2012 22:10:13
To: <belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Questioner Text Formula

Hai Abdi,

Hampir seluruh formula pada file terlampir telah divalueskan untuk
mengurangi size. Mohon maaf jika hal ini tidak dikehendaki.
btw,
Formula utama untuk menyusun report :
1. sheet Form 7 Days Planning pada kolom DV
>> Tugasnya sebagai area untuk lookup berdasar kode PIC.
>> kolom ini berisi data PIC diikuti indeks kolom activity-nya. PIC pada
kolom ini diset selalu terdiri atas 5 karakter.
>> formula : (pada DV4 dan copy formula kebawah)
=IF(COUNTIF(DI4:DU4,"<>"),LEFT(LOOKUP("zz",DI4:DU4)&"
",5)&LOOKUP("zz",DI4:DU4,COLUMN($DI$1:$DU$1)-COLUMN($DH$1)),0)

2. sheet Daily Surveillance pada kolom A (hasil insert column)
>> Tugasnya membuat daftar nomor indeks baris data yang sesuai dengan
pilihan user pada nama PIC nya
>> Jenisnya array formula, jadi setiap penulisan formula (tanpa {} )
diakhir dengan menekan CTRL SHIFT ENTER (bukan hanya ENTER saja)
>> array formula pada A8 (copy kebawah)
=SMALL(IF(ISNUMBER(FIND($C$2,'Form 7 Days
Planning'!$DV$4:$DV$122)),ROW('Form 7 Days
Planning'!$DV$4:$DV$122)-ROW('Form 7 Days Planning'!$DV$3)),ROW()-ROW($A$7))

3. Pengambilan data Surveillance Plan dan GS/Area di sheet Daily
Surveillance (kolom B dan C karena sudah ada insert kolom A)
>> Dengan formula Index yang barisnya merujuk pada nilai hasil kolom A
>> Contoh untuk kolom B (cell B8) : [sesuaikan rujukan kolom pada sheet
datanya]
=IF(ISNUMBER($A8),INDEX('Form 7 Days Planning'!A$4:A$123,$A8),"")

4. Area High Risk Activity to be Supervised di sheet Daily Surveillance
>> Membandingkan header (baris 7) dengan item activity untuk hasil baris
tersebut
>> Item activity untuk baris tersebut diambil dengan fungsi Index ke header
activity pada sheet Form 7 Days Planning dengan rujukan kolom adalah sisi
nilai yang ada dalam kolom DV di indeks data ke- nilai kolom A sheet Daily
Surveillance
>> Contoh formula untuk cell D8 (copy ke kanan dan bawah)
=IF(ISNUMBER($A8),IF(INDEX('Form 7 Days
Planning'!$DI$1:$DU$1,1,1*MID(INDEX('Form 7 Days
Planning'!$DV$4:$DV$122,$A8),6,9))=D$7,"X",""),"")

Wassalam,
Kid.


2012/10/12 aron doank <abdist.electrical@gmail.com>

> **
>
>
> Be-Exceller,
>
> Mohon informasinya.
> Data yang diinginkan adalah mendapatkan item pada surveilance plan (kolom A
> sheet daily surveilance) dari item working plan (kolom A sheet form 7 daily
> planning) berdasarkan masing-masing initial pada B2 sheet daily
> surveilance.
> Sehingga jika diganti nama pada B1 maka semua item surveilance yang muncul
> berurutan hanya untuk nama tsb saja (tidak muncul #NA lagi).
> Terlampir yang saya maksudkan.
>
> Satu lagi pertanyaan, apakah ada formula/rumus untuk menghilangkan angka
> dari text campuran angka dan teks seperti 3425TIH7945 dimana posisi teks
> terhadap huruf acak.
>
> Sebelumnya terima kasih.
>
> Salam hangat,
> Abdi
>
> "Cogito Ergo Sum, Ergo Sum Prosperitas"
>
>
>

Tue Oct 16, 2012 1:52 am (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Bisa dilampirkan filenya ? (Max 250 KB)

Wassalam,
Kid.

2012/10/16 Abdi Pili <abdist.electrical@gmail.com>

> **
>
>
> ** Mr. Kid,
>
> Utk item nomor 4, saat di copas ke kanan dan ke bawah (bukan workbook dr
> mr. Kid) terdapat error reference pada row D10:P10.
> Mohon penjelasan dan bantuannya.
>
> Terima kasih.
>
>
> Salam,
> Abdi
> "Cogito ergo sum, ergo sum prosperitas"
> ------------------------------
> *From: * "Kid Mr." <mr.nmkid@gmail.com>
> *Sender: * belajar-excel@yahoogroups.com
> *Date: *Fri, 12 Oct 2012 22:10:13 +0700
> *To: *<belajar-excel@yahoogroups.com>
> *ReplyTo: * belajar-excel@yahoogroups.com
> *Subject: *Re: [belajar-excel] Questioner Text Formula
>
>
>
> Hai Abdi,
>
>
> Hampir seluruh formula pada file terlampir telah divalueskan untuk
> mengurangi size. Mohon maaf jika hal ini tidak dikehendaki.
> btw,
> Formula utama untuk menyusun report :
> 1. sheet Form 7 Days Planning pada kolom DV
> >> Tugasnya sebagai area untuk lookup berdasar kode PIC.
> >> kolom ini berisi data PIC diikuti indeks kolom activity-nya. PIC pada
> kolom ini diset selalu terdiri atas 5 karakter.
> >> formula : (pada DV4 dan copy formula kebawah)
> =IF(COUNTIF(DI4:DU4,"<>"),LEFT(LOOKUP("zz",DI4:DU4)&"
> ",5)&LOOKUP("zz",DI4:DU4,COLUMN($DI$1:$DU$1)-COLUMN($DH$1)),0)
>
> 2. sheet Daily Surveillance pada kolom A (hasil insert column)
> >> Tugasnya membuat daftar nomor indeks baris data yang sesuai dengan
> pilihan user pada nama PIC nya
> >> Jenisnya array formula, jadi setiap penulisan formula (tanpa {} )
> diakhir dengan menekan CTRL SHIFT ENTER (bukan hanya ENTER saja)
> >> array formula pada A8 (copy kebawah)
> =SMALL(IF(ISNUMBER(FIND($C$2,'Form 7 Days
> Planning'!$DV$4:$DV$122)),ROW('Form 7 Days
> Planning'!$DV$4:$DV$122)-ROW('Form 7 Days Planning'!$DV$3)),ROW()-ROW($A$7))
>
> 3. Pengambilan data Surveillance Plan dan GS/Area di sheet Daily
> Surveillance (kolom B dan C karena sudah ada insert kolom A)
> >> Dengan formula Index yang barisnya merujuk pada nilai hasil kolom A
> >> Contoh untuk kolom B (cell B8) : [sesuaikan rujukan kolom pada sheet
> datanya]
> =IF(ISNUMBER($A8),INDEX('Form 7 Days Planning'!A$4:A$123,$A8),"")
>
> 4. Area High Risk Activity to be Supervised di sheet Daily Surveillance
> >> Membandingkan header (baris 7) dengan item activity untuk hasil baris
> tersebut
> >> Item activity untuk baris tersebut diambil dengan fungsi Index ke
> header activity pada sheet Form 7 Days Planning dengan rujukan kolom adalah
> sisi nilai yang ada dalam kolom DV di indeks data ke- nilai kolom A sheet
> Daily Surveillance
> >> Contoh formula untuk cell D8 (copy ke kanan dan bawah)
> =IF(ISNUMBER($A8),IF(INDEX('Form 7 Days
> Planning'!$DI$1:$DU$1,1,1*MID(INDEX('Form 7 Days
> Planning'!$DV$4:$DV$122,$A8),6,9))=D$7,"X",""),"")
>
> Wassalam,
> Kid.
>
>
> 2012/10/12 aron doank <abdist.electrical@gmail.com>
>
>> **
>>
>>
>> Be-Exceller,
>>
>> Mohon informasinya.
>> Data yang diinginkan adalah mendapatkan item pada surveilance plan (kolom
>> A
>> sheet daily surveilance) dari item working plan (kolom A sheet form 7
>> daily
>> planning) berdasarkan masing-masing initial pada B2 sheet daily
>> surveilance.
>> Sehingga jika diganti nama pada B1 maka semua item surveilance yang muncul
>> berurutan hanya untuk nama tsb saja (tidak muncul #NA lagi).
>> Terlampir yang saya maksudkan.
>>
>> Satu lagi pertanyaan, apakah ada formula/rumus untuk menghilangkan angka
>> dari text campuran angka dan teks seperti 3425TIH7945 dimana posisi teks
>> terhadap huruf acak.
>>
>> Sebelumnya terima kasih.
>>
>> Salam hangat,
>> Abdi
>>
>> "Cogito Ergo Sum, Ergo Sum Prosperitas"
>>
>>
>
>

Tue Oct 16, 2012 2:33 am (PDT) . Posted by:

"Kelik Pitoyo"

Dear Be-Exceller,

Mohon Bantuan para Master Excel,

Saya dapat rumus ini dari Bp. Ghozi, Makasih Pak.

Namun bila saya terapkan kenapa bisa timbul double data?

Mohon solusi, masukan dari Master.

Terima kasih sebelumnya,

Salam,

Kelik

GROUP FOOTER MESSAGE
---------------------------------------------------------------------
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