Jumat, 28 September 2012

[belajar-excel] Digest Number 1810

15 New Messages

Digest #1810
2a
Re: Fwd: Rekap Data Dari Banyak Sheet by "M.Ade Alfarid" aderyo
3a
Rekap Data dari banyak workbook by "M.Ade Alfarid" aderyo
3c
Re: Rekap Data dari banyak workbook by "M.Ade Alfarid" aderyo
4a
Bls: [belajar-excel] macro cari hari Libur by "Kusnadi Bin zain" kbinzain
4b
Re: macro cari hari Libur by "Kid Mr." nmkid.family@ymail.com
4c
5a
Conditional Formatting - Jam Kerja by "Prodev SIMPLE PB" prodev_simple
5b
5c
6a
Re: LOGIN FORM & EMBED COMMANBUTTON by "Kid Mr." nmkid.family@ymail.com
6b
Re: LOGIN FORM & EMBED COMMANBUTTON by "sapicumi" sapicumi@rocketmail.com
7
Minta tolong gimana caranya cari hari dari tanggal by "Annisa Maharani" amarra281089@ymail.com

Messages

Thu Sep 27, 2012 3:38 pm (PDT) . Posted by:

"ghozi alkatiri" ghozialkatiri

coba yang ini  , mudah mudahan seperti yang diinginkan

wassalam

Ghozi Alkatiri

________________________________
Dari: Goro Gituloh <goro_lennon@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Kamis, 27 September 2012 9:49
Judul: Re: Bls: [belajar-excel] [ASK] Input Otomatis ke Sheet yang berbeda (Tanpa Makro)


 
Mas Ghozi,
Terimakasih banyak atas bantuannya. Tetapi kok tidak bisa langsung otomatis masuk ke sheet "solusi" ya Mas kalau ada penembahan barang di sheet "Database"?
Dan untuk sistem ranking, akan bermasalah jika kita input barang untuk tahun produksi yang sama.

Additional Info:
Nama barang tidak akan pernah sama (unique).
Tahun produksi bisa sama (tidak unique)

Thank you.

________________________________
From: ghozi alkatiri <ghozialkatiri@yahoo.co.id>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Sent: Wednesday, September 26, 2012 8:59 PM
Subject: Bls: [belajar-excel] [ASK] Input Otomatis ke Sheet yang berbeda (Tanpa Makro)


 
dibutuhkan dua kolom bantu
kolom bantu pertama di sheet database untuk mesortir tahun secara ascending

kolom bantu ke dua di sheet perhitungan (solusi) untuk dijadikan acuan mengubah warna font pada data barang yang belum terjual dengan conditional formating karena untuk rujukan kondisional formating harus berada di sheet yang sama

formula untuk mengisi kolom barang ditulis pertama di C4 (formula array)
{=IFERROR(INDEX(Database!$C$3:$C$12;MATCH(SMALL(IF(Database!$B$3:$B$12=LOOKUP(2;1/ISTEXT(B$3:B3);B$3:B3);Database!$G$3:$G$12);ROW()-MATCH(LOOKUP(2;1/ISTEXT(B$3:B3);B$3:B3);B$1:B4;0));Database!$G$3:$G$12;0));"")}
copy ke bawah

formula untuk mengisi kolom jumlah ditulis pertama di kolom D4 (formula biasa)
=IF(C4="";"";INDEX(Database!$F$3:$F$12;MATCH(C4;Database!$C$3:$C$12;0)))
copy ke bawah.

wassalam

Ghozi Alkatiri

________________________________
Dari: Goro Gituloh <goro_lennon@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Rabu, 26 September 2012 13:25
Judul: [belajar-excel] [ASK] Input Otomatis ke Sheet yang berbeda (Tanpa Makro)


 
Teman - teman,

Kalau ada kasus seperti terlampir di attachment, bagaimana jika setiap kita
input sesuatu menurut karakteristiknya di sheet "Database", akan
langsung otomatis tersusun di sheet "Perhitungan" beserta kriteria -
kriteria nya (ada di file terlampir)?

Bisa tidak solusinya tanpa makro?
Thanks.

Thu Sep 27, 2012 6:58 pm (PDT) . Posted by:

