Messages In This Digest (24 Messages)
- 1.
- (no subject) From: Karna Tj
- 2a.
- Bls: [belajar-excel] SIMPAN NOTA (REVISI) From: Ahmad Fauzi
- 2b.
- Re: SIMPAN NOTA (REVISI) From: Franciscus SOG
- 2c.
- Bls: [belajar-excel] SIMPAN NOTA (REVISI) From: Ahmad Fauzi
- 2d.
- Re: SIMPAN NOTA (REVISI) From: Franciscus SOG
- 3a.
- Re: Hidden sheet sesuai tanggal yg ditentukan From: STDEV(i)
- 4a.
- Tgl Instal pada Hari Kerja From: Yvonne
- 4b.
- Re: Tgl Instal pada Hari Kerja From: Franciscus SOG
- 4c.
- Re: Tgl Instal pada Hari Kerja From: STDEV(i)
- 4d.
- Re: Tgl Instal pada Hari Kerja From: Yvonne
- 4e.
- Re: Tgl Instal pada Hari Kerja From: Yvonne
- 4f.
- Re: Tgl Instal pada Hari Kerja From: Yvonne
- 4g.
- Re: Tgl Instal pada Hari Kerja From: STDEV(i)
- 4h.
- Re: Tgl Instal pada Hari Kerja From: STDEV(i)
- 4i.
- Re: Tgl Instal pada Hari Kerja From: STDEV(i)
- 4j.
- Re: Tgl Instal pada Hari Kerja From: Franciscus SOG
- 4k.
- Re: Tgl Instal pada Hari Kerja From: Yvonne
- 4l.
- Re: Tgl Instal pada Hari Kerja From: STDEV(i)
- 5.
- Copy isi cell terakhir From: Arief P. Sukarno
- 6a.
- vlookup 2 From: Niki Dwinarni
- 6b.
- Re: vlookup 2 From: Angga Gurmilang Sedar
- 6c.
- Re: vlookup 2 From: Niki Dwinarni
- 6d.
- Re: vlookup 2 From: Niki Dwinarni
- 7a.
- Re: Sebar Data Berdasarkan Kolom Terakhir From: Sinode G Sinaga
Messages
- 1.
-
(no subject)
Posted by: "Karna Tj" cool_natja@yahoo.com cool_natja
Sun May 29, 2011 2:18 pm (PDT)
- 2a.
-
Bls: [belajar-excel] SIMPAN NOTA (REVISI)
Posted by: "Ahmad Fauzi" fauzietha@yahoo.co.id fauzietha
Sun May 29, 2011 7:37 pm (PDT)
Terima kasih Sdr. Franciscus SOG
saran yang anda berikan itu memang maksud saya, untuk form FormIsi itu tidak
saya gunakan (maaf lupa saya hapus) karena saya kesulitan untuk mengaplikasikan
form supaya dapat menyimpan ke sheet DATA NOTA. yang menjadi inti masalah saya
yaitu bagaimana hasil inputan di sheet INPUT itu dapat tersimpan di sheet DATA
NOTA?tentunya menggunakan coding.
Terima kasih....
_____________________ _________ __
Dari: Franciscus SOG <jclugbu@gmail.com >
Kepada: belajar-excel@yahoogroups. com
Terkirim: Sab, 28 Mei, 2011 21:26:13
Judul: Re: [belajar-excel] SIMPAN NOTA (REVISI)
Dear Ahmad,
"Membatu" Anda? Mungkin saya tidak bisa, tapi membantu Anda mungkin saya bisa.
Sebelum saya membantu Anda, mohon Anda membantu saya dahulu (jadi
keingat tolong-menolong dan tepa selira, pelajaran PPKN doeloe..)
Maksud pertanyaan Anda " menyimpan hasil inputan data" :
1. Menyimpan data di sheets "INPUT" ke sheets "DATA NOTA" ?
2. Inputan diambil dari mana? Karena terlihat ada 2 yaitu : Sheets
"INPUT" atau form FormIsi
3. Untuk FormIsi, Spareparts dan Jasa tidak ada? Nich bagaimana?
Dibuat form lagi?
Saran : sebaiknya menggunakan inputan yang sudah ada di sheets
"INPUT". Tinggal copas ke sheets "DATA NOTA". Manual? (tentu tidak, by
coding dunk)
Blessings,
Fran'z
On 5/28/11, Ahmad Fauzi <fauzietha@yahoo.co.id > wrote:
> Dear para master Excel, Sesuai dengan saran yang diberikan oleh mbak Siti,
> akhirnya saya merubah cara input nota pada file excel saya, tapi saya
> menemui
> kesulitan untuk mengaplikasikan code-code menyimpan hasil inputan data
> seperti
> pada file yang dilampirkan mbak Siti. untuk itu mohon kiranya para master
> Excel
> membatu saya.
>
> Terima kasih.
>
>
>
>
>
>
> NB : apabila diperlukan silahkan dirubah bentuk inputan dan yang lainnya
> asal
> hasil akhirnya sama...
>
- 2b.
-
Re: SIMPAN NOTA (REVISI)
Posted by: "Franciscus SOG" jclugbu@gmail.com elijah_spirit
Sun May 29, 2011 10:34 pm (PDT)
Dear Ahmad,
Logikanya sederhana, copy » transpose.
Select data dari sheets("INPUT"), copy. Klik sheets("DATA NOTA"),
pilih cell tujuan, pastespecial (values + transpose).
Berikut vba-nya ditempatkan pada command button save.
Application.ScreenUpdating = False
Sheets("INPUT").Range(" C3:C15,C17: C26,C32:C41" ).Select
Selection.Copy
Posisi = Application.CountA(Sheets( "DATA NOTA").Range( "A5:A65536" )) + 5
Sheets("DATA NOTA").Activate
Sheets("DATA NOTA").Range("A" & Posisi).PasteSpecia l xlPasteValues,
Transpose:=True
Application.CutCopyMode = False
Sheets("INPUT").Activate
Sheets("INPUT").Range(" C3").Select
Application.ScreenUpdating = True
MsgBox "Data sudah disimpan", vbInformation, "Success.."
Blessings,
Fran'z
On 5/30/11, Ahmad Fauzi <fauzietha@yahoo.co.id > wrote:
> Terima kasih Sdr. Franciscus SOG
> saran yang anda berikan itu memang maksud saya, untuk form FormIsi itu tidak
> saya gunakan (maaf lupa saya hapus) karena saya kesulitan untuk
> mengaplikasikan
> form supaya dapat menyimpan ke sheet DATA NOTA. yang menjadi inti masalah
> saya
> yaitu bagaimana hasil inputan di sheet INPUT itu dapat tersimpan di sheet
> DATA
> NOTA?tentunya menggunakan coding.
> Terima kasih....
>
>
>
>
> _____________________ _________ __
> Dari: Franciscus SOG <jclugbu@gmail.com >
> Kepada: belajar-excel@yahoogroups. com
> Terkirim: Sab, 28 Mei, 2011 21:26:13
> Judul: Re: [belajar-excel] SIMPAN NOTA (REVISI)
>
>
> Dear Ahmad,
>
> "Membatu" Anda? Mungkin saya tidak bisa, tapi membantu Anda mungkin saya
> bisa.
> Sebelum saya membantu Anda, mohon Anda membantu saya dahulu (jadi
> keingat tolong-menolong dan tepa selira, pelajaran PPKN doeloe..)
>
> Maksud pertanyaan Anda " menyimpan hasil inputan data" :
> 1. Menyimpan data di sheets "INPUT" ke sheets "DATA NOTA" ?
> 2. Inputan diambil dari mana? Karena terlihat ada 2 yaitu : Sheets
> "INPUT" atau form FormIsi
> 3. Untuk FormIsi, Spareparts dan Jasa tidak ada? Nich bagaimana?
> Dibuat form lagi?
>
> Saran : sebaiknya menggunakan inputan yang sudah ada di sheets
> "INPUT". Tinggal copas ke sheets "DATA NOTA". Manual? (tentu tidak, by
> coding dunk)
>
> Blessings,
>
> Fran'z
>
> On 5/28/11, Ahmad Fauzi <fauzietha@yahoo.co.id > wrote:
>> Dear para master Excel, Sesuai dengan saran yang diberikan oleh mbak Siti,
>> akhirnya saya merubah cara input nota pada file excel saya, tapi saya
>> menemui
>> kesulitan untuk mengaplikasikan code-code menyimpan hasil inputan data
>> seperti
>> pada file yang dilampirkan mbak Siti. untuk itu mohon kiranya para master
>> Excel
>> membatu saya.
>>
>> Terima kasih.
>>
>>
>>
>>
>>
>>
>> NB : apabila diperlukan silahkan dirubah bentuk inputan dan yang lainnya
>> asal
>> hasil akhirnya sama...
>>
>
>
- 2c.
-
Bls: [belajar-excel] SIMPAN NOTA (REVISI)
Posted by: "Ahmad Fauzi" fauzietha@yahoo.co.id fauzietha
Mon May 30, 2011 12:13 am (PDT)
terima kasih sdr Fran'z.....
coding yang anda berikan sangat bermanfaat sekali....
_____________________ _________ __
Dari: Franciscus SOG <jclugbu@gmail.com >
Terkirim: Sen, 30 Mei, 2011 12:34:37
Dear Ahmad,
Logikanya sederhana, copy » transpose.
Select data dari sheets("INPUT"), copy. Klik sheets("DATA NOTA"),
pilih cell tujuan, pastespecial (values + transpose).
Berikut vba-nya ditempatkan pada command button save.
Application.ScreenUpdating = False
Sheets("INPUT").Range(" C3:C15,C17: C26,C32:C41" ).Select
Selection.Copy
Posisi = Application.CountA(Sheets( "DATA NOTA").Range( "A5:A65536" )) + 5
Sheets("DATA NOTA").Activate
Sheets("DATA NOTA").Range("A" & Posisi).PasteSpecia l xlPasteValues,
Transpose:=True
Application.CutCopyMode = False
Sheets("INPUT").Activate
Sheets("INPUT").Range(" C3").Select
Application.ScreenUpdating = True
MsgBox "Data sudah disimpan", vbInformation, "Success.."
Blessings,
Fran'z
On 5/30/11, Ahmad Fauzi <fauzietha@yahoo.co.id > wrote:
> Terima kasih Sdr. Franciscus SOG
> saran yang anda berikan itu memang maksud saya, untuk form FormIsi itu tidak
> saya gunakan (maaf lupa saya hapus) karena saya kesulitan untuk
> mengaplikasikan
> form supaya dapat menyimpan ke sheet DATA NOTA. yang menjadi inti masalah
> saya
> yaitu bagaimana hasil inputan di sheet INPUT itu dapat tersimpan di sheet
> DATA
> NOTA?tentunya menggunakan coding.
> Terima kasih....
> - 2d.
-
Re: SIMPAN NOTA (REVISI)
Posted by: "Franciscus SOG" jclugbu@gmail.com elijah_spirit
Mon May 30, 2011 12:22 am (PDT)
Dear Ahmad,
Anda puas, kami senang..
Blessings,
Fran'z
On 5/30/11, Ahmad Fauzi <fauzietha@yahoo.co.id > wrote:
> terima kasih sdr Fran'z.....
> coding yang anda berikan sangat bermanfaat sekali....
>
>
>
> _____________________ _________ __
> Dari: Franciscus SOG <jclugbu@gmail.com >
> Terkirim: Sen, 30 Mei, 2011 12:34:37
>
> Dear Ahmad,
>
> Logikanya sederhana, copy » transpose.
> Select data dari sheets("INPUT"), copy. Klik sheets("DATA NOTA"),
> pilih cell tujuan, pastespecial (values + transpose).
>
> Berikut vba-nya ditempatkan pada command button save.
>
> Application.ScreenUpdating = False
> Sheets("INPUT").Range(" C3:C15,C17: C26,C32:C41" ).Select
> Selection.Copy
> Posisi = Application.CountA(Sheets( "DATA NOTA").Range( "A5:A65536" )) + 5
> Sheets("DATA NOTA").Activate
> Sheets("DATA NOTA").Range("A" & Posisi).PasteSpecia l xlPasteValues,
> Transpose:=True
> Application.CutCopyMode = False
> Sheets("INPUT").Activate
> Sheets("INPUT").Range(" C3").Select
> Application.ScreenUpdating = True
> MsgBox "Data sudah disimpan", vbInformation, "Success.."
>
> Blessings,
>
> Fran'z
>
> On 5/30/11, Ahmad Fauzi <fauzietha@yahoo.co.id > wrote:
>> Terima kasih Sdr. Franciscus SOG
>> saran yang anda berikan itu memang maksud saya, untuk form FormIsi itu
>> tidak
>> saya gunakan (maaf lupa saya hapus) karena saya kesulitan untuk
>> mengaplikasikan
>> form supaya dapat menyimpan ke sheet DATA NOTA. yang menjadi inti masalah
>> saya
>> yaitu bagaimana hasil inputan di sheet INPUT itu dapat tersimpan di sheet
>> DATA
>> NOTA?tentunya menggunakan coding.
>> Terima kasih....
>>
- 3a.
-
Re: Hidden sheet sesuai tanggal yg ditentukan
Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi
Sun May 29, 2011 9:03 pm (PDT)
Dear Pak Reza,
terima kasih boleh nimbrung
tapi sebetulnya pertanyaan siti tetap* belum* terjawab
walupun begitu saya tidak akan bertanya lagi sebab anda sudah merasa selesai
.
(= keinginan, *kelihatannya, saat ini*, sudah sesuai dgn solusi yg diterima)
tks
2011/5/29 Reza 2002 <puhaba2005@yahoo.com >
> Ndak apa-apa mbak, nimbrung ajah...hehe
> justru sama saya yg di ubah VB scriptnya, angka satu jadi 29 (tanggal hari
> ini), run script, dan bimsalabim!!! sheetb lenyap tak berbekas!!! hehehe...
>
> Dan skrg sudah saya modif lagi koding nya mas Mr.Kid, sesuai kebutuhan. Kl
> kata pak bondan: "poko'e maknyusss". Hehehe...
>
> Hatur nuhun lagi yah mas dan mbak...
>
> Wassalam,
>
> Reza
> (udah begadang, barca menang 3-1, gak sia2 deh....:D)
>
>
> --- In belajar-excel@yahoogroups. , "STDEV(i)" <setiyowati.com devi@...>
> wrote:
> >
> > maaf ikutan...
> > berhubung sedang tidak di depan pc, hanya bisa comments
> >
> > Coba pak reza adakan test
> > Date Setting (di Control Pannel > Date & Time) ubahlah  Hari ini = 1
> Juni 2011
> > (maksudnya agar komputer menganggap hari ini adalah tgl 1 Juni 2011)
>
> > Tutup Workbook, lalu buka lagi
> > Lihat, apakah Sheet B menjadi Hidden atau tidak ?
> >
> > Demikian juga percobaan lain : system date diubah menjadi
> > 1 Juli 2011,
> > 1 Agusts 2011,
> > 1 Sep  2011
> > bahkan : 1 Okt 1966
> >
> > Setiap selesai mengganti date setting, Lakukan tutup  & buka workbook
> tsb.
>
> > Amati apa yg terjadi (tersembunyi atau tidaknya sheetB)
> > Apakah seperti itu yg dikehendaki ?
> > (kayaknya tiap tgl 1 bulan apa saja... sheetB menjadi hidden)
> >
> > Misalnnya bukan spt itu yg dikehendaki,
> > coding mas Kid itu sudah berupa coding yg kuat dan jelas "dodok-seleh"nya
> > sehingga pak reza mudah memodifikasinya..
> >
> > CMIIW &
> > ma acih.....
> > siti
>
- 4a.
-
Tgl Instal pada Hari Kerja
Posted by: "Yvonne" yvonne@astridogroup.com
Sun May 29, 2011 9:54 pm (PDT)
Dear all TTM,
Mohon bantuannya untuk masalah file saya berupa otomatisasi perhitungan tanggal instal pada hari kerja dimana apabila tgl instal jatuh pada hari Sabtu/Minggu/Libur maka tidak berlaku.
Atas bantuan teman-teman, saya ucapkan terima kasih. - 4b.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "Franciscus SOG" jclugbu@gmail.com elijah_spirit
Sun May 29, 2011 11:03 pm (PDT)
Dear Yvonne,
Otomatisasi dibuat pada event worksheet_change. Untuk tabel libur
dapat dimodifikasi,
Berikut vba-nya :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 Then
If Target.Column = 4 And Target.Row >= 4 Then
If IsDate(Cells(Target.Row, 4)) Then
If Weekday(Cells(Target.Row, 4), vbMonday) > 5 Or
Application.CountIf(Sheets( "libur"). Columns(" A:A"), Cells(Target. Row,
4)) >= 1 Then
Cells(Target.Row, 4).Value = vbNullString:
Cells(Target.Row, 4).Select
MsgBox "Hari Sabtu/Minggu/Libur tidak dapat install",
vbCritical, "Warning.."
End If
End If
Else
Exit Sub
End If
End If
End Sub
CMIIW
Blessings,
Fran'z
On 5/30/11, Yvonne <yvonne@astridogroup.com > wrote:
> Dear all TTM,
>
> Mohon bantuannya untuk masalah file saya berupa otomatisasi perhitungan
> tanggal instal pada hari kerja dimana apabila tgl instal jatuh pada hari
> Sabtu/Minggu/Libur maka tidak berlaku.
>
> Atas bantuan teman-teman, saya ucapkan terima kasih.
- 4c.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi
Sun May 29, 2011 11:14 pm (PDT)
kok ndak ada penjelasannya ya..
Kita masih menunggu penjelasan yg okehhh..
*Barangkali begini*
Mbak ivon inginnya hanya menulis SATU TGL di cell D4
Cell D5 dan seterusnya ke bawah (semula kosong) minta diisi rumus
sehinga memunculkan tanggal yg otomatis berupa DAFTAR hari kerja berikutnya
(hari kerja = Senin - Jumat \tapi bukan hari LiburNasinal)
Daftar LIbur 2011, dibuat edi sheet 2 dan rangenya diberinama = Libur2011
rumus di D5 ( & dicopy ke cells dibawahnya)
=WORKDAY(D4,1,Libur2011)
lampairan:
ctv_membuat Daftar Tgl Hari Kerja dimulai hari tertentu kalee yee.xls
2011/5/30 Yvonne <yvonne@astridogroup.com >
> Dear all TTM,
>
> Mohon bantuannya untuk masalah file saya berupa otomatisasi *perhitungan
> tanggal instal** *
>
pada hari kerja dimana apabila tgl instal jatuh pada hari Sabtu/Minggu/Libur
> maka tidak berlaku.
> Atas bantuan teman-teman, saya ucapkan terima kasih.
>
>
>
- 4d.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "Yvonne" yvonne@astridogroup.com
Sun May 29, 2011 11:47 pm (PDT)
Mba Siti, makasih untuk bantuan penjelasannya.
Memang maksud saya seperti itu, tadi mungkin ada penjelasan yang saya lupa berikan.
Hanya saja, lampiran mba Siti ga ada :)
Mohon lampirannya mba.
Terima kasih.
----- Original Message -----
From: STDEV(i)
To: belajar-excel@yahoogroups. com
Sent: Monday, May 30, 2011 1:14 PM
Subject: Re: [belajar-excel] Tgl Instal pada Hari Kerja
kok ndak ada penjelasannya ya..
Kita masih menunggu penjelasan yg okehhh..
Barangkali begini
Mbak ivon inginnya hanya menulis SATU TGL di cell D4
Cell D5 dan seterusnya ke bawah (semula kosong) minta diisi rumus
sehinga memunculkan tanggal yg otomatis berupa DAFTAR hari kerja berikutnya
(hari kerja = Senin - Jumat \tapi bukan hari LiburNasinal)
Daftar LIbur 2011, dibuat edi sheet 2 dan rangenya diberinama = Libur2011
rumus di D5 ( & dicopy ke cells dibawahnya)
=WORKDAY(D4,1,Libur2011)
lampairan:
ctv_membuat Daftar Tgl Hari Kerja dimulai hari tertentu kalee yee.xls
2011/5/30 Yvonne <yvonne@astridogroup.com >
Dear all TTM,
Mohon bantuannya untuk masalah file saya berupa otomatisasi perhitungan tanggal instal
pada hari kerja dimana apabila tgl instal jatuh pada hari Sabtu/Minggu/Libur maka tidak berlaku.
Atas bantuan teman-teman, saya ucapkan terima kasih.
- 4e.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "Yvonne" yvonne@astridogroup.com
Sun May 29, 2011 11:47 pm (PDT)
Kalo ga pake VBA emang ga bisa ya?
Tq
----- Original Message -----
From: Franciscus SOG
To: belajar-excel@yahoogroups. com
Sent: Monday, May 30, 2011 1:03 PM
Subject: Re: [belajar-excel] Tgl Instal pada Hari Kerja
Dear Yvonne,
Otomatisasi dibuat pada event worksheet_change. Untuk tabel libur
dapat dimodifikasi,
Berikut vba-nya :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 Then
If Target.Column = 4 And Target.Row >= 4 Then
If IsDate(Cells(Target.Row, 4)) Then
If Weekday(Cells(Target.Row, 4), vbMonday) > 5 Or
Application.CountIf(Sheets( "libur"). Columns(" A:A"), Cells(Target. Row,
4)) >= 1 Then
Cells(Target.Row, 4).Value = vbNullString:
Cells(Target.Row, 4).Select
MsgBox "Hari Sabtu/Minggu/Libur tidak dapat install",
vbCritical, "Warning.."
End If
End If
Else
Exit Sub
End If
End If
End Sub
CMIIW
Blessings,
Fran'z
On 5/30/11, Yvonne <yvonne@astridogroup.com > wrote:
> Dear all TTM,
>
> Mohon bantuannya untuk masalah file saya berupa otomatisasi perhitungan
> tanggal instal pada hari kerja dimana apabila tgl instal jatuh pada hari
> Sabtu/Minggu/Libur maka tidak berlaku.
>
> Atas bantuan teman-teman, saya ucapkan terima kasih.
- 4f.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "Yvonne" yvonne@astridogroup.com
Sun May 29, 2011 11:51 pm (PDT)
Mba Siti, kok rumusnya ga ada function ya di excel 2003.
SAya coba cari function workday ga ada.
----- Original Message -----
From: STDEV(i)
To: belajar-excel@yahoogroups. com
Sent: Monday, May 30, 2011 1:14 PM
Subject: Re: [belajar-excel] Tgl Instal pada Hari Kerja
kok ndak ada penjelasannya ya..
Kita masih menunggu penjelasan yg okehhh..
Barangkali begini
Mbak ivon inginnya hanya menulis SATU TGL di cell D4
Cell D5 dan seterusnya ke bawah (semula kosong) minta diisi rumus
sehinga memunculkan tanggal yg otomatis berupa DAFTAR hari kerja berikutnya
(hari kerja = Senin - Jumat \tapi bukan hari LiburNasinal)
Daftar LIbur 2011, dibuat edi sheet 2 dan rangenya diberinama = Libur2011
rumus di D5 ( & dicopy ke cells dibawahnya)
=WORKDAY(D4,1,Libur2011)
lampairan:
ctv_membuat Daftar Tgl Hari Kerja dimulai hari tertentu kalee yee.xls
2011/5/30 Yvonne <yvonne@astridogroup.com >
Dear all TTM,
Mohon bantuannya untuk masalah file saya berupa otomatisasi perhitungan tanggal instal
pada hari kerja dimana apabila tgl instal jatuh pada hari Sabtu/Minggu/Libur maka tidak berlaku.
Atas bantuan teman-teman, saya ucapkan terima kasih.
- 4g.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi
Sun May 29, 2011 11:51 pm (PDT)
iyaa ya
mak lampir nya ketinggalan, nih...
kalau hasilnya masih salah, kita-kita diberi penjelaan lagi yaaa..
siti
2011/5/30 Yvonne <yvonne@astridogroup.com >
> Mba Siti, makasih untuk bantuan penjelasannya.
> Memang maksud saya seperti itu, tadi mungkin ada penjelasan yang saya lupa
> berikan.
>
> Hanya saja, lampiran mba Siti ga ada :)
> Mohon lampirannya mba.
> Terima kasih.
>
>
> ----- Original Message -----
> *From:* STDEV(i) <setiyowati.devi@gmail.com >
> *To:* belajar-excel@yahoogroups. com
> *Sent:* Monday, May 30, 2011 1:14 PM
> *Subject:* Re: [belajar-excel] Tgl Instal pada Hari Kerja
>
>
>
> kok ndak ada penjelasannya ya..
> Kita masih menunggu penjelasan yg okehhh..
>
> *Barangkali begini*
> Mbak ivon inginnya hanya menulis SATU TGL di cell D4
> Cell D5 dan seterusnya ke bawah (semula kosong) minta diisi rumus
> sehinga memunculkan tanggal yg otomatis berupa DAFTAR hari kerja
> berikutnya
> (hari kerja = Senin - Jumat \tapi bukan hari LiburNasinal)
>
> Daftar LIbur 2011, dibuat edi sheet 2 dan rangenya diberinama = Libur2011
> rumus di D5 ( & dicopy ke cells dibawahnya)
>
> =WORKDAY(D4,1,Libur2011)
>
> lampairan:
> ctv_membuat Daftar Tgl Hari Kerja dimulai hari tertentu kalee yee.xls
>
>
>
>
> 2011/5/30 Yvonne <yvonne@astridogroup.com >
>
>> Dear all TTM,
>>
>> Mohon bantuannya untuk masalah file saya berupa otomatisasi *perhitungan
>> tanggal instal** *
>>
> pada hari kerja dimana apabila tgl instal jatuh pada hari
>> Sabtu/Minggu/Libur maka tidak berlaku.
>> Atas bantuan teman-teman, saya ucapkan terima kasih.
>>
>>
>
- 4h.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi
Mon May 30, 2011 12:02 am (PDT)
lupa bilang:
Add-In Analysis Tool harus terpasang dan diaktiafkan
2011/5/30 Yvonne <yvonne@astridogroup.com >
>
>
> 
> Mba Siti, kok rumusnya ga ada function ya di excel 2003.
> SAya coba cari function workday ga ada.
>
>
> ----- Original Message -----
> *From:* STDEV(i) <setiyowati.devi@gmail.com >
> *To:* belajar-excel@yahoogroups. com
> *Sent:* Monday, May 30, 2011 1:14 PM
> *Subject:* Re: [belajar-excel] Tgl Instal pada Hari Kerja
>
>
>
> kok ndak ada penjelasannya ya..
> Kita masih menunggu penjelasan yg okehhh..
>
> *Barangkali begini*
> Mbak ivon inginnya hanya menulis SATU TGL di cell D4
> Cell D5 dan seterusnya ke bawah (semula kosong) minta diisi rumus
> sehinga memunculkan tanggal yg otomatis berupa DAFTAR hari kerja
> berikutnya
> (hari kerja = Senin - Jumat \tapi bukan hari LiburNasinal)
>
> Daftar LIbur 2011, dibuat edi sheet 2 dan rangenya diberinama = Libur2011
>
> rumus di D5 ( & dicopy ke cells dibawahnya)
>
> =WORKDAY(D4,1,Libur2011)
>
> lampairan:
> ctv_membuat Daftar Tgl Hari Kerja dimulai hari tertentu kalee yee.xls
>
>
>
>
> 2011/5/30 Yvonne <yvonne@astridogroup.com >
>
>> Dear all TTM,
>>
>> Mohon bantuannya untuk masalah file saya berupa otomatisasi *perhitungan
>> tanggal instal** *
>>
> pada hari kerja dimana apabila tgl instal jatuh pada hari
>> Sabtu/Minggu/Libur maka tidak berlaku.
>> Atas bantuan teman-teman, saya ucapkan terima kasih.
>>
>>
>
- 4i.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi
Mon May 30, 2011 12:12 am (PDT)
Add ini resmi dari Excel (bawwan di CD Installernya)
Mungkin di PC mbak Yvonne hanay beum diaktifkan saja,
tetapi ada kungkinan: "tukang install" nya nguawurr yg diinstall hanya
"standar"
akibatnya banyak komponen yg tiak ikut terinstall
Tapi jangan khawatir bisa di Instal (Change) melalui control panel
kalau ternyata begitu nanti akan diberi panduan
(sementara cari sendiri dulu di HELP Excel di bab Installing"
berikut ini gambaran untk mengaktifkan Add In..
[image: analysis tool add in.GIF]
2011/5/30 STDEV(i) <setiyowati.devi@gmail.com >
> lupa bilang:
> Add-In Analysis Tool harus terpasang dan diaktiafkan
>
>
> 2011/5/30 Yvonne <yvonne@astridogroup.com >
>
>>
>> Mba Siti, kok rumusnya ga ada function ya di excel 2003.
>> SAya coba cari function workday ga ada.
>>
>>
>> ----- Original Message -----
>> *From:* STDEV(i) <setiyowati.devi@gmail.com >
>> *To:* belajar-excel@yahoogroups. com
>> *Sent:* Monday, May 30, 2011 1:14 PM
>> *Subject:* Re: [belajar-excel] Tgl Instal pada Hari Kerja
>> kok ndak ada penjelasannya ya..
>> Kita masih menunggu penjelasan yg okehhh..
>> *Barangkali begini*
>> Mbak ivon inginnya hanya menulis SATU TGL di cell D4
>> Cell D5 dan seterusnya ke bawah (semula kosong) minta diisi rumus
>> sehinga memunculkan tanggal yg otomatis berupa DAFTAR hari kerja
>> berikutnya
>> (hari kerja = Senin - Jumat \tapi bukan hari LiburNasinal)
>>
>> Daftar LIbur 2011, dibuat edi sheet 2 dan rangenya diberinama = Libur2011
>>
>> rumus di D5 ( & dicopy ke cells dibawahnya)
>>
>> =WORKDAY(D4,1,Libur2011)
>>
>> lampairan:
>> ctv_membuat Daftar Tgl Hari Kerja dimulai hari tertentu kalee yee.xls
>>
>>
>>
- 4j.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "Franciscus SOG" jclugbu@gmail.com elijah_spirit
Mon May 30, 2011 12:25 am (PDT)
Wakakak, salah tebak.. cape.. de..
Blessings,
Fran'z
On 5/30/11, Yvonne <yvonne@astridogroup.com > wrote:
> Mba Siti, makasih untuk bantuan penjelasannya.
> Memang maksud saya seperti itu, tadi mungkin ada penjelasan yang saya lupa
> berikan.
>
> Hanya saja, lampiran mba Siti ga ada :)
> Mohon lampirannya mba.
> Terima kasih.
>
> ----- Original Message -----
> From: STDEV(i)
> To: belajar-excel@yahoogroups. com
> Sent: Monday, May 30, 2011 1:14 PM
> Subject: Re: [belajar-excel] Tgl Instal pada Hari Kerja
>
>
>
> kok ndak ada penjelasannya ya..
>
> Kita masih menunggu penjelasan yg okehhh..
>
>
> Barangkali begini
> Mbak ivon inginnya hanya menulis SATU TGL di cell D4
> Cell D5 dan seterusnya ke bawah (semula kosong) minta diisi rumus
> sehinga memunculkan tanggal yg otomatis berupa DAFTAR hari kerja
> berikutnya
> (hari kerja = Senin - Jumat \tapi bukan hari LiburNasinal)
>
>
> Daftar LIbur 2011, dibuat edi sheet 2 dan rangenya diberinama = Libur2011
>
>
> rumus di D5 ( & dicopy ke cells dibawahnya)
>
>
> =WORKDAY(D4,1,Libur2011)
>
>
> lampairan:
> ctv_membuat Daftar Tgl Hari Kerja dimulai hari tertentu kalee yee.xls
>
>
>
>
>
>
>
>
> 2011/5/30 Yvonne <yvonne@astridogroup.com >
>
> Dear all TTM,
>
> Mohon bantuannya untuk masalah file saya berupa otomatisasi perhitungan
> tanggal instal
> pada hari kerja dimana apabila tgl instal jatuh pada hari
> Sabtu/Minggu/Libur maka tidak berlaku.
> Atas bantuan teman-teman, saya ucapkan terima kasih.
>
>
>
- 4k.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "Yvonne" yvonne@astridogroup.com
Mon May 30, 2011 12:38 am (PDT)
mba Siti, saya sudah bisa aktifkan add ins nya cuma yang saya bingung kenapa dia ga bisa baca sheet libur 2011 ya?
1 itu untuk apa mba siti?
----- Original Message -----
From: STDEV(i)
To: belajar-excel@yahoogroups. com
Sent: Monday, May 30, 2011 2:11 PM
Subject: Re: [belajar-excel] Tgl Instal pada Hari Kerja
Add ini resmi dari Excel (bawwan di CD Installernya)
Mungkin di PC mbak Yvonne hanay beum diaktifkan saja,
tetapi ada kungkinan: "tukang install" nya nguawurr yg diinstall hanya "standar"
akibatnya banyak komponen yg tiak ikut terinstall
Tapi jangan khawatir bisa di Instal (Change) melalui control panel
kalau ternyata begitu nanti akan diberi panduan
(sementara cari sendiri dulu di HELP Excel di bab Installing"
berikut ini gambaran untk mengaktifkan Add In..
2011/5/30 STDEV(i) <setiyowati.devi@gmail.com >
lupa bilang:
Add-In Analysis Tool harus terpasang dan diaktiafkan
2011/5/30 Yvonne <yvonne@astridogroup.com >
Mba Siti, kok rumusnya ga ada function ya di excel 2003.
SAya coba cari function workday ga ada.
----- Original Message -----
From: STDEV(i)
To: belajar-excel@yahoogroups. com
Sent: Monday, May 30, 2011 1:14 PM
Subject: Re: [belajar-excel] Tgl Instal pada Hari Kerja
kok ndak ada penjelasannya ya..
Kita masih menunggu penjelasan yg okehhh..
Barangkali begini
Mbak ivon inginnya hanya menulis SATU TGL di cell D4
Cell D5 dan seterusnya ke bawah (semula kosong) minta diisi rumus
sehinga memunculkan tanggal yg otomatis berupa DAFTAR hari kerja berikutnya
(hari kerja = Senin - Jumat \tapi bukan hari LiburNasinal)
Daftar LIbur 2011, dibuat edi sheet 2 dan rangenya diberinama = Libur2011
rumus di D5 ( & dicopy ke cells dibawahnya)
=WORKDAY(D4,1,Libur2011)
lampairan:
ctv_membuat Daftar Tgl Hari Kerja dimulai hari tertentu kalee yee.xls
- 4l.
-
Re: Tgl Instal pada Hari Kerja
Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi
Mon May 30, 2011 12:50 am (PDT)
coba Range A1:A13 di sheet Daftar LIbur
diperbaiki lagi NAMAnya (melalui Menu Insert > Name > Define)
namanya yg sudah diberikan oleh siti Libur2011
Kalau masih bermasalah pakai alamat biasa saja
rumusNYA AMENJADI
=WOORKDAY(TglAwal,*Lama(Hari) *,'daftar libur 2011'!$A$1:$ A$13)
*1* (argument2) adalah banyaknya hari antara tgl awal samapai tgl berikutnya
dari hari kerja terakhir ke hari kerja berikutnya kan = 1
(walaupun setelah dirumus dengan WORKDAY hasilnya bisa lebih dari 1)
2011/5/30 Yvonne <yvonne@astridogroup.com >
> mba Siti, saya sudah bisa aktifkan add ins nya cuma yang saya bingung
> kenapa dia ga bisa baca sheet libur 2011 ya?
> *1 itu untuk apa mba siti*?
>
>
> ----- Original Message -----
> *From:* STDEV(i) <setiyowati.devi@gmail.com >
> *To:* belajar-excel@yahoogroups. com
> *Sent:* Monday, May 30, 2011 2:11 PM
> *Subject:* Re: [belajar-excel] Tgl Instal pada Hari Kerja
>
>
> Add ini resmi dari Excel (bawwan di CD Installernya)
> Mungkin di PC mbak Yvonne hanay beum diaktifkan saja,
>
> tetapi ada kungkinan: "tukang install" nya nguawurr yg diinstall hanya
> "standar"
> akibatnya banyak komponen yg tidak ikut terinstall
>
> Tapi jangan khawatir bisa di Instal (Change) melalui control panel
> kalau ternyata begitu nanti akan diberi panduan
> (sementara cari sendiri dulu di HELP Excel di bab Installing"
>
> berikut ini gambaran untk mengaktifkan Add In..
>
>
- 5.
-
Copy isi cell terakhir
Posted by: "Arief P. Sukarno" mas_rihan@yahoo.com mas_rihan
Mon May 30, 2011 12:01 am (PDT)
Dear Master Excel,
Lama tidak ikut nimbrung nih, tapi selalu saya ikuti terus perkembanganya dan banyak ilmu yang saya dapat dari sini, sebelumnya makasih banyak atas ilmu yang dibagikan. Btw, boleh saya mau minta tolong juga, bagaimana caranya agar kita dapat mengcopy isi dari cell terakhir dari suatu kolom pakai VBA dari sheet tertentu, filenya terlampir.
Contohnya :
ketika cell G4 dipilih "penerimaan kas besar" maka cell O4 akan terisi dengan isi cell terakhir pada sheet database BKM dari kolom no bukti, begitu juga bila cell G4 dipilih pilihan yang lain akan terisi dari database yang terkait.
Minta tolong ya...makasih buat master semua.
Arief PS
- 6a.
-
vlookup 2
Posted by: "Niki Dwinarni" niki.dwinarni@yahoo.com niki.dwinarni
Mon May 30, 2011 12:16 am (PDT)
hi temen2 B Excell
tlg bantuin gimana caranya...vlookup data 1 & 2. data yang di samakan yaitu yang kolom font Yellow....jadi da 2 kolom yg disamakan. ( data 1 yang ada di data 2)
trims
- 6b.
-
Re: vlookup 2
Posted by: "Angga Gurmilang Sedar" mail@gilangsedar.com gilang_parastar
Mon May 30, 2011 12:42 am (PDT)
Dear Niki,
Apakah ada contoh data nya?
--------------------- --------- --------- --------- --------- -
Best Regards,
Angga Gurmilang Sedar
--------------------- --------- --------- --------- --------- -
Sent from Blackberry® Pinjemanâ„¢
-----Original Message-----
From: Niki Dwinarni <niki.dwinarni@yahoo.com >
Sender: belajar-excel@yahoogroups. com
Date: Mon, 30 May 2011 15:16:11
To: Group Excell<belajar-excel@yahoogroups. >com
Reply-To: belajar-excel@yahoogroups. com
Subject: [belajar-excel] vlookup 2
hi temen2 B Excell
tlg bantuin gimana caranya...vlookup data 1 & 2. data yang di samakan yaitu yang kolom font Yellow....jadi da 2 kolom yg disamakan. ( data 1 yang ada di data 2)
trims
- 6c.
-
Re: vlookup 2
Posted by: "Niki Dwinarni" niki.dwinarni@yahoo.com niki.dwinarni
Mon May 30, 2011 12:45 am (PDT)
up sorry missing attachment
--- Pada Sen, 30/5/11, Angga Gurmilang Sedar <mail@gilangsedar.com > menulis:
Dari: Angga Gurmilang Sedar <mail@gilangsedar.com >
Judul: Re: [belajar-excel] vlookup 2
Kepada: belajar-excel@yahoogroups. com
Tanggal: Senin, 30 Mei, 2011, 7:42 AM
Dear Niki,
Apakah ada contoh data nya?
--------------------- --------- --------- --------- --------- -
Best Regards,
Angga Gurmilang Sedar
--------------------- --------- --------- --------- --------- -
Sent from Blackberry® Pinjemanâ„¢From: Niki Dwinarni <niki.dwinarni@yahoo.com >
Sender: belajar-excel@yahoogroups. com
Date: Mon, 30 May 2011 15:16:11 +0800 (SGT)To: Group Excell<belajar-excel@yahoogroups. >ReplyTo: belajar-excel@com yahoogroups. com
Subject: [belajar-excel] vlookup 2
hi temen2 B Excell
tlg bantuin gimana caranya...vlookup data 1 & 2. data yang di samakan yaitu yang kolom font Yellow....jadi da 2 kolom yg disamakan. ( data 1 yang ada di data 2)
trims
- 6d.
-
Re: vlookup 2
Posted by: "Niki Dwinarni" niki.dwinarni@yahoo.com niki.dwinarni
Mon May 30, 2011 12:55 am (PDT)
ini datanya
--- Pada Sen, 30/5/11, Angga Gurmilang Sedar <mail@gilangsedar.com > menulis:
Dari: Angga Gurmilang Sedar <mail@gilangsedar.com >
Judul: Re: [belajar-excel] vlookup 2
Kepada: belajar-excel@yahoogroups. com
Tanggal: Senin, 30 Mei, 2011, 7:42 AM
Dear Niki,
Apakah ada contoh data nya?
--------------------- --------- --------- --------- --------- -
Best Regards,
Angga Gurmilang Sedar
--------------------- --------- --------- --------- --------- -
Sent from Blackberry® Pinjemanâ„¢From: Niki Dwinarni <niki.dwinarni@yahoo.com >
Sender: belajar-excel@yahoogroups. com
Date: Mon, 30 May 2011 15:16:11 +0800 (SGT)To: Group Excell<belajar-excel@yahoogroups. >ReplyTo: belajar-excel@com yahoogroups. com
Subject: [belajar-excel] vlookup 2
hi temen2 B Excell
tlg bantuin gimana caranya...vlookup data 1 & 2. data yang di samakan yaitu yang kolom font Yellow....jadi da 2 kolom yg disamakan. ( data 1 yang ada di data 2)
trims
- 7a.
-
Re: Sebar Data Berdasarkan Kolom Terakhir
Posted by: "Sinode G Sinaga" sinodesinaga@gmail.com sinodesinaga
Mon May 30, 2011 12:43 am (PDT)
Mbak Siti,
Saya sdh jalankan program yg saya inginkan dgn pencerahan dr Mbak CT…tq bgt mbak…
Salam
Sinode
From: belajar-excel@yahoogroups. On Behalf Of STDEV(i)com
Sent: Thursday, May 26, 2011 8:22 PM
Subject: [belajar-excel] Re: Sebar Data Berdasarkan Kolom Terakhir
Kalau sayang sama milis, jangan kirimi email ke milis dgn
cara CROSS POSTING dong..!! Saru !!
Dan juga membuat bingung moderatornya,
( ini email yg mana kok berulang ulang banyak sekaleeee)
di dunia per milisan - email cross-posting itu termasuk
tidak NETIS
di milis lain yg serius, member langsung di-banned ..
--------------------- ---------
makronya menhindari looping
agar pak sinode mudah memahaminya
Sub DeRekap()
' siti Vi / 26 mei 2011
'-------------------- --
Dim ReffTBL As Range, RepoJNS As Range
Dim RepoQTY As Range, RepoZAK As Range
Dim Tgl As Date, nRow As Long, nCol As Integer
Set ReffTBL = ThisWorkbook.Sheets("Sheet1" ).Cells(2, 2).CurrentRegion
Tgl = ReffTBL(1, 2).Value
nRow = ReffTBL.Rows.Count - 2
nCol = ReffTBL.Columns.Count
Set ReffTBL = ReffTBL.Offset(2, 0).Resize(nRow, nCol)
With Workbooks("Rekap Bulanan.xls")
'---kolom Jenis
Set RepoJNS = .Sheets("Jenis Feed").Cells(3, 2).CurrentRegion
Set RepoJNS = RepoJNS.Offset(0, RepoJNS.Columns. Count)
RepoJNS(1, 1) = Tgl: RepoJNS(1, 1).NumberFormat = "dd-mmm-yyyy"
ReffTBL.Offset(0, 1).Resize(, 1).Copy
RepoJNS(2, 1).PasteSpecial xlPasteValuesAndNumberFormats
Application.CutCopyMode = False
'---kolom Qty
Set RepoQTY = .Sheets("Qty").Cells(3, 2).CurrentRegion
Set RepoQTY = RepoQTY.Offset(0, RepoQTY.Columns. Count)
RepoQTY(1, 1) = Tgl: RepoQTY(1, 1).NumberFormat = "dd-mmm-yyyy"
ReffTBL.Offset(0, 2).Resize(, 1).Copy
RepoQTY(2, 1).PasteSpecial xlPasteValuesAndNumberFormats
Application.CutCopyMode = False
'----kolom Sak
Set RepoZAK = .Sheets("Sak").Cells(3, 2).CurrentRegion
Set RepoZAK = RepoZAK.Offset(0, RepoZAK.Columns. Count)
RepoZAK(1, 1) = Tgl: RepoZAK(1, 1).NumberFormat = "dd-mmm-yyyy"
ReffTBL.Offset(0, 3).Resize(, 1).Copy
RepoZAK(2, 1).PasteSpecial xlPasteValuesAndNumberFormats
Application.CutCopyMode = False
End With
RepoJNS.Parent.Parent.Save
RepoJNS.Parent.Parent.Activate
MsgBox "Selesai ", vbInformation
End Sub
===================
from
Sinode G Sinaga sinodesinaga@gmail.com
to
cc
Hilman <hilman_email@yahoo.com >,
"STDEV(i)" <setiyowati.devi@gmail.com >
date
Thu, May 26, 2011 at 2:06 PM
subject
Sebar Data Berdasarkan Kolom Terakhir
2011/5/26 Sinode G Sinaga <sinodesinaga@gmail.com >
Dear Pakar Excel,
Saya butuh bantuan pakar yg budiman lagi nih, kalo kemarin saya dibantu sebar data dgn pertimbangan baris terakhir, sekarang acuannya adalah kolom terakhir. File master (Penggunaan Harian.xls) sel berisi tanggal akan dikirim ke “Rekap Bulanan.xls†sheet Jfeed, Qty dan Sak berurut ke kanan sejalan dng perubahan tanggal penggunaan harian. Kemudian kolom Jenis feed dikirim ke file terkait juga sesuai nama sheetnya.
Terimakasih atas bantuannya
Salam hormat
Sinode
Need to Reply?
Click one of the "Reply" links to respond to a specific message in the Daily Digest.
---------------------------------------------------------------------
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
---------------------------------------------------------------------
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
---------------------------------------------------------------------
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Individual | Switch format to Traditional
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe
Tidak ada komentar:
Posting Komentar