9 Messages
Digest #2976
6a
Fw: [belajar-excel] Tanya Cara Copy paste otomatis_Macros [1 Attachm by "hendrik karnadi" hendrikkarnadi
6b
Fw: [belajar-excel] Tanya Cara Copy paste otomatis_Macros [2 Attachm by "hendrik karnadi" hendrikkarnadi
Messages
Mon Jun 16, 2014 5:56 pm (PDT) . Posted by:
"roy sumarna" rohendi_2000
master excel yg terhormat,
bagimana caranya memasukan file jpg ke dalam database excel. untuk kebutuhan pembuatan tanda pengenal..
terima kasih. bantuannya
rohaendi
bagimana caranya memasukan file jpg ke dalam database excel. untuk kebutuhan pembuatan tanda pengenal..
terima kasih. bantuannya
rohaendi
Mon Jun 16, 2014 6:39 pm (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Ini warisan dari milis pak.
Salam,
HK
On Monday, 16 June 2014, 22:52, "roy sumarna rohendi_2000@yahoo.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
master excel yg terhormat,
bagimana caranya memasukan file jpg ke dalam database excel. untuk kebutuhan pembuatan tanda pengenal..
terima kasih. bantuannya
rohaendi
Salam,
HK
On Monday, 16 June 2014, 22:52, "roy sumarna rohendi_2000@yahoo.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
master excel yg terhormat,
bagimana caranya memasukan file jpg ke dalam database excel. untuk kebutuhan pembuatan tanda pengenal..
terima kasih. bantuannya
rohaendi
Mon Jun 16, 2014 6:50 pm (PDT) . Posted by:
"NangAgus"
Asalamualaikumwarahmatullah,
Abu Dimas,
Pakai kolom bantu ya...
Coba gunakan formula:
=$C$2+INDEX(ROW($1:$7);MATCH(C3;$J$3:$J$9;0))-INDEX(ROW($1:$7);MATCH($D$2;$J$3:$J$9;0))
Diubah dahulu hari senin menjadi 1 dan rabu menjadi 3
kita hitung dahulu selisih antara hari rabu dengan hari senin, (3-1)
kemudian selisihnya dijumlah dengan tanggal pertama.
Wasalamualaikumwarahmatullah
NangAgus
On 15/06/2014 15:46, abudimaz@yahoo.co.id [belajar-excel] wrote:
>
> Assalamu alaikum warahmatullah
>
> Mohon bantuan para master dan suhu.
> Saya ingin membuat tanggal tatap muka/pertemuan yang dinamis sesuai
> hari dalam jadwal mengajar selama 1 semester di mulai dari tgl awal
> masuk semester, namun mengalami kebuntuan dalam mencari rumus yang pas.
> Untuk lebih jelasnya, sy lampirkan filenya.
>
> Terimakasih sebelumnya.
>
> Wassalamu alaikum warahmatullah
>
>
>
>
>
Abu Dimas,
Pakai kolom bantu ya...
Coba gunakan formula:
=$C$2+INDEX(ROW($1:$7);MATCH(C3;$J$3:$J$9;0))-INDEX(ROW($1:$7);MATCH($D$2;$J$3:$J$9;0))
Diubah dahulu hari senin menjadi 1 dan rabu menjadi 3
kita hitung dahulu selisih antara hari rabu dengan hari senin, (3-1)
kemudian selisihnya dijumlah dengan tanggal pertama.
Wasalamualaikumwarahmatullah
NangAgus
On 15/06/2014 15:46, abudimaz@yahoo.co.id [belajar-excel] wrote:
>
> Assalamu alaikum warahmatullah
>
> Mohon bantuan para master dan suhu.
> Saya ingin membuat tanggal tatap muka/pertemuan yang dinamis sesuai
> hari dalam jadwal mengajar selama 1 semester di mulai dari tgl awal
> masuk semester, namun mengalami kebuntuan dalam mencari rumus yang pas.
> Untuk lebih jelasnya, sy lampirkan filenya.
>
> Terimakasih sebelumnya.
>
> Wassalamu alaikum warahmatullah
>
>
>
>
>
Mon Jun 16, 2014 11:58 pm (PDT) . Posted by:
"abu dimaz" abudimaz
Terimakasih atas solusi yang diberikan. Jazakumullah khaira.
Namun masih belum pas dengan yg diinginkan.
Ketika sy coba copy ke bawah, hasilnya statis dari 3 tanggal pertama.
Mungkin maksud saya kurang dapat dimengerti.
Intinya sy ingin membuat tanggal loncat, sesuai jumlah hari mengajar dalam seminggu, selama 1 semester.
Jadi, jika sy ubah hari mengajarnya hanya 1 atau 2 atau 3 kali per minggu, tanggal otomatis berubah sesuai hari dan jumlah pertemuan.
Misal: Tanggal awalnya adalah hari Senin, tanggal 14/7/2014
Pertemuan pertama hari Senin
Pertemuan kedua hari Rabu
Maka tanggal pada kolom tanggal tatap muka otomatis berubah dari tgl 14/7/2014 s/d 30/12/2014.
Hanya saja tanggalnya sesuai dg hari pertemuan, yaitu hanya Senin dan Rabu saja.
Semoga dapat dipahami, dan mohon bantuannya.
Terimakasih sebelumnya.
Pada Selasa, 17 Juni 2014 8:50, "NangAgus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Asalamualaikumwarahmatullah,
Abu Dimas,
Pakai kolom bantu ya...
Coba gunakan formula:
=$C$2+INDEX(ROW($1:$7);MATCH(C3;$J$3:$J$9;0))-INDEX(ROW($1:$7);MATCH($D$2;$J$3:$J$9;0))
Diubah dahulu hari senin menjadi 1 dan rabu menjadi 3
kita hitung dahulu selisih antara hari rabu dengan hari senin,
(3-1)
kemudian selisihnya dijumlah dengan tanggal pertama.
Wasalamualaikumwarahmatullah
NangAgus
On 15/06/2014 15:46, abudimaz@yahoo.co.id [belajar-excel] wrote:
>Assalamu alaikum warahmatullah
>
>Mohon bantuan para master dan suhu.
>Saya ingin membuat tanggal tatap muka/pertemuan yang
dinamis sesuai hari dalam jadwal mengajar selama 1
semester di mulai dari tgl awal masuk semester, namun
mengalami kebuntuan dalam mencari rumus yang pas.
>Untuk lebih jelasnya, sy lampirkan filenya.
>
>Terimakasih sebelumnya.
>
>Wassalamu alaikum warahmatullah
>
>
>
>
>
>
Namun masih belum pas dengan yg diinginkan.
Ketika sy coba copy ke bawah, hasilnya statis dari 3 tanggal pertama.
Mungkin maksud saya kurang dapat dimengerti.
Intinya sy ingin membuat tanggal loncat, sesuai jumlah hari mengajar dalam seminggu, selama 1 semester.
Jadi, jika sy ubah hari mengajarnya hanya 1 atau 2 atau 3 kali per minggu, tanggal otomatis berubah sesuai hari dan jumlah pertemuan.
Misal: Tanggal awalnya adalah hari Senin, tanggal 14/7/2014
Pertemuan pertama hari Senin
Pertemuan kedua hari Rabu
Maka tanggal pada kolom tanggal tatap muka otomatis berubah dari tgl 14/7/2014 s/d 30/12/2014.
Hanya saja tanggalnya sesuai dg hari pertemuan, yaitu hanya Senin dan Rabu saja.
Semoga dapat dipahami, dan mohon bantuannya.
Terimakasih sebelumnya.
Pada Selasa, 17 Juni 2014 8:50, "NangAgus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Asalamualaikumwarahmatullah,
Abu Dimas,
Pakai kolom bantu ya...
Coba gunakan formula:
=$C$2+INDEX(ROW($1:$7);MATCH(C3;$J$3:$J$9;0))-INDEX(ROW($1:$7);MATCH($D$2;$J$3:$J$9;0))
Diubah dahulu hari senin menjadi 1 dan rabu menjadi 3
kita hitung dahulu selisih antara hari rabu dengan hari senin,
(3-1)
kemudian selisihnya dijumlah dengan tanggal pertama.
Wasalamualaikumwarahmatullah
NangAgus
On 15/06/2014 15:46, abudimaz@yahoo.co.id [belajar-excel] wrote:
>Assalamu alaikum warahmatullah
>
>Mohon bantuan para master dan suhu.
>Saya ingin membuat tanggal tatap muka/pertemuan yang
dinamis sesuai hari dalam jadwal mengajar selama 1
semester di mulai dari tgl awal masuk semester, namun
mengalami kebuntuan dalam mencari rumus yang pas.
>Untuk lebih jelasnya, sy lampirkan filenya.
>
>Terimakasih sebelumnya.
>
>Wassalamu alaikum warahmatullah
>
>
>
>
>
>
Mon Jun 16, 2014 9:41 pm (PDT) . Posted by:
"Mulki Akbar" mulki_akbar
Maaf baru bisa balas Pak NangAgus, saya baru masuk kantor dari cuti sejak
jumat lalu.
Alhamdulillah formulanya sudah bisa berfungsi dg baik, terimakasih banyak
atas pencerahannya Pak NangAgus.
Wassalam,
Mulki
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Friday, June 13, 2014 7:14 AM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Memunculkan data dg 2 pilihan [1 Attachment]
Dear Pak Mulki,
Rumus tersebut di Komputer saya berjalan dengan baik
coba lihat lampiran
Salam
NangAgus
On 12/06/2014 16:20, 'Mulki Akbar' mulki@aop.component.astra.co.id
[belajar-excel] wrote:
Terimakasih pak Nang Agus atas pencerahannya. Harapan saya memang
menggunakan formula.
Formula bapak masih ada error di tanda kutip seperti yg saya warnai MERAH.
Kira2 kenapa ya pak ?
Wassalam,
Mulki
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Thursday, June 12, 2014 3:20 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Memunculkan data dg 2 pilihan
Walaikum salam,
Pak Mulki sebaiknya pakai Pivot pak,
Namun apabila masih menginginkan formula, silahkan formula helper di sheet
DATA_SS_2014 di kolom A
yang tertulis
=IFERROR(SMALL(IF(C3:C37=JDWL_SS_EXPORT14!D5;ROW(1:35));ROW(1:35));"")
diubah menjadi :
=IFERROR(SMALL(IF((C3:C37=JDWL_SS_EXPORT14!D5)*(if(JDWL_SS_EXPORT14!I5="";1;
E3:E37=JDWL_SS_EXPORT14!I5));ROW(1:35));ROW(1:35));"")
semoga benar dugaan saya.
Wasalam
NangAgus
On 12/06/2014 14:55, 'Mulki Akbar' <mailto:mulki@aop.component.astra.co.id>
mulki@aop.component.astra.co.id [belajar-excel] wrote:
Assalamu'alaikum Wr. Wb.
Mohon bantuan guru & rekan2 milis B-XLers utk kasus memunculkan data dg 2
pilihan seperti pada contoh lampiran.
Jika sebelumnya pernah dibahas, kiranya guru & rekan2 berkenan memberikan
Linknya utk saya intip J
Terimakasih atas bantuan pencerahannya.
Wassalam,
Mulki
jumat lalu.
Alhamdulillah formulanya sudah bisa berfungsi dg baik, terimakasih banyak
atas pencerahannya Pak NangAgus.
Wassalam,
Mulki
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Friday, June 13, 2014 7:14 AM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Memunculkan data dg 2 pilihan [1 Attachment]
Dear Pak Mulki,
Rumus tersebut di Komputer saya berjalan dengan baik
coba lihat lampiran
Salam
NangAgus
On 12/06/2014 16:20, 'Mulki Akbar' mulki@aop.component.astra.co.id
[belajar-excel] wrote:
Terimakasih pak Nang Agus atas pencerahannya. Harapan saya memang
menggunakan formula.
Formula bapak masih ada error di tanda kutip seperti yg saya warnai MERAH.
Kira2 kenapa ya pak ?
Wassalam,
Mulki
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Thursday, June 12, 2014 3:20 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Memunculkan data dg 2 pilihan
Walaikum salam,
Pak Mulki sebaiknya pakai Pivot pak,
Namun apabila masih menginginkan formula, silahkan formula helper di sheet
DATA_SS_2014 di kolom A
yang tertulis
=IFERROR(SMALL(IF(C3:C37=JDWL_SS_EXPORT14!D5;ROW(1:35));ROW(1:35));"")
diubah menjadi :
=IFERROR(SMALL(IF((C3:C37=JDWL_SS_EXPORT14!D5)*(if(JDWL_SS_EXPORT14!I5="";1;
E3:E37=JDWL_SS_EXPORT14!I5));ROW(1:35));ROW(1:35));"")
semoga benar dugaan saya.
Wasalam
NangAgus
On 12/06/2014 14:55, 'Mulki Akbar' <mailto:mulki@aop.component.astra.co.id>
mulki@aop.component.astra.co.id [belajar-excel] wrote:
Assalamu'
Mohon bantuan guru & rekan2 milis B-XLers utk kasus memunculkan data dg 2
pilihan seperti pada contoh lampiran.
Jika sebelumnya pernah dibahas, kiranya guru & rekan2 berkenan memberikan
Linknya utk saya intip J
Terimakasih atas bantuan pencerahannya.
Wassalam,
Mulki
Mon Jun 16, 2014 11:57 pm (PDT) . Posted by:
"Odhy" odhyz83_assasaky
Dear Mr.Kid dan Para Master,
Untuk Point 1 saya sudah berhasil, kemudian untuk point ke 2 tentang export belum bisa saya pecahkan, saya sudah berkelana kesana kemari tapi masih belum bisa saya pecahkan, mohon bantuan para master..
Terima Kasih atas pencerahannya,
Odhy.
On Friday, April 11, 2014 10:31 AM, Mr. Kid <mr.nmkid@gmail.com> wrote:
hehehehe...
coba diikuti setahap demi setahap ya... yang a dulu sampai bisa jalan, baru yang b.
Wassalam,
Kid.
2014-04-11 10:25 GMT+07:00 Odhy <odhyz83_assasaky@yahoo.com>:
>
>Dear Mr.Kid,
>Terima kasih atas kelapangan hati Mr.Kid menjelaskan begitu detail, semoga para master diberikan berkah dan terus mengamalkan ilmunya kepada kami2 yang haus belajar. ''Al Ilmu bila amalain kassajari bila samarin"....
>
>Selanjutnya kembali ke topic Mr.Kid, mungkin untuk case 1 bisa saya pahami namun untuk case yg ke-2 imajinasi saya belum sampai ke situ bagaimana coding2nya.... untuk itu mohon pencerahanya....
>
>
>Terima Kasih atas pencerahannya,
>
>
>
>Odhy.
>On Friday, April 11, 2014 9:52 AM, Mr. Kid <mr.nmkid@gmail.com> wrote:
>
>
>Hai Odhy,
>
>1. setelah di aktifkan, kapan menjadi tidak aktif lagi ?
>
>Cara mengaktifkan tombol atau me-nonaktifkan adalah dengan mengatur properti bernama Enable bernilai FALSE atau TRUE
>
> cmdTombolku.enabled=true '--> tombol bernama cmdTombolku akan aktif
> cmdTombolku.enabled=false '--> tombol bernama cmdTombolku akan tidak aktif
>
>a. pada event initialize milik userform, atur agar seluruh tombol memiliki nilai properti bernama Enabled adalah FALSE kecuali tombol ambil data yang properti Enabled nya bernilai TRUE.
>b. "tombol [Pemasukan] akan
aktif apabila tombol [ambil data] sudah di klik"
> b.1 -> pada event click milik tombol ambil data (apabila tombol [ambil data] sudah di klik)
> b.2 -> isi dengan proses membuat aktif tombol [Pemasukan] dengan cara
> mengubah nilai properti Enabled milik tombol [Pemasukan] menjadi bernilai TRUE.
>
>c. lakukan pada tombol lainnya juga.
>
>
>
>2. kira-kira langkahnya begini :
>
>a. "(dan lokasi hasil eksport file terserah
user mau menepatkan dimana)"
> a.1. buat variabel object bertipe object FileDialog untuk object file dialog dan variabel string untuk menyimpan nama folder pilihan user
>
> a.2. isi variabel object tersebut dengan properti bernama FileDialog dan pilih jenis folder picker dari pilihan yang muncul (intellisense) di VBE saat ketik script
>
> a.3. aktifkan object dalam variabel dengan menjalankan methods Show milik variabel object
>
> a.4. lakukan pemeriksaan (blok IF) dengan kondisi nilai properti Count milik properti SelectedItems dari variabel object tersebut, yaitu
>
> # jika nilainya bukan nol, maka simpan nilai indeks ke-1 dari properti SelectedItems si variabel object ke variabel string
>
> # jika nilainya nol, isi variabel string dengan folder lokasi workbook (properti path milik thisworkbook) atau tampilkan pesan pembatalan proses
>
>
>b. "nama berdasarkan Nama Sheet,Lokasi dan tanggal. misal sheet
pemasukan menjadi file baru bernama : Pemasukan_Mataram_10 April 2014."
> b.1. buat variabel string untuk nama file
>
> b.2. isi variabel string dengan nama file untuk sheet pemasukan, yaitu :
>
> # isi varibel string folder
> # digabung ( & ) dengan karakter backslah ( "\" )
>
> # digabung ( & ) dengan properti Name milik sheet pemasukan
> # digabung ( & ) dengan underscore
> # digabung ( & ) dengan isi range nama kotanya (properti Value milik si range tertentu)
> # digabung ( & ) format dari isi range tanggal (properti value milik si range tanggal) dengan format "YYYYMMDD" (supaya file mudah di-sort di windows explorer)
>
> b.3. lakukan copy sheet ke workbook baru (workbook baru akan terbentuk berisi sheet yang di-copy)
> sheets("nama sheet").copy
>
> b.4. save workbook active dengan methods saveas dan masukkan variabel nama file ke input parameter yang diminta. Input parameter format file diisi 51 saja (defaultnya workbook)
>
> b.5. tutup workbook aktif (activeworkbook) dengan methods close yang input parameternya diisi FALSE
>
> b.6. lakukan untuk sheet lainnya dengan kembali ke b.2.
>
>
>Wassalam,
>Kid.
>
>
>
>
>
>
>
>2014-04-10 16:49 GMT+07:00 Odhy <odhyz83_assasaky@yahoo.com>:
>
>
>>
>>Dear Para Master,
>>Mohon bantuannya para master sekalian,
>>1. Bagaimanacaranya agar tombol [Pemasukan] akan
aktif apabila tombol [ambil data] sudah di klik, tombol [pengeluaran] akan aktif apabila
tombol [Pengeluaran] sudah di klik. tombol [On
Hand] aktif apabila tombol [Pengeluaran] sudah di klik.
>>
>>2. Saya ingin mengeksport 3 sheet
sekaligus(sheet pemasukan,pengeluaran, dan onHand) menjadi 3 file baru dengan
masing-masing nama berdasarkan Nama Sheet,Lokasi dan tanggal. misal sheet
pemasukan menjadi file baru bernama : Pemasukan_Mataram_10 April 2014.
>>(dan lokasi hasil eksport file terserah
user mau menepatkan dimana)
>>
>>
>>
>>Terima Kasih atas pencerahannya,
>>
>>
>>Odhy.
>
>
>
Untuk Point 1 saya sudah berhasil, kemudian untuk point ke 2 tentang export belum bisa saya pecahkan, saya sudah berkelana kesana kemari tapi masih belum bisa saya pecahkan, mohon bantuan para master..
Terima Kasih atas pencerahannya,
Odhy.
On Friday, April 11, 2014 10:31 AM, Mr. Kid <mr.nmkid@gmail.com> wrote:
hehehehe...
coba diikuti setahap demi setahap ya... yang a dulu sampai bisa jalan, baru yang b.
Wassalam,
Kid.
2014-04-11 10:25 GMT+07:00 Odhy <odhyz83_assasaky@yahoo.com>:
>
>Dear Mr.Kid,
>Terima kasih atas kelapangan hati Mr.Kid menjelaskan begitu detail, semoga para master diberikan berkah dan terus mengamalkan ilmunya kepada kami2 yang haus belajar. ''Al Ilmu bila amalain kassajari bila samarin"....
>
>Selanjutnya kembali ke topic Mr.Kid, mungkin untuk case 1 bisa saya pahami namun untuk case yg ke-2 imajinasi saya belum sampai ke situ bagaimana coding2nya.... untuk itu mohon pencerahanya....
>
>
>Terima Kasih atas pencerahannya,
>
>
>
>Odhy.
>On Friday, April 11, 2014 9:52 AM, Mr. Kid <mr.nmkid@gmail.com> wrote:
>
>
>Hai Odhy,
>
>1. setelah di aktifkan, kapan menjadi tidak aktif lagi ?
>
>Cara mengaktifkan tombol atau me-nonaktifkan adalah dengan mengatur properti bernama Enable bernilai FALSE atau TRUE
>
> cmdTombolku.enabled=true '--> tombol bernama cmdTombolku akan aktif
> cmdTombolku.enabled=false '--> tombol bernama cmdTombolku akan tidak aktif
>
>a. pada event initialize milik userform, atur agar seluruh tombol memiliki nilai properti bernama Enabled adalah FALSE kecuali tombol ambil data yang properti Enabled nya bernilai TRUE.
>b. "tombol [Pemasukan] akan
aktif apabila tombol [ambil data] sudah di klik"
> b.1 -> pada event click milik tombol ambil data (apabila tombol [ambil data] sudah di klik)
> b.2 -> isi dengan proses membuat aktif tombol [Pemasukan] dengan cara
> mengubah nilai properti Enabled milik tombol [Pemasukan] menjadi bernilai TRUE.
>
>c. lakukan pada tombol lainnya juga.
>
>
>
>2. kira-kira langkahnya begini :
>
>a. "(dan lokasi hasil eksport file terserah
user mau menepatkan dimana)"
> a.1. buat variabel object bertipe object FileDialog untuk object file dialog dan variabel string untuk menyimpan nama folder pilihan user
>
> a.2. isi variabel object tersebut dengan properti bernama FileDialog dan pilih jenis folder picker dari pilihan yang muncul (intellisense) di VBE saat ketik script
>
> a.3. aktifkan object dalam variabel dengan menjalankan methods Show milik variabel object
>
> a.4. lakukan pemeriksaan (blok IF) dengan kondisi nilai properti Count milik properti SelectedItems dari variabel object tersebut, yaitu
>
> # jika nilainya bukan nol, maka simpan nilai indeks ke-1 dari properti SelectedItems si variabel object ke variabel string
>
> # jika nilainya nol, isi variabel string dengan folder lokasi workbook (properti path milik thisworkbook) atau tampilkan pesan pembatalan proses
>
>
>b. "nama berdasarkan Nama Sheet,Lokasi dan tanggal. misal sheet
pemasukan menjadi file baru bernama : Pemasukan_Mataram_10 April 2014."
> b.1. buat variabel string untuk nama file
>
> b.2. isi variabel string dengan nama file untuk sheet pemasukan, yaitu :
>
> # isi varibel string folder
> # digabung ( & ) dengan karakter backslah ( "\" )
>
> # digabung ( & ) dengan properti Name milik sheet pemasukan
> # digabung ( & ) dengan underscore
> # digabung ( & ) dengan isi range nama kotanya (properti Value milik si range tertentu)
> # digabung ( & ) format dari isi range tanggal (properti value milik si range tanggal) dengan format "YYYYMMDD" (supaya file mudah di-sort di windows explorer)
>
> b.3. lakukan copy sheet ke workbook baru (workbook baru akan terbentuk berisi sheet yang di-copy)
> sheets("nama sheet").copy
>
> b.4. save workbook active dengan methods saveas dan masukkan variabel nama file ke input parameter yang diminta. Input parameter format file diisi 51 saja (defaultnya workbook)
>
> b.5. tutup workbook aktif (activeworkbook) dengan methods close yang input parameternya diisi FALSE
>
> b.6. lakukan untuk sheet lainnya dengan kembali ke b.2.
>
>
>Wassalam,
>Kid.
>
>
>
>
>
>
>
>2014-04-10 16:49 GMT+07:00 Odhy <odhyz83_assasaky@yahoo.com>:
>
>
>>
>>Dear Para Master,
>>Mohon bantuannya para master sekalian,
>>1. Bagaimanacaranya agar tombol [Pemasukan] akan
aktif apabila tombol [ambil data] sudah di klik, tombol [pengeluaran] akan aktif apabila
tombol [Pengeluaran] sudah di klik. tombol [On
Hand] aktif apabila tombol [Pengeluaran] sudah di klik.
>>
>>2. Saya ingin mengeksport 3 sheet
sekaligus(sheet pemasukan,pengeluar
masing-masing nama berdasarkan Nama Sheet,Lokasi dan tanggal. misal sheet
pemasukan menjadi file baru bernama : Pemasukan_Mataram_
>>(dan lokasi hasil eksport file terserah
user mau menepatkan dimana)
>>
>>
>>
>>Terima Kasih atas pencerahannya,
>>
>>
>>Odhy.
>
>
>
Mon Jun 16, 2014 11:58 pm (PDT) . Posted by:
"Syaiful Hanan"
bagaimana caranya kalau di buat pivot hingga kolom tetap nampak ketiganya
teromkasih suhu
teromkasih suhu
Tue Jun 17, 2014 12:56 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Contoh SQL pak Zainul sangat menarik.
Saya coba aplikasikan untuk merekap stock quantitiy dengan menggunakan 3 sheet (3 tabel) masing2 saya beri nama tbl_awal, tbl_beli dan tbl_jual.
SQL Statementnya adalah seperti ini :
SELECT a.* FROM tbl_awal AS a
UNION ALL
SELECT b.* FROM tbl_beli AS b
UNION ALL
SELECT c.* FROM tbl_jual AS cORDER BY KODE, TANGGAL
Nama ketiga tabel tersebut saya buat dengan menggunakan kotak Range Name yang ada dipojok kiri atas, karena kalau menggunakan tabel otomatis (tanpa header) SQL Statementnya tidak bisa jalan.
Pertanyaannya :
Bagaimana membuat tabel tersebut fleksibel tanpa harus merubah rangenya melalui worksheet, namun SQL nya tetap dapat dijalankan ?
Untuk lebih jelasnya saya lampirkan file Stock dan Stock SQL (hasil pengolahan dengan SQL melalui Excel Get External Data).
Semoga bahasan mengenai aplikasi SQL pada Excel (khususnya untuk pengolahan database dalam jumlah besar dengan berbagai contoh aplikasinya) akan semakin marak.
Salam,
HK
On Friday, 13 June 2014, 14:03, "hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Kalau mau pake macro, mungkin perlu pinjam kode warisan dari si mbah tambah sedikit modifikasi,
Sub Copy2BlankCell()
Dim lRow As Long 'deklarasi variabel
lRow = Cells(Rows.Count, "A").End(xlUp).Offset(2, 0).Row 'cari no baris terakhir + 2 baris
Range("A1:I" & lRow).Select 'sorot rangenya
Selection.SpecialCells(xlCellTypeBlanks).Select 'selek sel kosong
Selection.FormulaR1C1 = "=R[-1]C" 'isi formula pada sel kosong
End Sub
Salam,
HK
On Friday, 13 June 2014, 9:55, "'zainul_ulum[at]yahoo[dot]com' zainul_ulum@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Mas Dedy,
Saya coba menggunakan fasilitas Get External Data dengan [Microsoft Query] maaf tidak pakai macro ataupun formula.
Langkah-langkahnya adalah:
1. File asal harus berupa tabel database. File dari mas Dedy sudah berupa tabel database jika baris kosong dihilangkan lebih dahulu sehingga bentuk tabel sebagai berikut:
Simpan file database ini kemudian disimpan di file tersendiri missal [data.xlsx]
Sebelum memulai langkah#2, tutup file [data.xlsx]
2. Buat workbook baru atau file baru
3. Pada menu excel pilih [Data], pada group [Get External Data]>>[From Other Sources]>>[From Microsoft Query]
4. Pada tab [Database], pilih [Excel Files*] kemudian clik [OK]
5. Pilih lokasi file [data.xlsx]
6. Pada [Microsoft Query], saat muncul kotak dialog [Add Tables] click [Close]
7. Masih di [Microsoft Query], click icon [SQL]
8. Tulis atau copy SQL berikut di ktak Sql Statement:
SELECT a.* FROM [Sheet1$] AS a
UNION ALL
SELECT b.* FROM [Sheet1$] AS b
UNION ALL
SELECT c.* FROM [Sheet1$] AS c
ORDER BY BID;
9. Click [OK] jika muncul kotak dialog …..continue anyway?
10. Hasil query akan ditampilkan di [Microsoft Query]
11. untuk menampilkan hasil di Excel, pada [Microsoft Query], click [File]>>[Return Data to Microsoft Excel]
12. Di [Microsoft Excel], Pilih [Table] kemudian clik [OK]
13. Untuk selanjutnya, jika ada perubahan data di file [data.xlsx] dan lokasi file masih sama, untuk update data hasil query lakukan langkah berikut:
13.1. click kanan di lokasi table, kemudian pilih [Refresh]
Selamat mencoba, mohon maaf jika terlalu panjang instruksinya.
thanks
-zainul
From:belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Friday, June 13, 2014 6:54 AM
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] Tanya Cara Copy paste otomatis_Macros [1 Attachment]
Dear All pencinta excel
Saya ingin menanyakan bagaimana cara copy paste secara otomatis dengan menggunakan macros?
Terlampir file yang ingin saya copy paste otomatis tersebut.
Terima kasih sebelumnya atas bantuannya.
Salam,
DEDY DHARMAWANSYAH
Tue Jun 17, 2014 3:06 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Barusan saya coba, Jika data terus bertambah maka SQL Statementnya harus diubah menjadi:
SELECT a.* FROM [Sheet1$] AS a
UNION ALL
SELECT b.* FROM [Sheet2$] AS b
UNION ALL
SELECT c.* FROM [Sheet3$] AS c
ORDER BY KODE, TANGGAL
Ini juga bisa digunakan untuk menggabungkan data dari beberapa Sheet dengan sedikit penyesuaian pada SQL Statementnya.
Terima kasih pak Zainal.
Salam,
HK
On Tuesday, 17 June 2014, 14:56, "hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Contoh SQL pak Zainul sangat menarik.
Saya coba aplikasikan untuk merekap stock quantitiy dengan menggunakan 3 sheet (3 tabel) masing2 saya beri nama tbl_awal, tbl_beli dan tbl_jual.
SQL Statementnya adalah seperti ini :
SELECT a.* FROM tbl_awal AS a
UNION ALL
SELECT b.* FROM tbl_beli AS b
UNION ALL
SELECT c.* FROM tbl_jual AS cORDER BY KODE, TANGGAL
Nama ketiga tabel tersebut saya buat dengan menggunakan kotak Range Name yang ada dipojok kiri atas, karena kalau menggunakan tabel otomatis (tanpa header) SQL Statementnya tidak bisa jalan.
Pertanyaannya :
Bagaimana membuat tabel tersebut fleksibel tanpa harus merubah rangenya melalui worksheet, namun SQL nya tetap dapat dijalankan ?
Untuk lebih jelasnya saya lampirkan file Stock dan Stock SQL (hasil pengolahan dengan SQL melalui Excel Get External Data).
Semoga bahasan mengenai aplikasi SQL pada Excel (khususnya untuk pengolahan database dalam jumlah besar dengan berbagai contoh aplikasinya) akan semakin marak.
Salam,
HK
On Friday, 13 June 2014, 14:03, "hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Kalau mau pake macro, mungkin perlu pinjam kode warisan dari si mbah tambah sedikit modifikasi,
Sub Copy2BlankCell()
Dim lRow As Long 'deklarasi variabel
lRow = Cells(Rows.Count, "A").End(xlUp).Offset(2, 0).Row 'cari no baris terakhir + 2 baris
Range("A1:I" & lRow).Select 'sorot rangenya
Selection.SpecialCells(xlCellTypeBlanks).Select 'selek sel kosong
Selection.FormulaR1C1 = "=R[-1]C" 'isi formula pada sel kosong
End Sub
Salam,
HK
On Friday, 13 June 2014, 9:55, "'zainul_ulum[at]yahoo[dot]com' zainul_ulum@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Mas Dedy,
Saya coba menggunakan fasilitas Get External Data dengan [Microsoft Query] maaf tidak pakai macro ataupun formula.
Langkah-langkahnya adalah:
1. File asal harus berupa tabel database. File dari mas Dedy sudah berupa tabel database jika baris kosong dihilangkan lebih dahulu sehingga bentuk tabel sebagai berikut:
Simpan file database ini kemudian disimpan di file tersendiri missal [data.xlsx]
Sebelum memulai langkah#2, tutup file [data.xlsx]
2. Buat workbook baru atau file baru
3. Pada menu excel pilih [Data], pada group [Get External Data]>>[From Other Sources]>>[From Microsoft Query]
4. Pada tab [Database], pilih [Excel Files*] kemudian clik [OK]
5. Pilih lokasi file [data.xlsx]
6. Pada [Microsoft Query], saat muncul kotak dialog [Add Tables] click [Close]
7. Masih di [Microsoft Query], click icon [SQL]
8. Tulis atau copy SQL berikut di ktak Sql Statement:
SELECT a.* FROM [Sheet1$] AS a
UNION ALL
SELECT b.* FROM [Sheet1$] AS b
UNION ALL
SELECT c.* FROM [Sheet1$] AS c
ORDER BY BID;
9. Click [OK] jika muncul kotak dialog …..continue anyway?
10. Hasil query akan ditampilkan di [Microsoft Query]
11. untuk menampilkan hasil di Excel, pada [Microsoft Query], click [File]>>[Return Data to Microsoft Excel]
12. Di [Microsoft Excel], Pilih [Table] kemudian clik [OK]
13. Untuk selanjutnya, jika ada perubahan data di file [data.xlsx] dan lokasi file masih sama, untuk update data hasil query lakukan langkah berikut:
13.1. click kanan di lokasi table, kemudian pilih [Refresh]
Selamat mencoba, mohon maaf jika terlalu panjang instruksinya.
thanks
-zainul
From:belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Friday, June 13, 2014 6:54 AM
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] Tanya Cara Copy paste otomatis_Macros [1 Attachment]
Dear All pencinta excel
Saya ingin menanyakan bagaimana cara copy paste secara otomatis dengan menggunakan macros?
Terlampir file yang ingin saya copy paste otomatis tersebut.
Terima kasih sebelumnya atas bantuannya.
Salam,
DEDY DHARMAWANSYAH
SELECT a.* FROM [Sheet1$] AS a
UNION ALL
SELECT b.* FROM [Sheet2$] AS b
UNION ALL
SELECT c.* FROM [Sheet3$] AS c
ORDER BY KODE, TANGGAL
Ini juga bisa digunakan untuk menggabungkan data dari beberapa Sheet dengan sedikit penyesuaian pada SQL Statementnya.
Terima kasih pak Zainal.
Salam,
HK
On Tuesday, 17 June 2014, 14:56, "hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Contoh SQL pak Zainul sangat menarik.
Saya coba aplikasikan untuk merekap stock quantitiy dengan menggunakan 3 sheet (3 tabel) masing2 saya beri nama tbl_awal, tbl_beli dan tbl_jual.
SQL Statementnya adalah seperti ini :
SELECT a.* FROM tbl_awal AS a
UNION ALL
SELECT b.* FROM tbl_beli AS b
UNION ALL
SELECT c.* FROM tbl_jual AS cORDER BY KODE, TANGGAL
Nama ketiga tabel tersebut saya buat dengan menggunakan kotak Range Name yang ada dipojok kiri atas, karena kalau menggunakan tabel otomatis (tanpa header) SQL Statementnya tidak bisa jalan.
Pertanyaannya :
Bagaimana membuat tabel tersebut fleksibel tanpa harus merubah rangenya melalui worksheet, namun SQL nya tetap dapat dijalankan ?
Untuk lebih jelasnya saya lampirkan file Stock dan Stock SQL (hasil pengolahan dengan SQL melalui Excel Get External Data).
Semoga bahasan mengenai aplikasi SQL pada Excel (khususnya untuk pengolahan database dalam jumlah besar dengan berbagai contoh aplikasinya) akan semakin marak.
Salam,
HK
On Friday, 13 June 2014, 14:03, "hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Kalau mau pake macro, mungkin perlu pinjam kode warisan dari si mbah tambah sedikit modifikasi,
Sub Copy2BlankCell()
Dim lRow As Long 'deklarasi variabel
lRow = Cells(Rows.Count, "A").End(xlUp).Offset(2, 0).Row 'cari no baris terakhir + 2 baris
Range("A1:I" & lRow).Select 'sorot rangenya
Selection.SpecialCells(xlCellTypeBlanks).Select 'selek sel kosong
Selection.FormulaR1C1 = "=R[-1]C" 'isi formula pada sel kosong
End Sub
Salam,
HK
On Friday, 13 June 2014, 9:55, "'zainul_ulum[at]yahoo[dot]com' zainul_ulum@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Mas Dedy,
Saya coba menggunakan fasilitas Get External Data dengan [Microsoft Query] maaf tidak pakai macro ataupun formula.
Langkah-langkahnya adalah:
1. File asal harus berupa tabel database. File dari mas Dedy sudah berupa tabel database jika baris kosong dihilangkan lebih dahulu sehingga bentuk tabel sebagai berikut:
Simpan file database ini kemudian disimpan di file tersendiri missal [data.xlsx]
Sebelum memulai langkah#2, tutup file [data.xlsx]
2. Buat workbook baru atau file baru
3. Pada menu excel pilih [Data], pada group [Get External Data]>>[From Other Sources]>>[From Microsoft Query]
4. Pada tab [Database], pilih [Excel Files*] kemudian clik [OK]
5. Pilih lokasi file [data.xlsx]
6. Pada [Microsoft Query], saat muncul kotak dialog [Add Tables] click [Close]
7. Masih di [Microsoft Query], click icon [SQL]
8. Tulis atau copy SQL berikut di ktak Sql Statement:
SELECT a.* FROM [Sheet1$] AS a
UNION ALL
SELECT b.* FROM [Sheet1$] AS b
UNION ALL
SELECT c.* FROM [Sheet1$] AS c
ORDER BY BID;
9. Click [OK] jika muncul kotak dialog …..continue anyway?
10. Hasil query akan ditampilkan di [Microsoft Query]
11. untuk menampilkan hasil di Excel, pada [Microsoft Query], click [File]>>[Return Data to Microsoft Excel]
12. Di [Microsoft Excel], Pilih [Table] kemudian clik [OK]
13. Untuk selanjutnya, jika ada perubahan data di file [data.xlsx] dan lokasi file masih sama, untuk update data hasil query lakukan langkah berikut:
13.1. click kanan di lokasi table, kemudian pilih [Refresh]
Selamat mencoba, mohon maaf jika terlalu panjang instruksinya.
thanks
-zainul
From:belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Friday, June 13, 2014 6:54 AM
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] Tanya Cara Copy paste otomatis_Macros [1 Attachment]
Dear All pencinta excel
Saya ingin menanyakan bagaimana cara copy paste secara otomatis dengan menggunakan macros?
Terlampir file yang ingin saya copy paste otomatis tersebut.
Terima kasih sebelumnya atas bantuannya.
Salam,
DEDY DHARMAWANSYAH
=====================================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
Posting lowongan kerja : ke link tersebut dan klik New Topic
=====================================================================
---------------------------------------------------------------------
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
---------------------------------------------------------------------
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
Posting lowongan kerja : ke link tersebut dan klik New Topic
=====================================================================
---------------------------------------------------------------------
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