"M.Ade Alfarid" aderyo

Terimakasih atas solusinya,
Mantap!
Semoga bermanfaat untuk yang lain juga.

Next thread : Rekap Data dari banyak workbook

Ade

On Thu, 27 Sep 2012 21:24:37 +0700, aji mumpung <pupung1986@gmail.com>
wrote:

> Hai pak Ade,
>
> ikutan kasih solusi ya.. semoga solusi ini juga bermanfaat untuk member
> yang lain..
>
> sebelumnya pak Ferdy sudah memberikan solusi dengan SumProduct >> fungsi
> ini menurut saya SumProduct adalah fungsi yang sangat hebat karena dapat
> membuat summary dengan begitu banyak kriteria, dan solusi menggunakan
> fungsi SumIf dari x-Mickey.
>
> Sekarang kita coba membuat rekap data dari banyak sheet menggunakan Pivot
> Table.
>
> Pada excel 2007 dan 2010 tidak tampak lagi wizard untuk membuat Pivot
> Table, pada hal dalam versi 2003 kita dapat membuat pivot table darimulti
> sheet menggunakan wizard ini.. untungnya pada excel 2007/2010 masih dapat
> menampilkan wizard tersebut dengan sedikit trik..
>
> Caranya sebagai berikut:
>
> 1. tekan tombol *ALT D* setelah itu tekan tombol *P* sehingga munculPivot
> Table Wizard seperti gambar berikut:
>
> [image: Gambar sisip 2]
>
> perhatikan yang saya beri tanda dengan kotak warna merah "Multiple
> consolidation ranges" , beri tanda di tempat tersebut lalu klik Next,yang
> akan memunculkan form sbb:
>
> [image: Gambar sisip 3]
>
> pilih "Create a single page field for me" lalu klik Next
>
> [image: Gambar sisip 4]
>
> blok data di sheet W1 >> tekan tombol Add, ulangi untuk sheet W2 dan W3
> lalu klik Next
>
> [image: Gambar sisip 5]
>
> pilih lokasi Pivot Table yang anda inginkan.. lalu klik Finish...
>
> hasil akhir bisa dilihat di file terlampir.
>
> wassalam,
>
>
> -aji mumpung- (cah angon seko gunung merbabu)
>
> Pada 27 September 2012 17:49, M.Ade Alfarid <QA@kkmi.co.id> menulis:
>
>> **
>> Untuk data Kode tersebut memang dinamis sekali Pak,
>> tidak terduga-duga, dan sifatnya cepat terkadang 10 menit saja.
>>
>> Terimakasih
>>
>> Ade
>>
>> On Thu, 27 Sep 2012 13:14:11 +0700, <the_x_mikey@yahoo.com> wrote:
>>
>> > Jadi pengisian kode di sheet rekap itu secara otomatis?
>> > Misalnya ada kode abc di sheet w1 kemudian otomatis ditambahkandidalam
>> > sheet rekap?
>> >
>> > Jalan paling mudah adalah menjadikan sheet rekap sebagai database,
>> yaitu
>> > mendaftarkan smua kode didalamnya. Jika seperti ini, maka case closed
>> > setelah menggunakan rumus sumproduct dr pak Ferdy atau sumif dari saya
>> > -----Original Message-----
>> > From: "M.Ade Alfarid" <QA@kkmi.co.id>
>> > Sender: belajar-excel@yahoogroups.com
>> > Date: Thu, 27 Sep 2012 12:55:31
>> > To: <belajar-excel@yahoogroups.com>
>> > Reply-To: belajar-excel@yahoogroups.com
>> > Subject: Re: [belajar-excel] Fwd: Rekap Data Dari Banyak Sheet
>> >
>> > Dear,
>> >
>> > Terimakasih tanggapannya,
>> > Untuk kode yang kembar memang seperti itu Pak,
>> > Jika ada data kembar data rekapnya jadi satu nomor kode dan ditotal,
>> >
>> > Mohon bantuannya
>> >
>> > Ade
>> >
>> >
>> > On Thu, 27 Sep 2012 11:38:08 +0700, <the_x_mikey@yahoo.com> wrote:
>> >
>> >> Hi pak Ade,
>> >>
>> >> Monggo dicoba rumus saya, btw kenapa kode di sheet rekap ada yg
>> >> kembarya?
>> >> -----Original Message-----
>> >> From: "M.Ade Alfarid" <QA@kkmi.co.id>
>> >> Sender: belajar-excel@yahoogroups.com
>> >> Date: Thu, 27 Sep 2012 11:07:53
>> >> To: belajar-excel@yahoogroups.com<belajar-excel@yahoogroups.com>
>> >> Reply-To: belajar-excel@yahoogroups.com
>> >> Subject: [belajar-excel] Fwd: Rekap Data Dari Banyak Sheet
>> >>
>> >> Maaf lampiran ketinggalan,--
>> >>
>> >> _________________________________
>> >> Dear BeExceller,
>> >>
>> >> Jika ingin merekap data di sheet 1,sheet 2, sheet 3 dst
>> >> Formula apa yang digunakan?
>> >>
>> >> Terimakasih,
>> >>
>> >> Ade

Thu Sep 27, 2012 7:09 pm (PDT) . Posted by:

"M.Ade Alfarid" aderyo

Dear BeExceller,

Sebelumnya telah disolusikan rekap data dari banyak sheet,
nah jika saya ingin summary dari rekap data tiap workbook tersebut,
apakah masih bisa menggunakan pivot tabel?
Apakah hasil dari pivot table tiap file tersebut bisa dijadikan source
data?
Misalnya Workbook baru dengan nama Hasil.xlsx adalah summary rekap data
dari
workbook Data 1,2 dan 3.

Salam

Ade

Thu Sep 27, 2012 7:24 pm (PDT) . Posted by:

"aji mumpung"

Q: apakah masih bisa menggunakan pivot tabel?
A: Bisa

Q: caranya gimana?
A: sama dengan postingan dari saya sebelumnya

Q: Apakah hasil dari pivot table tiap file tersebut bisa dijadikan
source data?
A: Bisa, menggunakan fungsi =GetPivotData ==> excel 2007/2010, untuk excel
2003 saya tidak tau karena saya sudah tida punya versi tersebut

tetapi... (ada tapinya nih..) Pivot Table umumnya digunakan untuk membuat
laporan bukan sebagai data base.. jadi usahakan tetap agar data base bukan
berasal dari Pivot Table.. kalau pun ingin menjadikannya sebagai data base
---kalo saya pribadi--- akan saya rubah dahulu dengan cara Convert to
Range sehingga link data terputus dari data base sebelumnnya.

Jadi pilihan pertama >> jangan jadikan Pivot Table sebagai data base, kalo
udah mentok ya gpp, tapi biasanya kalo udah mentok dan tanya lagi ke millis
ini akan ada member yang berbaik hati akan membagi ilmunya

wassalam,

-aji mumpung-

Pada 28 September 2012 09:04, M.Ade Alfarid <QA@kkmi.co.id> menulis:

> **
>
>
> Dear BeExceller,
>
> Sebelumnya telah disolusikan rekap data dari banyak sheet,
> nah jika saya ingin summary dari rekap data tiap workbook tersebut,
> apakah masih bisa menggunakan pivot tabel?
> Apakah hasil dari pivot table tiap file tersebut bisa dijadikan source
> data?
> Misalnya Workbook baru dengan nama Hasil.xlsx adalah summary rekap data
> dari
> workbook Data 1,2 dan 3.
>
> Salam
>
> Ade
>
>

Thu Sep 27, 2012 7:29 pm (PDT) . Posted by:

"M.Ade Alfarid" aderyo

Terimakasih,
Akan dipraktekkan terlebih dahulu....
Semangat!!!

Ade

On Fri, 28 Sep 2012 09:24:53 +0700, aji mumpung <pupung1986@gmail.com>
wrote:

> Q: apakah masih bisa menggunakan pivot tabel?
> A: Bisa
>
> Q: caranya gimana?
> A: sama dengan postingan dari saya sebelumnya
>
> Q: Apakah hasil dari pivot table tiap file tersebut bisa dijadikan
> source data?
> A: Bisa, menggunakan fungsi =GetPivotData ==> excel 2007/2010, untukexcel
> 2003 saya tidak tau karena saya sudah tida punya versi tersebut
>
> tetapi... (ada tapinya nih..) Pivot Table umumnya digunakan untukmembuat
> laporan bukan sebagai data base.. jadi usahakan tetap agar data basebukan
> berasal dari Pivot Table.. kalau pun ingin menjadikannya sebagai database
> ---kalo saya pribadi--- akan saya rubah dahulu dengan cara Convert to
> Range sehingga link data terputus dari data base sebelumnnya.
>
> Jadi pilihan pertama >> jangan jadikan Pivot Table sebagai data base,kalo
> udah mentok ya gpp, tapi biasanya kalo udah mentok dan tanya lagi ke
> millis
> ini akan ada member yang berbaik hati akan membagi ilmunya
>
>
> wassalam,
>
> -aji mumpung-
>
> Pada 28 September 2012 09:04, M.Ade Alfarid <QA@kkmi.co.id> menulis:
>
>> **
>>
>>
>> Dear BeExceller,
>>
>> Sebelumnya telah disolusikan rekap data dari banyak sheet,
>> nah jika saya ingin summary dari rekap data tiap workbook tersebut,
>> apakah masih bisa menggunakan pivot tabel?
>> Apakah hasil dari pivot table tiap file tersebut bisa dijadikan source
>> data?
>> Misalnya Workbook baru dengan nama Hasil.xlsx adalah summary rekap data
>> dari
>> workbook Data 1,2 dan 3.
>>
>> Salam
>>
>> Ade
>>

Thu Sep 27, 2012 8:24 pm (PDT) . Posted by:

"Kusnadi Bin zain" kbinzain

Pak Aji

Terima kasih respon dan penjelasannya, tapi maaf knapa masih FALSE ya #tepuk jidad tetep sy gakmudeng#

kusnadi

________________________________
Dari: aji mumpung <pupung1986@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 27 September 2012 20:00
Judul: Re: [belajar-excel] macro cari hari Libur


 
hai pak Kusnadi,

Pertama, pak kusnadi berusaha mengecek apakah tanggal di cell a44 sampai cell a56 adalah hari libur atau tidak dengan menggunakan prosedur IsLibur.. sedangkan prosedur IsLibur yang dibuat oleh (alm) pak Masyhud .aka. Siti Vi bukanlah udf yang dapat diakses dengan cara menekan tombol sama dengan "=" di worksheet, karena fungsi tersebut dideklarasikan sebagai Private function bukan sebagai Public function

Kedua, jika pun prosedur tersebut diubah dari Private menjadi Public sehingga dapat diakses dengan cara menekan tombol "=", cell yang akan diuji adalah variabel HariHa yang berada di prosedur Cetcetcowet, karena fungsi IsLibur ini adalah satu paket dengan prosedur yang bernama Cetcetcowet 

Lalu gimana? donk? kalo gitu udf-nya gak bisa dipakai dong? jawabnya >>> BISA.. dengan melakukan sedikit modifikasi sebagai berikut:

Pertama, sesuaikan dahulu luas range "LiburNas" karena yang dibuat oleh (alm) pak Mashud .aka. Siti Vi adalah mulai cell a4 sampai a25, sedangkan yang dibuat oleh pak Kusnadi adalah a4 sampai a22, di lain waktu mungkin hari libur akan lebih banyak lagi sehingga batasan a25 tidak akan mencukupi.. oleh sebab itu ada baiknya range "LiburNas" dibuat dinamis

Kedua, ubah sedikit prosedur IsLibur dari Private menjadi Public agar dapat muncul seperti fungsi Excel yang lain pada saat user menekan tombol sama dengan "="

Ketiga, ubah rujukan nilai yang akan diuji dari HariHa (ada di prosedur Cetcetcowet) menjadi D sesuai dengan variabel yang telah dideklarasikan oleh (alm) pak Masyhud dalam fungsi IsLibur, setelah variabel tersebut diubah maka pada akhirnya fungsi ini akan menjadi udf yang berdiri sendiri dan terpisah dari prosedur Cetcetcowet

kode lengkapnya gimana?

Option Explicit
Public Function IsLibur(D As Date) As Boolean
' ===================================
' code by    : Siti Vi 17 , juli 2008
' re-touch by: aji mumpung
' gunung merbabu , 27 sept 2012
' ===================================

   Dim X As Range
   Dim HdLbr As Range
   Set HdLbr = Sheets("sheet1").Range("a4")
   Set Liburnas = Range(HdLbr, HdLbr.End(xlDown))
   For Each X In Liburnas
      If X.Value = D Then
         IsLibur = True
         Else
         IsLibur = False
      End If
   Next X
End Function

Yang diberi warna biru untuk memberitahu kepada Excel bahwa fungsi ini dapat diakses langsung dari worksheet dengan menekan tombol sama dengan, sama seperti fungsi di excel lainnya.

Yang diberi warna merah untuk memberitahukan kepada excel bahwa prosedur ini adalah merupakan fungsi yang akan langsung menampilan nilai atau hasil dari suatu perhitungan

Yang diberi warna hijau adalah range hari libur yang sudah dibuat dinamis

caranya pakainya gimana?
buka sebuah workbook baru, tekan tombol ALT F11 >>> Insert >>> Module
tulis code tersebut di module yang baru saja dibikin
Pada sheet1 pada kolom A mulai baris ke 4, tuliskan tanggal-tanggal libur nasional

jika semua langkah di atas diikuti, maka pada worksheet pada saat ditekan tombol "=" maka akan muncul fungsi IsLibur.

cmiiw (kata mbak'e Colek Me If I'm Wrong)

wassalam,

-aji mumpung- (cah angon seko gunung merbabu)

Pada 27 September 2012 15:47, Kusnadi Bin zain <kbinzain@yahoo.co.id> menulis:

> 
>Dear para Pakar XL
>
>
>Dulu saya pernah menerima macro spt terlampir
>tapi kayaknya ada yang salah, sehingga Fungsi ISLIBUR tidak bisa jalan
>
>
>terus terang saya gak paham dimana kesalahannya, tolong jika ada yang bisa membantu saya.
>
>
>Terima kasih
>
>
>Kusnadi

Thu Sep 27, 2012 8:28 pm (PDT) . Posted by:

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

Setelah baris berbunyi :
IsLibur = True
tambahkan :
exit function

Wassalam,
Kid.

2012/9/28 Kusnadi Bin zain <kbinzain@yahoo.co.id>

> **
>
>
> Pak Aji
>
> Terima kasih respon dan penjelasannya, tapi maaf knapa masih FALSE ya
> #tepuk jidad tetep sy gakmudeng#
>
> kusnadi
>
>
> ------------------------------
> *Dari:* aji mumpung <pupung1986@gmail.com>
> *Kepada:* belajar-excel@yahoogroups.com
> *Dikirim:* Kamis, 27 September 2012 20:00
> *Judul:* Re: [belajar-excel] macro cari hari Libur
>
>
> hai pak Kusnadi,
>
> Pertama, pak kusnadi berusaha mengecek apakah tanggal di cell a44 sampai
> cell a56 adalah hari libur atau tidak dengan menggunakan prosedur IsLibur..
> sedangkan prosedur IsLibur yang dibuat oleh (alm) pak Masyhud .aka. Siti Vi
> bukanlah udf yang dapat diakses dengan cara menekan tombol sama dengan "="
> di worksheet, karena fungsi tersebut dideklarasikan sebagai Private
> function bukan sebagai Public function
>
> Kedua, jika pun prosedur tersebut diubah dari Private menjadi Public
> sehingga dapat diakses dengan cara menekan tombol "=", cell yang akan diuji
> adalah variabel HariHa yang berada di prosedur Cetcetcowet, karena fungsi
> IsLibur ini adalah satu paket dengan prosedur yang bernama Cetcetcowet
>
> Lalu gimana? donk? kalo gitu udf-nya gak bisa dipakai dong? jawabnya >>>
> BISA.. dengan melakukan sedikit modifikasi sebagai berikut:
>
> Pertama, sesuaikan dahulu luas range "LiburNas" karena yang dibuat oleh
> (alm) pak Mashud .aka. Siti Vi adalah mulai cell a4 sampai a25, sedangkan
> yang dibuat oleh pak Kusnadi adalah a4 sampai a22, di lain waktu mungkin
> hari libur akan lebih banyak lagi sehingga batasan a25 tidak akan
> mencukupi.. oleh sebab itu ada baiknya range "LiburNas" dibuat dinamis
>
> Kedua, ubah sedikit prosedur IsLibur dari Private menjadi Public agar
> dapat muncul seperti fungsi Excel yang lain pada saat user menekan tombol
> sama dengan "="
>
> Ketiga, ubah rujukan nilai yang akan diuji dari HariHa (ada di prosedur
> Cetcetcowet) menjadi D sesuai dengan variabel yang telah dideklarasikan
> oleh (alm) pak Masyhud dalam fungsi IsLibur, setelah variabel tersebut
> diubah maka pada akhirnya fungsi ini akan menjadi udf yang berdiri sendiri
> dan terpisah dari prosedur Cetcetcowet
>
> kode lengkapnya gimana?
>
> Option Explicit
> *Public* *Function* IsLibur(D As Date) As Boolean
> ' ===================================
> ' code by : Siti Vi 17 , juli 2008
> ' re-touch by: aji mumpung
> ' gunung merbabu , 27 sept 2012
> ' ===================================
>
> Dim X As Range
> Dim HdLbr As Range
> Set HdLbr = Sheets("sheet1").Range("a4")
> Set Liburnas = Range(HdLbr, HdLbr.End(xlDown))
> For Each X In Liburnas
> If X.Value = D Then
> IsLibur = True
> Else
> IsLibur = False
> End If
> Next X
> End Function
>
> Yang diberi warna *biru* untuk memberitahu kepada Excel bahwa fungsi ini
> dapat diakses langsung dari worksheet dengan menekan tombol sama dengan,
> sama seperti fungsi di excel lainnya.
>
> Yang diberi warna *merah* untuk memberitahukan kepada excel bahwa
> prosedur ini adalah merupakan fungsi yang akan langsung menampilan nilai
> atau hasil dari suatu perhitungan
>
> Yang diberi warna *hijau* adalah range hari libur yang sudah dibuat
> dinamis
>
> caranya pakainya gimana?
> buka sebuah workbook baru, tekan tombol ALT F11 >>> Insert >>> Module
> tulis code tersebut di module yang baru saja dibikin
> Pada sheet1 pada kolom A mulai baris ke 4, tuliskan tanggal-tanggal libur
> nasional
>
> jika semua langkah di atas diikuti, maka pada worksheet pada saat ditekan
> tombol "=" maka akan muncul fungsi IsLibur.
>
> cmiiw (kata mbak'e Colek Me If I'm Wrong)
>
> wassalam,
>
> -aji mumpung- (cah angon seko gunung merbabu)
>
> Pada 27 September 2012 15:47, Kusnadi Bin zain <kbinzain@yahoo.co.id>menulis:
>
> **
>
> Dear para Pakar XL
>
> Dulu saya pernah menerima macro spt terlampir
> tapi kayaknya ada yang salah, sehingga Fungsi ISLIBUR tidak bisa jalan
>
> terus terang saya gak paham dimana kesalahannya, tolong jika ada yang bisa
> membantu saya.
>
> Terima kasih
>
> Kusnadi
>
>
>
>
>
>

Thu Sep 27, 2012 9:01 pm (PDT) . Posted by:

"aji mumpung"

Pak Kusnadi..

ternyata masih ada kesalahan dalam codenya.. berikut yang sudah diperbaiki

Option Explicit
*Public* *Function* IsLibur(D As Date) As Boolean
' ===================================
' code by : Siti Vi , 17 juli 2008
' re-touch by: aji mumpung
' gunung merbabu , 27 sept 2012
' ===================================

Dim X As Range
Dim HdLbr As Range
*Dim Liburnas As Range*
Set HdLbr = Sheets("sheet1").Range("a4")
Set Liburnas = Range(HdLbr, HdLbr.End(xlDown))
For Each X In Liburnas
If X.Value = D Then
IsLibur = True
*Exit Function*
Else
IsLibur = False
End If
Next X
End Function

yang diberi warna *biru* adalah perbaikan dari Mr. Kid, sedangkan yang
warna *merah* adalah deklarasi variabel yang terlewat saya tambahkan

wassalam,

-aji mumpung-

Pada 28 September 2012 10:28, Kid Mr. <mr.nmkid@gmail.com> menulis:

> **
>
>
> Setelah baris berbunyi :
> IsLibur = True
> tambahkan :
> exit function
>
>
> Wassalam,
> Kid.
>
>
> 2012/9/28 Kusnadi Bin zain <kbinzain@yahoo.co.id>
>
>> **
>>
>>
>> Pak Aji
>>
>> Terima kasih respon dan penjelasannya, tapi maaf knapa masih FALSE ya
>> #tepuk jidad tetep sy gakmudeng#
>>
>> kusnadi
>>
>>
>>

Thu Sep 27, 2012 8:24 pm (PDT) . Posted by:

"Prodev SIMPLE PB" prodev_simple

Assalamu'alaikum Wr. Wb.

Dear para Master...mohon bantuannya untuk menyelesaikan permasalahan sederhana berikut.
Sebelum dan sesudahnya disampaikan terima kasih.
File terlampir.

Wassalam.

 
- prodev simple -

Thu Sep 27, 2012 9:37 pm (PDT) . Posted by:

"M.Ade Alfarid" aderyo

Terlampir Solusinya
Semoga bisa membantu

Ade

On Fri, 28 Sep 2012 09:52:09 +0700, Prodev SIMPLE PB
<prodev_simple@yahoo.com> wrote:

> Assalamu'alaikum Wr. Wb.
>
> Dear para Master...mohon bantuannya untuk menyelesaikan permasalahan
> sederhana berikut.
> Sebelum dan sesudahnya disampaikan terima kasih.
> File terlampir.
>
> Wassalam.
>
> - prodev simple -

Thu Sep 27, 2012 11:07 pm (PDT) . Posted by:

"Prodev SIMPLE PB" prodev_simple

Terima kasih banyak atas solusinya.

 
- prodev simple -

________________________________
Dari: M.Ade Alfarid <QA@kkmi.co.id>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Jumat, 28 September 2012 11:31
Judul: Re: [belajar-excel] Conditional Formatting - Jam Kerja


 
Terlampir Solusinya
Semoga bisa membantu

Ade

On Fri, 28 Sep 2012 09:52:09 +0700, Prodev SIMPLE PB
<prodev_simple@yahoo.com> wrote:

> Assalamu'alaikum Wr. Wb.
>
> Dear para Master...mohon bantuannya untuk menyelesaikan permasalahan
> sederhana berikut.
> Sebelum dan sesudahnya disampaikan terima kasih.
> File terlampir.
>
> Wassalam.
>
> - prodev simple -

Thu Sep 27, 2012 11:09 pm (PDT) . Posted by:

"indria pie" mas_pie3



Wassalamualaikum Pak Hadhi

berikut sedikit solusi dari saya yang masih rookie dalam excel

trims

________________________________
Dari: Prodev SIMPLE PB <prodev_simple@yahoo.com>
Kepada: Belajar Excel Milis <belajar-excel@yahoogroups.com>
Dikirim: Jumat, 28 September 2012 9:52
Judul: [belajar-excel] Conditional Formatting - Jam Kerja


 
Assalamu'alaikum Wr. Wb.

Dear para Master...mohon bantuannya untuk menyelesaikan permasalahan sederhana berikut.
Sebelum dan sesudahnya disampaikan terima kasih.
File terlampir.

Wassalam.
 
- prodev simple -

Fri Sep 28, 2012 12:10 am (PDT) . Posted by:

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

Coba file terlampir

Wassalam,
Kid.

2012/9/27 sapicumi <sapicumi@rocketmail.com>

> **
>
>
> Selamat malam semuaa
> langsung saja ya saya ada kesulitan dalam membuat login form seperti
> terlampir mohon pencerahan dari master master excel disini
>
> - apakah mungkin menggunakan coding sbb di VBA
> cmd1.Enabled = False
> cmd2.Enabled = False
> cmd3.Enabled = False
> cmd4.Enabled = False
> dan permasalahan lain ada di file terlampir ya sodara-sodara semua
> loginform.xlsm
> <
> http://milis-belajar-excel.1048464.n5.nabble.com/file/n5712135/loginform.xlsm>
>
>
> terimakasih
> jojo
>
> --
> View this message in context:
> http://milis-belajar-excel.1048464.n5.nabble.com/LOGIN-FORM-EMBED-COMMANBUTTON-tp5712135.html
> Sent from the Milis Belajar Excel mailing list archive at Nabble.com.
>
>

Fri Sep 28, 2012 3:37 am (PDT) . Posted by:

"sapicumi" sapicumi@rocketmail.com

trimakasih untuk pak karnadi dan kid atas masukanya sehingga memberi saya
pencerahan sebagai berikut

Private Sub cmdkon_Click()
'Membuat variabel
Dim user As String
Dim pass As String
Dim lcari As Long
Dim kcari As Long

'Memastikan
If Trim(txtuser.Value) = "" Then
MsgBox "USER ID", vbInformation, "Info"
Exit Sub
End If
On Error Resume Next
user = LCase(Trim(txtuser.Value))
pass = LCase(Trim(txtpass.Value))
lcari = 0
'kcari = 0
lcari = Sheets("tbluser").Columns("C:C").Find(user).Row
'kcari = Sheets("tbluser").Columns("D:D").Find(pass).Row
'Jika pencarian gagal maka nilai variabel lCari akan tetap nol
If lcari = 0 Then
MsgBox "USER ID " & user & " tidak ditemukan!!" & Chr(13) & _
"Silahkan isikan yang lain", vbInformation, "Info"
txtuser.Value = ""
txtpass.Value = ""
Exit Sub
End If
With Sheets("tbluser")
Range("J3").Value = .Range("E" & lcari).Value
'With Sheets("frmbarangmasuk")
Sheets("frmbarangmasuk").Range("C10").Value = txtuser.Value
Sheets("frmbarangkeluar").Range("C10").Value = txtuser.Value
txtuser.Value = ""
txtpass.Value = ""
End With
If Range("J3").Value = "User" Then
cmdinputdata.Enabled = True
cmdtransaksi.Enabled = True
cmdtransaksib.Enabled = True
Else
If Range("J3").Value = "Admin" Then
cmdadmin.Enabled = True
End If
End If
End Sub

namun itu hanya untuk user name saja untuk pasword tidak bisa ada kah yg
dapat memberi ide untk even mencocokan User dan Password file terlampir
LOGIN.xlsm
<http://milis-belajar-excel.1048464.n5.nabble.com/file/n5712154/LOGIN.xlsm>
mohon pencerahanya
terimakasih
jojo

--
View this message in context: http://milis-belajar-excel.1048464.n5.nabble.com/LOGIN-FORM-EMBED-COMMANBUTTON-tp5712135p5712154.html
Sent from the Milis Belajar Excel mailing list archive at Nabble.com.

Fri Sep 28, 2012 3:38 am (PDT) . Posted by:

"Annisa Maharani" amarra281089@ymail.com

Minta tolong gimana caranya kolom tanggal bisa dicari hari nya?
Saya sudah gunakan rumus TEXT sampe VLOOKUP tetapi masih ga bisa, kecuali
tanggal yg ada dikolom tersebut benar-benar format tanggal. Ini karena data
yang diambil langsung dari mesin absen sehingga penulisannya seperti itu.

Mohon Bantuannya,
Regards,
Annisa ABSEN_16-AUG-12_-_31-AUG-12_(2)_+_rumus.xlsx
<http://milis-belajar-excel.1048464.n5.nabble.com/file/n5712155/ABSEN_16-AUG-12_-_31-AUG-12_%282%29_%2B_rumus.xlsx>

--
View this message in context: http://milis-belajar-excel.1048464.n5.nabble.com/Minta-tolong-gimana-caranya-cari-hari-dari-tanggal-tp5712155.html
Sent from the Milis Belajar Excel mailing list archive at Nabble.com.

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
---------------------------------------------------------------------
Diposting oleh EXCEL FEED LEARNING di 03.38

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)