15 Messages
Digest #3160
Messages
Tue Oct 28, 2014 3:45 am (PDT) . Posted by:
"ibnu susilo"
Wah sip sip
Terima kasih Pak Agus atas rumus sakti nya.
- Saya melanjutkan copy ke bawah. Saya mengunci rumus MAX(C4:C26) pada
kolom K menjadi MAX($C$4:$C$26) untuk mendapatkan list supplier. Kendalanya
: baris terakhir kolom K (supplier terakhir) hanya terhitung 1 baris saja.
- Rumus index small(if pada kolom L menjadi salah ketika saya copy
berdasarkan kebutuhan data
btw. Rumusnya mengispirasi saya untuk utak-atik
Terima kasih pak Nang Agus
Pada 28 Oktober 2014 15.08, Nang Agus nangagus@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com> menulis:
>
>
> Beginikah rumusnya?
>
> =IF(J4>MAX(C4:C26);"";LOOKUP(J4;$C$4:$C$26;$B$4:$B$26))
>
> atau begini yaa?
>
> {=INDEX($E$4:$E$5003;SMALL(IF(K4=$D$4:$D$5003;ROW(E$4:E$5003)*1;"");COUNTIF($K$4:K4;K4))-3)}
>
> saya kok ragu kalau bisa...., Coba chek di TKP!
>
>
>
> 2014-10-28 14:30 GMT+07:00 ibnu susilo susilo.ib@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>>
>>
>> Terima kasih atas bantuannya
>>
>> Mungkin keterangan saya yang kurang lengkap. Data saya pada kolom D dan
>> kolom E paling tidak ada 5000 data ke bawah, baris kosong sehingga tidak
>> terihat masih ada data dibawahnya.
>>
>> Rumus index small(if saya masih hanya mengumpulkan data saja, bukan
>> mengurutkan berdasarkan rangking.
>>
>> Terima kasih
>>
>> Pada 24 Oktober 2014 17.21, ibnu susilo susilo.ib@gmail.com
>> [belajar-excel] <belajar-excel@yahoogroups.com> menulis:
>>
>>>
>>>
>>> Selamat sore para suhu excel yang saya hormati
>>>
>>> Mohon bantuannya untuk soal saya mengenai sort secara otomatis lagi
>>> Saya tidak menemukan rumus yang cocok, mungkin saya terlewat dalam
>>> mencari arsip.
>>>
>>> Mohon saya diberikan rumus sakti untuk memecahkan masalah saya berikut,
>>> tanpa macro, tanpa pivot.
>>> Saya mempunyai raw data supplier dan Part Number.
>>> Dari data kolom D dan kolom E, saya ingin mengurutkannya pada kolom G
>>> dan kolom H berdasarkan urutan rangking pada kolom B.
>>>
>>> Sebenarnya raw data kolom D dan E serta kriteria pada kolom B sudah
>>> melalui rumus-rumus juga yang hasilnya seperti itu. Tinggal bagaimana
>>> menyederhanakannya menjadi seperti pada kolom G dan H.
>>> Dengan tambahan : untuk supplier dengan status check akan muncul pada
>>> urutan paling bawah pada kolom G dan H.
>>>
>>>
>>> Lebih jelasnya pada attachment berikut
>>>
>>> Terima kasih atas bantuannya
>>> Susilo
>>>
>>>
>>>
>>>
>>>
>>
>
>
Terima kasih Pak Agus atas rumus sakti nya.
- Saya melanjutkan copy ke bawah. Saya mengunci rumus MAX(C4:C26) pada
kolom K menjadi MAX($C$4:$C$26) untuk mendapatkan list supplier. Kendalanya
: baris terakhir kolom K (supplier terakhir) hanya terhitung 1 baris saja.
- Rumus index small(if pada kolom L menjadi salah ketika saya copy
berdasarkan kebutuhan data
btw. Rumusnya mengispirasi saya untuk utak-atik
Terima kasih pak Nang Agus
Pada 28 Oktober 2014 15.08, Nang Agus nangagus@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com> menulis:
>
>
> Beginikah rumusnya?
>
> =IF(J4>MAX(C4:C26);"";LOOKUP(J4;$C$4:$C$26;$B$4:$B$26))
>
> atau begini yaa?
>
> {=INDEX($E$4:$E$5003;SMALL(IF(K4=$D$4:$D$5003;ROW(E$4:E$5003)*1;"");COUNTIF($K$4:K4;K4))-3)}
>
> saya kok ragu kalau bisa...., Coba chek di TKP!
>
>
>
> 2014-10-28 14:30 GMT+07:00 ibnu susilo susilo.ib@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>>
>>
>> Terima kasih atas bantuannya
>>
>> Mungkin keterangan saya yang kurang lengkap. Data saya pada kolom D dan
>> kolom E paling tidak ada 5000 data ke bawah, baris kosong sehingga tidak
>> terihat masih ada data dibawahnya.
>>
>> Rumus index small(if saya masih hanya mengumpulkan data saja, bukan
>> mengurutkan berdasarkan rangking.
>>
>> Terima kasih
>>
>> Pada 24 Oktober 2014 17.21, ibnu susilo susilo.ib@gmail.com
>> [belajar-excel] <belajar-excel@yahoogroups.com> menulis:
>>
>>>
>>>
>>> Selamat sore para suhu excel yang saya hormati
>>>
>>> Mohon bantuannya untuk soal saya mengenai sort secara otomatis lagi
>>> Saya tidak menemukan rumus yang cocok, mungkin saya terlewat dalam
>>> mencari arsip.
>>>
>>> Mohon saya diberikan rumus sakti untuk memecahkan masalah saya berikut,
>>> tanpa macro, tanpa pivot.
>>> Saya mempunyai raw data supplier dan Part Number.
>>> Dari data kolom D dan kolom E, saya ingin mengurutkannya pada kolom G
>>> dan kolom H berdasarkan urutan rangking pada kolom B.
>>>
>>> Sebenarnya raw data kolom D dan E serta kriteria pada kolom B sudah
>>> melalui rumus-rumus juga yang hasilnya seperti itu. Tinggal bagaimana
>>> menyederhanakannya menjadi seperti pada kolom G dan H.
>>> Dengan tambahan : untuk supplier dengan status check akan muncul pada
>>> urutan paling bawah pada kolom G dan H.
>>>
>>>
>>> Lebih jelasnya pada attachment berikut
>>>
>>> Terima kasih atas bantuannya
>>> Susilo
>>>
>>>
>>>
>>>
>>>
>>
>
>
Tue Oct 28, 2014 3:53 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
File terlampir dengan 2 kolom bantu tanpa array formula.
2014-10-24 21:21 GMT+11:00 ibnu susilo susilo.ib@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Selamat sore para suhu excel yang saya hormati
>
> Mohon bantuannya untuk soal saya mengenai sort secara otomatis lagi
> Saya tidak menemukan rumus yang cocok, mungkin saya terlewat dalam mencari
> arsip.
>
> Mohon saya diberikan rumus sakti untuk memecahkan masalah saya berikut,
> tanpa macro, tanpa pivot.
> Saya mempunyai raw data supplier dan Part Number.
> Dari data kolom D dan kolom E, saya ingin mengurutkannya pada kolom G dan
> kolom H berdasarkan urutan rangking pada kolom B.
>
> Sebenarnya raw data kolom D dan E serta kriteria pada kolom B sudah
> melalui rumus-rumus juga yang hasilnya seperti itu. Tinggal bagaimana
> menyederhanakannya menjadi seperti pada kolom G dan H.
> Dengan tambahan : untuk supplier dengan status check akan muncul pada
> urutan paling bawah pada kolom G dan H.
>
>
> Lebih jelasnya pada attachment berikut
>
> Terima kasih atas bantuannya
> Susilo
>
>
>
>
>
>
2014-10-24 21:21 GMT+11:00 ibnu susilo susilo.ib@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Selamat sore para suhu excel yang saya hormati
>
> Mohon bantuannya untuk soal saya mengenai sort secara otomatis lagi
> Saya tidak menemukan rumus yang cocok, mungkin saya terlewat dalam mencari
> arsip.
>
> Mohon saya diberikan rumus sakti untuk memecahkan masalah saya berikut,
> tanpa macro, tanpa pivot.
> Saya mempunyai raw data supplier dan Part Number.
> Dari data kolom D dan kolom E, saya ingin mengurutkannya pada kolom G dan
> kolom H berdasarkan urutan rangking pada kolom B.
>
> Sebenarnya raw data kolom D dan E serta kriteria pada kolom B sudah
> melalui rumus-rumus juga yang hasilnya seperti itu. Tinggal bagaimana
> menyederhanakannya menjadi seperti pada kolom G dan H.
> Dengan tambahan : untuk supplier dengan status check akan muncul pada
> urutan paling bawah pada kolom G dan H.
>
>
> Lebih jelasnya pada attachment berikut
>
> Terima kasih atas bantuannya
> Susilo
>
>
>
>
>
>
Tue Oct 28, 2014 9:02 am (PDT) . Posted by:
"ibnu susilo"
Wahahaha ... kalau sudah di tangan Mr Kid langsung berasa bukan masalah lagi
Terima kasih bos atas ramuan ajaibnya
Sekali lagi terima kasih
Pada 28 Oktober 2014 17.52, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com> menulis:
>
>
> File terlampir dengan 2 kolom bantu tanpa array formula.
>
> 2014-10-24 21:21 GMT+11:00 ibnu susilo susilo.ib@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>>
>>
>> Selamat sore para suhu excel yang saya hormati
>>
>> Mohon bantuannya untuk soal saya mengenai sort secara otomatis lagi
>> Saya tidak menemukan rumus yang cocok, mungkin saya terlewat dalam
>> mencari arsip.
>>
>> Mohon saya diberikan rumus sakti untuk memecahkan masalah saya berikut,
>> tanpa macro, tanpa pivot.
>> Saya mempunyai raw data supplier dan Part Number.
>> Dari data kolom D dan kolom E, saya ingin mengurutkannya pada kolom G dan
>> kolom H berdasarkan urutan rangking pada kolom B.
>>
>> Sebenarnya raw data kolom D dan E serta kriteria pada kolom B sudah
>> melalui rumus-rumus juga yang hasilnya seperti itu. Tinggal bagaimana
>> menyederhanakannya menjadi seperti pada kolom G dan H.
>> Dengan tambahan : untuk supplier dengan status check akan muncul pada
>> urutan paling bawah pada kolom G dan H.
>>
>>
>> Lebih jelasnya pada attachment berikut
>>
>> Terima kasih atas bantuannya
>> Susilo
>>
>>
>>
>>
>>
>
>
Terima kasih bos atas ramuan ajaibnya
Sekali lagi terima kasih
Pada 28 Oktober 2014 17.52, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com> menulis:
>
>
> File terlampir dengan 2 kolom bantu tanpa array formula.
>
> 2014-10-24 21:21 GMT+11:00 ibnu susilo susilo.ib@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>>
>>
>> Selamat sore para suhu excel yang saya hormati
>>
>> Mohon bantuannya untuk soal saya mengenai sort secara otomatis lagi
>> Saya tidak menemukan rumus yang cocok, mungkin saya terlewat dalam
>> mencari arsip.
>>
>> Mohon saya diberikan rumus sakti untuk memecahkan masalah saya berikut,
>> tanpa macro, tanpa pivot.
>> Saya mempunyai raw data supplier dan Part Number.
>> Dari data kolom D dan kolom E, saya ingin mengurutkannya pada kolom G dan
>> kolom H berdasarkan urutan rangking pada kolom B.
>>
>> Sebenarnya raw data kolom D dan E serta kriteria pada kolom B sudah
>> melalui rumus-rumus juga yang hasilnya seperti itu. Tinggal bagaimana
>> menyederhanakannya menjadi seperti pada kolom G dan H.
>> Dengan tambahan : untuk supplier dengan status check akan muncul pada
>> urutan paling bawah pada kolom G dan H.
>>
>>
>> Lebih jelasnya pada attachment berikut
>>
>> Terima kasih atas bantuannya
>> Susilo
>>
>>
>>
>>
>>
>
>
Tue Oct 28, 2014 4:23 am (PDT) . Posted by:
"toni Sulaeman"
Dear BeExceller
mudah-mudahan ada yang bisa bantu.
saya memang awam terhadap excel bisanya cuma ngetik aja, pengen belajar!
permasalahan saya : saya buat 3 sheet, sheet1 (transaksi), sheet2 (data barang), dan sheet3 (nota)
saya pengen buat macronya tapi saya agak bingung ngejelasinnya. yang pasti saya pengen ketika penjualan di entri di sheet3 (nota) datanya bisa terhubung ke sheet1 (Transaksi) dan macronya ada perintah "simpan", "hapus (bila ada yang salah entri)", "cetak". agak ribet juga ya penjelasan saya. tapi mudah-mudahan para master bisa paham dengan maksud saya.
terimakasih sebelumnya.
salam "TS"
mudah-mudahan ada yang bisa bantu.
saya memang awam terhadap excel bisanya cuma ngetik aja, pengen belajar!
permasalahan saya : saya buat 3 sheet, sheet1 (transaksi), sheet2 (data barang), dan sheet3 (nota)
saya pengen buat macronya tapi saya agak bingung ngejelasinnya. yang pasti saya pengen ketika penjualan di entri di sheet3 (nota) datanya bisa terhubung ke sheet1 (Transaksi) dan macronya ada perintah "simpan"
terimakasih sebelumnya.
salam "TS"
Tue Oct 28, 2014 6:37 pm (PDT) . Posted by:
"Nang Agus"
Mungkinkah seperti ini?
saya juga lagi belajar Excel
2014-10-28 18:17 GMT+07:00 toni Sulaeman tsulaeman46@yahoo.co.id
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Dear BeExceller
>
> mudah-mudahan ada yang bisa bantu.
> saya memang awam terhadap excel bisanya cuma ngetik aja, pengen belajar!
> permasalahan saya : saya buat 3 sheet, sheet1 (transaksi), sheet2 (data
> barang), dan sheet3 (nota)
> saya pengen buat macronya tapi saya agak bingung ngejelasinnya. yang pasti
> saya pengen ketika penjualan di entri di sheet3 (nota) datanya bisa
> terhubung ke sheet1 (Transaksi) dan macronya ada perintah "simpan", "hapus
> (bila ada yang salah entri)", "cetak". agak ribet juga ya penjelasan saya.
> tapi mudah-mudahan para master bisa paham dengan maksud saya.
> terimakasih sebelumnya.
> salam "TS"
>
>
>
>
saya juga lagi belajar Excel
2014-10-28 18:17 GMT+07:00 toni Sulaeman tsulaeman46@yahoo.co.id
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Dear BeExceller
>
> mudah-mudahan ada yang bisa bantu.
> saya memang awam terhadap excel bisanya cuma ngetik aja, pengen belajar!
> permasalahan saya : saya buat 3 sheet, sheet1 (transaksi), sheet2 (data
> barang), dan sheet3 (nota)
> saya pengen buat macronya tapi saya agak bingung ngejelasinnya. yang pasti
> saya pengen ketika penjualan di entri di sheet3 (nota) datanya bisa
> terhubung ke sheet1 (Transaksi) dan macronya ada perintah "simpan"
> (bila ada yang salah entri)"
> tapi mudah-mudahan para master bisa paham dengan maksud saya.
> terimakasih sebelumnya.
> salam "TS"
>
>
>
>
Tue Oct 28, 2014 4:32 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Abudi,
Bukankah sudah ada alurnya ?
Ikuti saja alurnya. Setiap ketemu decision (belah ketupat), buat IF.
IF selalu berisi 3 bagian, yaitu cek kondisi , hasil BENAR, hasil SALAH
s=Spending
d=Proposed SE = Spending+Accrual
b=Budget
p=Previous
belah ketupat 1 : cek s vs b
=IF( s>b , s , "salah1" )
bagian "salah1" akan mengarahkan ke alur bela ketupat 2 : cek d vs b
bunyi untuk "salah1"
*IF( d>b , "benar2" , "salah2" )*
berarti belah ketupat 1 berubah dari :
=IF( s>b , s , "salah1" )
menjadi :
=IF( s>b , s , *IF( d>b , "benar2" , "salah2" )* )
Sekarang susun bagian "benar2" lalu masukkan ke formula diatas menggantikan
bagian "benar2" dst
Wassalam,
Kid.
2014-10-27 16:11 GMT+11:00 Abudi Doank abudi.doank@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Selamat siang para Master Excel,
>
> Mohon pencerahan formula untuk conditional calculation untuk proposed SE
> pada file terlampir.
>
> Terima kasih.
>
> Salam,
> Abudi
>
>
>
>
Bukankah sudah ada alurnya ?
Ikuti saja alurnya. Setiap ketemu decision (belah ketupat), buat IF.
IF selalu berisi 3 bagian, yaitu cek kondisi , hasil BENAR, hasil SALAH
s=Spending
d=Proposed SE = Spending+Accrual
b=Budget
p=Previous
belah ketupat 1 : cek s vs b
=IF( s>b , s , "salah1" )
bagian "salah1" akan mengarahkan ke alur bela ketupat 2 : cek d vs b
bunyi untuk "salah1"
*IF( d>b , "benar2" , "salah2" )*
berarti belah ketupat 1 berubah dari :
=IF( s>b , s , "salah1" )
menjadi :
=IF( s>b , s , *IF( d>b , "benar2" , "salah2" )* )
Sekarang susun bagian "benar2" lalu masukkan ke formula diatas menggantikan
bagian "benar2" dst
Wassalam,
Kid.
2014-10-27 16:11 GMT+11:00 Abudi Doank abudi.doank@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Selamat siang para Master Excel,
>
> Mohon pencerahan formula untuk conditional calculation untuk proposed SE
> pada file terlampir.
>
> Terima kasih.
>
> Salam,
> Abudi
>
>
>
>
Tue Oct 28, 2014 4:34 am (PDT) . Posted by:
"SUYONO"
Sore Pa Susilo
Coba pake revisi ini.
Untuk range C3 isi dengan data paling bawah misal 5000, kalau lebih tinggal ganti aja.
Salam
Suyono
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Tuesday, October 28, 2014 2:30 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Sort Banyak Kriteria
Terima kasih atas bantuannya
Mungkin keterangan saya yang kurang lengkap. Data saya pada kolom D dan kolom E paling tidak ada 5000 data ke bawah, baris kosong sehingga tidak terihat masih ada data dibawahnya.
Rumus index small(if saya masih hanya mengumpulkan data saja, bukan mengurutkan berdasarkan rangking.
Terima kasih
Pada 24 Oktober 2014 17.21, ibnu susilo susilo.ib@gmail.com<mailto:susilo.ib@gmail.com> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>> menulis:
Selamat sore para suhu excel yang saya hormati
Mohon bantuannya untuk soal saya mengenai sort secara otomatis lagi
Saya tidak menemukan rumus yang cocok, mungkin saya terlewat dalam mencari arsip.
Mohon saya diberikan rumus sakti untuk memecahkan masalah saya berikut, tanpa macro, tanpa pivot.
Saya mempunyai raw data supplier dan Part Number.
Dari data kolom D dan kolom E, saya ingin mengurutkannya pada kolom G dan kolom H berdasarkan urutan rangking pada kolom B.
Sebenarnya raw data kolom D dan E serta kriteria pada kolom B sudah melalui rumus-rumus juga yang hasilnya seperti itu. Tinggal bagaimana menyederhanakannya menjadi seperti pada kolom G dan H.
Dengan tambahan : untuk supplier dengan status check akan muncul pada urutan paling bawah pada kolom G dan H.
Lebih jelasnya pada attachment berikut
Terima kasih atas bantuannya
Susilo
Coba pake revisi ini.
Untuk range C3 isi dengan data paling bawah misal 5000, kalau lebih tinggal ganti aja.
Salam
Suyono
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Tuesday, October 28, 2014 2:30 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Sort Banyak Kriteria
Terima kasih atas bantuannya
Mungkin keterangan saya yang kurang lengkap. Data saya pada kolom D dan kolom E paling tidak ada 5000 data ke bawah, baris kosong sehingga tidak terihat masih ada data dibawahnya.
Rumus index small(if saya masih hanya mengumpulkan data saja, bukan mengurutkan berdasarkan rangking.
Terima kasih
Pada 24 Oktober 2014 17.21, ibnu susilo susilo.ib@gmail.com<mailto:susilo.ib@gmail.com> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>> menulis:
Selamat sore para suhu excel yang saya hormati
Mohon bantuannya untuk soal saya mengenai sort secara otomatis lagi
Saya tidak menemukan rumus yang cocok, mungkin saya terlewat dalam mencari arsip.
Mohon saya diberikan rumus sakti untuk memecahkan masalah saya berikut, tanpa macro, tanpa pivot.
Saya mempunyai raw data supplier dan Part Number.
Dari data kolom D dan kolom E, saya ingin mengurutkannya pada kolom G dan kolom H berdasarkan urutan rangking pada kolom B.
Sebenarnya raw data kolom D dan E serta kriteria pada kolom B sudah melalui rumus-rumus juga yang hasilnya seperti itu. Tinggal bagaimana menyederhanakannya menjadi seperti pada kolom G dan H.
Dengan tambahan : untuk supplier dengan status check akan muncul pada urutan paling bawah pada kolom G dan H.
Lebih jelasnya pada attachment berikut
Terima kasih atas bantuannya
Susilo
Tue Oct 28, 2014 12:04 pm (PDT) . Posted by:
"Walsoyo"
Mohon maaf emailnya berantakan, saran dari Mr. Kid sudah saya coba tapi
tetep gak berhasil, kalau dicoba tersendiri dengan ukuran file yang kecil
kode tersebut bisa jalan dan berhasil ketika workbook dibuka dalam kondisi
macro di disabled maka file dapat tershared. namung jika saya pakai untuk
file yang ukurannya besar tidak berhasil. dari pengamatan saya proses
Saving berjalan terputus tidak sampai mentok. Ukuran file yang saya buat
3,5 byte. mohon pemecahanya bersama-sama!
Pada 28 Oktober 2014 16.51, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com> menulis:
>
>
> hehehe...
> kok bisa ya bentuk emailnya jadi susah dibaca.
>
> ya wislah coba baris tentang save as tidak usah menyertakan file
> formatnya. Misal :
> thisworkbook.saveas namafilenya, accessmode:=xlshared 'save jadi nama
> tertentu dalam namafilenya dengan mode ter-share
>
> thisworkbook bisa diubah menjadi activeworkbook jika memang sedang dalam
> keadaan aktif.
>
> Wassalam,
> Kid.
>
>
>
>
>
>
>
> 2014-10-26 15:02 GMT+11:00 Walsoyo soyomakmur@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Mohon bantuan bagaimana agar kode VBA saya bisa jalan saat keluar dari
>> workbook pada mode protect sharing workbook. permasalahan yang terjadi jika
>> setelah kode penyimpanan FilesaveAs... kemudian dilanjutkan dengan
>> Excel.Application.Quit. Workbook saya setelah dibuka kembali dalam kondisi
>> macro di disabled ternyata shared workbook tidak protect. tolong dilengkapi
>> kode saya agar shared workbook protect saat kondisi macro dinonaktifkan dan
>> unsharing workbook saat macro enabled Private Sub
>> Workbook_BeforeClose(Cancel As Boolean) Dim relatifPath As String Dim sh As
>> Worksheet Dim shtrans As Worksheet Application.EnableEvents = True
>> Application.ScreenUpdating = False Application.Calculation =
>> xlCalculationManual Application.IgnoreRemoteRequests = False
>> Application.EnableCancelKey = xlDisabled
>> ThisWorkbook.VBProject.VBE.MainWindow.Visible = False Application.OnKey
>> "%{F11}" If Not ActiveWorkbook.MultiUserEditing Then Set shtrans =
>> ThisWorkbook.Sheets("TRANSAKSI") shtrans.Activate shtrans.Visible = -1
>> shtrans.Select For Each sh In ThisWorkbook.Worksheets If sh.Name <>
>> "TRANSAKSI" Then sh.Visible = 2 End If Next sh Range("A1").Select
>> Application.DisplayAlerts = False ActiveWorkbook.KeepChangeHistory = False
>> ActiveWorkbook.ProtectSharing Sharingpassword:="pass"; relatifPath =
>> ThisWorkbook.Path & "\" & ActiveWorkbook.Name ActiveWorkbook.SaveAs
>> Filename:=relatifPath, FileFormat:= _ xlExcel12, AccessMode:=xlShared
>> Application.DisplayAlerts = True End if Excel.Application.Quit End Sub dan
>> pada saat workbook dibuka macro tidak jalan Private Sub Workbook_Open() 'If
>> ActiveWorkbook.MultiUserEditing Then Application.DisplayAlerts = False
>> Application.DisplayAlerts = False ActiveWorkbook.UnprotectSharing
>> Sharingpassword:="pass"; Application.DisplayAlerts = True
>> Application.DisplayAlerts = True 'End If End Sub
>>
>
>
>
tetep gak berhasil, kalau dicoba tersendiri dengan ukuran file yang kecil
kode tersebut bisa jalan dan berhasil ketika workbook dibuka dalam kondisi
macro di disabled maka file dapat tershared. namung jika saya pakai untuk
file yang ukurannya besar tidak berhasil. dari pengamatan saya proses
Saving berjalan terputus tidak sampai mentok. Ukuran file yang saya buat
3,5 byte. mohon pemecahanya bersama-sama!
Pada 28 Oktober 2014 16.51, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com> menulis:
>
>
> hehehe...
> kok bisa ya bentuk emailnya jadi susah dibaca.
>
> ya wislah coba baris tentang save as tidak usah menyertakan file
> formatnya. Misal :
> thisworkbook.saveas namafilenya, accessmode:=xlshared 'save jadi nama
> tertentu dalam namafilenya dengan mode ter-share
>
> thisworkbook bisa diubah menjadi activeworkbook jika memang sedang dalam
> keadaan aktif.
>
> Wassalam,
> Kid.
>
>
>
>
>
>
>
> 2014-10-26 15:02 GMT+11:00 Walsoyo soyomakmur@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Mohon bantuan bagaimana agar kode VBA saya bisa jalan saat keluar dari
>> workbook pada mode protect sharing workbook. permasalahan yang terjadi jika
>> setelah kode penyimpanan FilesaveAs..
>> Excel.Application.
>> macro di disabled ternyata shared workbook tidak protect. tolong dilengkapi
>> kode saya agar shared workbook protect saat kondisi macro dinonaktifkan dan
>> unsharing workbook saat macro enabled Private Sub
>> Workbook_BeforeClos
>> Worksheet Dim shtrans As Worksheet Application.
>> Application.
>> xlCalculationManual Application.
>> Application.
>> ThisWorkbook.
>> "%{F11}
>> ThisWorkbook.
>> shtrans.Select For Each sh In ThisWorkbook.
>> "TRANSAKSI&quo
>> Application.
>> ActiveWorkbook.
>> ThisWorkbook.
>> Filename:=relatifPa
>> Application.
>> pada saat workbook dibuka macro tidak jalan Private Sub Workbook_Open(
>> ActiveWorkbook.
>> Application.
>> Sharingpassword:
>> Application.
>>
>
>
>
Tue Oct 28, 2014 12:11 pm (PDT) . Posted by:
"Walsoyo"
Ini Kode nya sudah saya rapikan!
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim relatifPath As String
Dim sh As Worksheet
Dim shtrans As Worksheet
Application.EnableEvents = True
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Application.IgnoreRemoteRequests = False
Application.EnableCancelKey = xlDisabled
ThisWorkbook.VBProject.VBE.MainWindow.Visible = False
Application.OnKey "%{F11}"
If Not ActiveWorkbook.MultiUserEditing Then
Set shtrans = ThisWorkbook.Sheets("TRANSAKSI")
shtrans.Activate
shtrans.Visible = -1
shtrans.Select
For Each sh In ThisWorkbook.Worksheets
If sh.Name <> "TRANSAKSI" Then
sh.Visible = 2
End If
Next sh
Range("A1").Select
Application.DisplayAlerts = False
ActiveWorkbook.KeepChangeHistory = False
ActiveWorkbook.ProtectSharing Sharingpassword:="pass"
relatifPath = ThisWorkbook.Path & "\" & ActiveWorkbook.Name
ActiveWorkbook.SaveAs Filename:=relatifPath, FileFormat:= _ xlExcel12,
AccessMode:=xlShared
Application.DisplayAlerts = True
End if
Excel.Application.Quit
End Sub
Pada 29 Oktober 2014 00.00, Walsoyo <soyomakmur@gmail.com> menulis:
> Mohon maaf emailnya berantakan, saran dari Mr. Kid sudah saya coba tapi
> tetep gak berhasil, kalau dicoba tersendiri dengan ukuran file yang kecil
> kode tersebut bisa jalan dan berhasil ketika workbook dibuka dalam kondisi
> macro di disabled maka file dapat tershared. namung jika saya pakai untuk
> file yang ukurannya besar tidak berhasil. dari pengamatan saya proses
> Saving berjalan terputus tidak sampai mentok. Ukuran file yang saya buat
> 3,5 byte. mohon pemecahanya bersama-sama!
>
> Pada 28 Oktober 2014 16.51, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com> menulis:
>
>
>>
>> hehehe...
>> kok bisa ya bentuk emailnya jadi susah dibaca.
>>
>> ya wislah coba baris tentang save as tidak usah menyertakan file
>> formatnya. Misal :
>> thisworkbook.saveas namafilenya, accessmode:=xlshared 'save jadi nama
>> tertentu dalam namafilenya dengan mode ter-share
>>
>> thisworkbook bisa diubah menjadi activeworkbook jika memang sedang dalam
>> keadaan aktif.
>>
>> Wassalam,
>> Kid.
>>
>>
>>
>>
>>
>>
>>
>> 2014-10-26 15:02 GMT+11:00 Walsoyo soyomakmur@gmail.com [belajar-excel] <
>> belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Mohon bantuan bagaimana agar kode VBA saya bisa jalan saat keluar dari
>>> workbook pada mode protect sharing workbook. permasalahan yang terjadi jika
>>> setelah kode penyimpanan FilesaveAs... kemudian dilanjutkan dengan
>>> Excel.Application.Quit. Workbook saya setelah dibuka kembali dalam kondisi
>>> macro di disabled ternyata shared workbook tidak protect. tolong dilengkapi
>>> kode saya agar shared workbook protect saat kondisi macro dinonaktifkan dan
>>> unsharing workbook saat macro enabled Private Sub
>>> Workbook_BeforeClose(Cancel As Boolean) Dim relatifPath As String Dim sh As
>>> Worksheet Dim shtrans As Worksheet Application.EnableEvents = True
>>> Application.ScreenUpdating = False Application.Calculation =
>>> xlCalculationManual Application.IgnoreRemoteRequests = False
>>> Application.EnableCancelKey = xlDisabled
>>> ThisWorkbook.VBProject.VBE.MainWindow.Visible = False Application.OnKey
>>> "%{F11}" If Not ActiveWorkbook.MultiUserEditing Then Set shtrans =
>>> ThisWorkbook.Sheets("TRANSAKSI") shtrans.Activate shtrans.Visible = -1
>>> shtrans.Select For Each sh In ThisWorkbook.Worksheets If sh.Name <>
>>> "TRANSAKSI" Then sh.Visible = 2 End If Next sh Range("A1").Select
>>> Application.DisplayAlerts = False ActiveWorkbook.KeepChangeHistory = False
>>> ActiveWorkbook.ProtectSharing Sharingpassword:="pass"; relatifPath =
>>> ThisWorkbook.Path & "\" & ActiveWorkbook.Name ActiveWorkbook.SaveAs
>>> Filename:=relatifPath, FileFormat:= _ xlExcel12, AccessMode:=xlShared
>>> Application.DisplayAlerts = True End if Excel.Application.Quit End Sub dan
>>> pada saat workbook dibuka macro tidak jalan Private Sub Workbook_Open() 'If
>>> ActiveWorkbook.MultiUserEditing Then Application.DisplayAlerts = False
>>> Application.DisplayAlerts = False ActiveWorkbook.UnprotectSharing
>>> Sharingpassword:="pass"; Application.DisplayAlerts = True
>>> Application.DisplayAlerts = True 'End If End Sub
>>>
>>
>>
>>
>
>
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim relatifPath As String
Dim sh As Worksheet
Dim shtrans As Worksheet
Application.EnableEvents = True
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Application.IgnoreRemoteRequests = False
Application.EnableCancelKey = xlDisabled
ThisWorkbook.VBProject.VBE.MainWindow.Visible = False
Application.OnKey "%{F11}"
If Not ActiveWorkbook.MultiUserEditing Then
Set shtrans = ThisWorkbook.Sheets("TRANSAKSI")
shtrans.Activate
shtrans.Visible = -1
shtrans.Select
For Each sh In ThisWorkbook.Worksheets
If sh.Name <> "TRANSAKSI" Then
sh.Visible = 2
End If
Next sh
Range("A1").Select
Application.DisplayAlerts = False
ActiveWorkbook.KeepChangeHistory = False
ActiveWorkbook.ProtectSharing Sharingpassword:="pass"
relatifPath = ThisWorkbook.Path & "\" & ActiveWorkbook.Name
ActiveWorkbook.SaveAs Filename:=relatifPath, FileFormat:= _ xlExcel12,
AccessMode:=xlShared
Application.DisplayAlerts = True
End if
Excel.Application.Quit
End Sub
Pada 29 Oktober 2014 00.00, Walsoyo <soyomakmur@gmail.com> menulis:
> Mohon maaf emailnya berantakan, saran dari Mr. Kid sudah saya coba tapi
> tetep gak berhasil, kalau dicoba tersendiri dengan ukuran file yang kecil
> kode tersebut bisa jalan dan berhasil ketika workbook dibuka dalam kondisi
> macro di disabled maka file dapat tershared. namung jika saya pakai untuk
> file yang ukurannya besar tidak berhasil. dari pengamatan saya proses
> Saving berjalan terputus tidak sampai mentok. Ukuran file yang saya buat
> 3,5 byte. mohon pemecahanya bersama-sama!
>
> Pada 28 Oktober 2014 16.51, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com> menulis:
>
>
>>
>> hehehe...
>> kok bisa ya bentuk emailnya jadi susah dibaca.
>>
>> ya wislah coba baris tentang save as tidak usah menyertakan file
>> formatnya. Misal :
>> thisworkbook.saveas namafilenya, accessmode:=xlshared 'save jadi nama
>> tertentu dalam namafilenya dengan mode ter-share
>>
>> thisworkbook bisa diubah menjadi activeworkbook jika memang sedang dalam
>> keadaan aktif.
>>
>> Wassalam,
>> Kid.
>>
>>
>>
>>
>>
>>
>>
>> 2014-10-26 15:02 GMT+11:00 Walsoyo soyomakmur@gmail.com [belajar-excel] <
>> belajar-excel@yahoogroups.com>:
>>
>>>
>>>
>>> Mohon bantuan bagaimana agar kode VBA saya bisa jalan saat keluar dari
>>> workbook pada mode protect sharing workbook. permasalahan yang terjadi jika
>>> setelah kode penyimpanan FilesaveAs..
>>> Excel.Application.
>>> macro di disabled ternyata shared workbook tidak protect. tolong dilengkapi
>>> kode saya agar shared workbook protect saat kondisi macro dinonaktifkan dan
>>> unsharing workbook saat macro enabled Private Sub
>>> Workbook_BeforeClos
>>> Worksheet Dim shtrans As Worksheet Application.
>>> Application.
>>> xlCalculationManual Application.
>>> Application.
>>> ThisWorkbook.
>>> "%{F11}
>>> ThisWorkbook.
>>> shtrans.Select For Each sh In ThisWorkbook.
>>> "TRANSAKSI&quo
>>> Application.
>>> ActiveWorkbook.
>>> ThisWorkbook.
>>> Filename:=relatifPa
>>> Application.
>>> pada saat workbook dibuka macro tidak jalan Private Sub Workbook_Open(
>>> ActiveWorkbook.
>>> Application.
>>> Sharingpassword:
>>> Application.
>>>
>>
>>
>>
>
>
Tue Oct 28, 2014 7:07 pm (PDT) . Posted by:
"Husnul Faizin" husnulfaizin
trimakasih mr. kid atas infox..
wassalam.
Pada Kamis, 23 Oktober 2014 12:59, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Hai Faizin,
1. Jika file yang diberi password, berarti menjadi urusan si OS dan bukan urusan Excel. Biasanya sulit untuk dilewati kecuali dengan aplikasi pembobol password yang canggih yang biasanya dipakai juga untuk membobol berbagai jenis file.
Untuk buka file terpassword dengan script :
workbooks.open "d:\folder\subnya\filenya.ekstensinya",password:="passwordnya ditulis disini"
2. Jika workbook sudah terbuka (artinya file tidak diprotek atau proteksi file sudah dilewati alias si nomor 1 di atas sudah lewat), maka bisa dibuka dengan script :
thisworkbook.unprotect "password unprotect workbook"
atau
workbooks("nama workbook").unprotect "password unprotect workbook"
3. Jika worksheet yang akan di-unprotect, bisa dengan script :
sheets("nama sheetnya").unprotect "password unprotect worksheet"
4. Jika VBA Project yang dipassword, maka tanyakan saja passwordnya kepada pembuatnya. Jika ingin cara ilegal, silakan search di internet caranya. Nomor 2 dan 3 juga bisa ditemukan di-internet.
Milis tidak bisa banyak membantu dalam hal membongkar password karena bisa dianggap mendukung piracy. Jadi milis hanya bisa mengabarkan bahwa dengan search di internet akan ditemukan cara untuk nomor 2,3,4. Keputusan, resiko, dan manfaatnya bukanlah tanggung jawab milis.
;)
Wassalam,
Kid.
2014-10-22 8:24 GMT+11:00 Husnul Faizin husnulfaizin@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>ya, membuka workbook atau sheet di excel yang terproteksi. filex memang bukan milik saya, tapi niat saya membuka protectnya agar bisa mempelajari formula2 yang ada di dalamnya. mohon kiranya bisa memahami maksud saya.
>
>
>terimakasih sebelumnya.
>
>
>
>Pada Selasa, 21 Oktober 2014 4:40, "Nang Agus nangagus@gmail.com [belajar-excel]" menulis:
>
>
>
>
>Dear Husnul Faizin,
>
>Apakah maksudnya "membuka workbook atau sheet di excel yang terproteksi" ? file tersebut dibuat sendiri atau dibuat orang lain?
>
>pesan Mas Kid di https://groups.yahoo.com/neo/groups/belajar-excel/conversations/topics/31889
>"Membuka file excel yang diatur dengan vba itu mudah, tetapi etika dalam
menggunakannya jauh lebih penting dari urgensi pemanfaatan file
tersebut."
>
>Wasalam
>
>
>
>2014-10-21 5:50 GMT+07:00 Husnul Faizin husnulfaizin@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>>
>>yth. kepada suhu semua (mr. kid, mr. nang bagus, mr. hendrik, miss jan)
>>
>> dan para suhu yang tidak dapat disebut namanya semua (mohon ma'af).
>>
>>
>>saya minta tolong kepada suhu semuanya file macro ato VBA yang dapat digunakan untuk perintah membuka workbook atau sheet di excel yang terproteksi.
>>
>>
>>demikian atas kebaikan hatinya, terimakasih.
>>faiz
>>
>
>
>
wassalam.
Pada Kamis, 23 Oktober 2014 12:59, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Hai Faizin,
1. Jika file yang diberi password, berarti menjadi urusan si OS dan bukan urusan Excel. Biasanya sulit untuk dilewati kecuali dengan aplikasi pembobol password yang canggih yang biasanya dipakai juga untuk membobol berbagai jenis file.
Untuk buka file terpassword dengan script :
workbooks.open "d:\folder\subnya\filenya.ekstensinya",password:="passwordnya ditulis disini"
2. Jika workbook sudah terbuka (artinya file tidak diprotek atau proteksi file sudah dilewati alias si nomor 1 di atas sudah lewat), maka bisa dibuka dengan script :
thisworkbook.unprotect "password unprotect workbook"
atau
workbooks("nama workbook").unprotect "password unprotect workbook"
3. Jika worksheet yang akan di-unprotect, bisa dengan script :
sheets("nama sheetnya").unprotect "password unprotect worksheet"
4. Jika VBA Project yang dipassword, maka tanyakan saja passwordnya kepada pembuatnya. Jika ingin cara ilegal, silakan search di internet caranya. Nomor 2 dan 3 juga bisa ditemukan di-internet.
Milis tidak bisa banyak membantu dalam hal membongkar password karena bisa dianggap mendukung piracy. Jadi milis hanya bisa mengabarkan bahwa dengan search di internet akan ditemukan cara untuk nomor 2,3,4. Keputusan, resiko, dan manfaatnya bukanlah tanggung jawab milis.
;)
Wassalam,
Kid.
2014-10-22 8:24 GMT+11:00 Husnul Faizin husnulfaizin@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>ya, membuka workbook atau sheet di excel yang terproteksi. filex memang bukan milik saya, tapi niat saya membuka protectnya agar bisa mempelajari formula2 yang ada di dalamnya. mohon kiranya bisa memahami maksud saya.
>
>
>terimakasih sebelumnya.
>
>
>
>Pada Selasa, 21 Oktober 2014 4:40, "Nang Agus nangagus@gmail.com [belajar-excel]" menulis:
>
>
>
>
>Dear Husnul Faizin,
>
>Apakah maksudnya "membuka workbook atau sheet di excel yang terproteksi" ? file tersebut dibuat sendiri atau dibuat orang lain?
>
>pesan Mas Kid di https://groups.yahoo.com/neo/groups/belajar-excel/conversations/topics/31889
>"Membuka file excel yang diatur dengan vba itu mudah, tetapi etika dalam
menggunakannya jauh lebih penting dari urgensi pemanfaatan file
tersebut."
>
>Wasalam
>
>
>
>2014-10-21 5:50 GMT+07:00 Husnul Faizin husnulfaizin@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>>
>>yth. kepada suhu semua (mr. kid, mr. nang bagus, mr. hendrik, miss jan)
>>
>> dan para suhu yang tidak dapat disebut namanya semua (mohon ma'af).
>>
>>
>>saya minta tolong kepada suhu semuanya file macro ato VBA yang dapat digunakan untuk perintah membuka workbook atau sheet di excel yang terproteksi.
>>
>>
>>demikian atas kebaikan hatinya, terimakasih.
>>faiz
>>
>
>
>
Tue Oct 28, 2014 7:07 pm (PDT) . Posted by:
"Husnul Faizin" husnulfaizin
assalamu'alaikum wr wb
yth. para master di milis yang sangat bermanfaat ini, saya mohon perkenan bantuannya cara membuat option button dengan kriteria nilai yang merujuk pada cell yang berbeda-beda. untuk lebih jelasnya permasalahan tersebut saya cantumkan dalam lampirannya.
terimakasih sebelumnya atas bantuan dan perkenan para master excel yang terhormat.
wassalam
faiz
yth. para master di milis yang sangat bermanfaat ini, saya mohon perkenan bantuannya cara membuat option button dengan kriteria nilai yang merujuk pada cell yang berbeda-beda. untuk lebih jelasnya permasalahan tersebut saya cantumkan dalam lampirannya.
terimakasih sebelumnya atas bantuan dan perkenan para master excel yang terhormat.
wassalam
faiz
Tue Oct 28, 2014 7:08 pm (PDT) . Posted by:
"depi Hariyanto" depi.hari_yanto
dear mr bagus,
saya sudah coba tapi tidak bisa.
tks.
Pada Selasa, 28 Oktober 2014 15:46, "'Bagus' bagus@kingjim.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Pak Depi;
Coba begini, Array formula ya:
=IFERROR(INDEX(C$6:C$12,SMALL(IF($E$6:$E$12<>$Q$6,ROW($C$6:$C$12)-ROW($C$5)),ROW(1:1))),"")
Akhiri dengan menekan tiga tombol
(Ctrl+Shift+Enter)
Copas kekanan dan kebawah
Wassalam
~
Bagus ~
----- Original Message -----
>From: depi Hariyanto depi.hari_yanto@yahoo.co.id [belajar-excel]
>To: belajar-excel@yahoogroups.com
>Sent: Tuesday, October 28, 2014 2:03 PM
>Subject: [belajar-excel] Data Terpisah [1 Attachment]
>
>
>Kepada Master Excel,
>
>
>Mohon bantuannya untuk data terlampir,
>
>
>atas bantuannya saya ucapkan banyak terima kasih.
>
>
>salam
>Dep_Har
>
saya sudah coba tapi tidak bisa.
tks.
Pada Selasa, 28 Oktober 2014 15:46, "'Bagus' bagus@kingjim.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Pak Depi;
Coba begini, Array formula ya:
=IFERROR(INDEX(C$6:C$12,SMALL(IF($E$6:$E$12<>$Q$6,ROW($C$6:$C$12)-ROW($C$5)),ROW(1:1))),"")
Akhiri dengan menekan tiga tombol
(Ctrl+Shift+Enter)
Copas kekanan dan kebawah
Wassalam
~
Bagus ~
----- Original Message -----
>From: depi Hariyanto depi.hari_yanto@yahoo.co.id [belajar-excel]
>To: belajar-excel@yahoogroups.com
>Sent: Tuesday, October 28, 2014 2:03 PM
>Subject: [belajar-excel] Data Terpisah [1 Attachment]
>
>
>Kepada Master Excel,
>
>
>Mohon bantuannya untuk data terlampir,
>
>
>atas bantuannya saya ucapkan banyak terima kasih.
>
>
>salam
>Dep_Har
>
Tue Oct 28, 2014 7:15 pm (PDT) . Posted by:
"Bagus" bagus4bls
Pak Depi;
Sila lihat file terlampir..
Wassalam
~ Bagus ~
----- Original Message -----
From: depi Hariyanto depi.hari_yanto@yahoo.co.id [belajar-excel]
To: belajar-excel@yahoogroups.com
Sent: Wednesday, October 29, 2014 6:57 AM
Subject: Bls: [belajar-excel] Data Terpisah
dear mr bagus,
saya sudah coba tapi tidak bisa.
tks.
Pada Selasa, 28 Oktober 2014 15:46, "'Bagus' bagus@kingjim.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Pak Depi;
Coba begini, Array formula ya:
=IFERROR(INDEX(C$6:C$12,SMALL(IF($E$6:$E$12<>$Q$6,ROW($C$6:$C$12)-ROW($C$5)),ROW(1:1))),"")
Akhiri dengan menekan tiga tombol (Ctrl+Shift+Enter)
Copas kekanan dan kebawah
Wassalam
~ Bagus ~
----- Original Message -----
From: depi Hariyanto depi.hari_yanto@yahoo.co.id [belajar-excel]
To: belajar-excel@yahoogroups.com
Sent: Tuesday, October 28, 2014 2:03 PM
Subject: [belajar-excel] Data Terpisah [1 Attachment]
Kepada Master Excel,
Mohon bantuannya untuk data terlampir,
atas bantuannya saya ucapkan banyak terima kasih.
salam
Dep_Har
Sila lihat file terlampir..
Wassalam
~ Bagus ~
----- Original Message -----
From: depi Hariyanto depi.hari_yanto@yahoo.co.id [belajar-excel]
To: belajar-excel@yahoogroups.com
Sent: Wednesday, October 29, 2014 6:57 AM
Subject: Bls: [belajar-excel] Data Terpisah
dear mr bagus,
saya sudah coba tapi tidak bisa.
tks.
Pada Selasa, 28 Oktober 2014 15:46, "'Bagus' bagus@kingjim.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Pak Depi;
Coba begini, Array formula ya:
=IFERROR(INDEX(C$6:C$12,SMALL(IF($E$6:$E$12<>$Q$6,ROW($C$6:$C$12)-ROW($C$5)),ROW(1:1))),"")
Akhiri dengan menekan tiga tombol (Ctrl+Shift+Enter)
Copas kekanan dan kebawah
Wassalam
~ Bagus ~
----- Original Message -----
From: depi Hariyanto depi.hari_yanto@yahoo.co.id [belajar-excel]
To: belajar-excel@yahoogroups.com
Sent: Tuesday, October 28, 2014 2:03 PM
Subject: [belajar-excel] Data Terpisah [1 Attachment]
Kepada Master Excel,
Mohon bantuannya untuk data terlampir,
atas bantuannya saya ucapkan banyak terima kasih.
salam
Dep_Har
Tue Oct 28, 2014 10:00 pm (PDT) . Posted by:
"AKBAR Latif"
Dear All,
Mohon saran dan batuannya atas masalah saya nih,, Terima kasih,
Bams. T
Pada Selasa, 28 Oktober 2014 15:56, "AKBAR Latif bams_99999@yahoo.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Dear Pak Nang Agus,
Mohon maaf saya salah tik, maksudnya sesuai formula yg saya krim yaitu jika C di isi dan F kosong maka hasilnya in supplier dan untuk jika C di isi dan F di isi hasilnya retur pak,
mohon saran bantu, sepertinya formula sy tdk nyambung karena untuk retur prod reject dan Relokasi in tidak muncul pak.
Di tunggu ya pak bantuannya.. Terima kasih,
Bams. T
Pada Selasa, 28 Oktober 2014 15:35, "Nang Agus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Mohon maaf Pak Bam, Saya bingung dengan pernyatan yang berwarna merah?
jika C dan F di isi makahasilnya in supplier, jika C dan E di isi maka hasilnya Relokasi in,jika D di isi dan F tdak di isi maka hasilnya Produksi, jika C dan F di isi makahasilnya Retur, jika D dan G di isi hasilnya retur prod reject.
2014-10-28 9:37 GMT+07:00 AKBAR Latif bams_99999@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:
|
|
Dear semua master dan Be excell,
Selamat pagi semuanya, apabila tidak merepotkan mohon bantuannya dengan permasalahan ini. sudah rada mentok nih buat perbaiki formula If nya.karena 2 point belum muncul yaitu relokasi in dan retur prod reject di formula yang saya buat yaitu :mohon saran formula ini apanya yang harus di ganti atau ada cara lain kah selain formula If ?
=IF(AND(C12<>"",F12=""),"IN SUPPLIER",IF(AND(C12="",E12<>""),"RELOKASI IN",IF(AND(C12<>"",F12<>""),"RETUR SUPPLIER",IF(AND(D12<>"",F12=""),"PRODUKSI",IF(D12<>"","RETUR PROD GOOD",IF(AND(D12<>"",G12<>""),"RETUR PROD REJECT",IF(AND(C12="",D12=""),0)))))))
kondisi tabel dan hasil formula yang di inginkan ;
jika C dan F di isi maka hasilnya in supplier, jika C dan E di isi maka hasilnya Relokasi in, jika D di isi dan F tdak di isi maka hasilnya Produksi, jika C dan F di isi maka hasilnya Retur, jika D dan G di isi hasilnya retur prod reject.
Terima kasih,
Bams. T
#yiv4773771658 #yiv4773771658 -- #yiv4773771658ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv4773771658 #yiv4773771658ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv4773771658 #yiv4773771658ygrp-mkp #yiv4773771658hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv4773771658 #yiv4773771658ygrp-mkp #yiv4773771658ads {margin-bottom:10px;}#yiv4773771658 #yiv4773771658ygrp-mkp .yiv4773771658ad {padding:0 0;}#yiv4773771658 #yiv4773771658ygrp-mkp .yiv4773771658ad p {margin:0;}#yiv4773771658 #yiv4773771658ygrp-mkp .yiv4773771658ad a {color:#0000ff;text-decoration:none;}#yiv4773771658 #yiv4773771658ygrp-sponsor #yiv4773771658ygrp-lc {font-family:Arial;}#yiv4773771658 #yiv4773771658ygrp-sponsor #yiv4773771658ygrp-lc #yiv4773771658hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv4773771658 #yiv4773771658ygrp-sponsor #yiv4773771658ygrp-lc .yiv4773771658ad {margin-bottom:10px;padding:0 0;}#yiv4773771658 #yiv4773771658actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv4773771658 #yiv4773771658activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv4773771658 #yiv4773771658activity span {font-weight:700;}#yiv4773771658 #yiv4773771658activity span:first-child {text-transform:uppercase;}#yiv4773771658 #yiv4773771658activity span a {color:#5085b6;text-decoration:none;}#yiv4773771658 #yiv4773771658activity span span {color:#ff7900;}#yiv4773771658 #yiv4773771658activity span .yiv4773771658underline {text-decoration:underline;}#yiv4773771658 .yiv4773771658attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv4773771658 .yiv4773771658attach div a {text-decoration:none;}#yiv4773771658 .yiv4773771658attach img {border:none;padding-right:5px;}#yiv4773771658 .yiv4773771658attach label {display:block;margin-bottom:5px;}#yiv4773771658 .yiv4773771658attach label a {text-decoration:none;}#yiv4773771658 blockquote {margin:0 0 0 4px;}#yiv4773771658 .yiv4773771658bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv4773771658 .yiv4773771658bold a {text-decoration:none;}#yiv4773771658 dd.yiv4773771658last p a {font-family:Verdana;font-weight:700;}#yiv4773771658 dd.yiv4773771658last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv4773771658 dd.yiv4773771658last p span.yiv4773771658yshortcuts {margin-right:0;}#yiv4773771658 div.yiv4773771658attach-table div div a {text-decoration:none;}#yiv4773771658 div.yiv4773771658attach-table {width:400px;}#yiv4773771658 div.yiv4773771658file-title a, #yiv4773771658 div.yiv4773771658file-title a:active, #yiv4773771658 div.yiv4773771658file-title a:hover, #yiv4773771658 div.yiv4773771658file-title a:visited {text-decoration:none;}#yiv4773771658 div.yiv4773771658photo-title a, #yiv4773771658 div.yiv4773771658photo-title a:active, #yiv4773771658 div.yiv4773771658photo-title a:hover, #yiv4773771658 div.yiv4773771658photo-title a:visited {text-decoration:none;}#yiv4773771658 div#yiv4773771658ygrp-mlmsg #yiv4773771658ygrp-msg p a span.yiv4773771658yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv4773771658 .yiv4773771658green {color:#628c2a;}#yiv4773771658 .yiv4773771658MsoNormal {margin:0 0 0 0;}#yiv4773771658 o {font-size:0;}#yiv4773771658 #yiv4773771658photos div {float:left;width:72px;}#yiv4773771658 #yiv4773771658photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv4773771658 #yiv4773771658photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv4773771658 #yiv4773771658reco-category {font-size:77%;}#yiv4773771658 #yiv4773771658reco-desc {font-size:77%;}#yiv4773771658 .yiv4773771658replbq {margin:4px;}#yiv4773771658 #yiv4773771658ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv4773771658 #yiv4773771658ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv4773771658 #yiv4773771658ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv4773771658 #yiv4773771658ygrp-mlmsg select, #yiv4773771658 input, #yiv4773771658 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv4773771658 #yiv4773771658ygrp-mlmsg pre, #yiv4773771658 code {font:115% monospace;}#yiv4773771658 #yiv4773771658ygrp-mlmsg * {line-height:1.22em;}#yiv4773771658 #yiv4773771658ygrp-mlmsg #yiv4773771658logo {padding-bottom:10px;}#yiv4773771658 #yiv4773771658ygrp-msg p a {font-family:Verdana;}#yiv4773771658 #yiv4773771658ygrp-msg p#yiv4773771658attach-count span {color:#1E66AE;font-weight:700;}#yiv4773771658 #yiv4773771658ygrp-reco #yiv4773771658reco-head {color:#ff7900;font-weight:700;}#yiv4773771658 #yiv4773771658ygrp-reco {margin-bottom:20px;padding:0px;}#yiv4773771658 #yiv4773771658ygrp-sponsor #yiv4773771658ov li a {font-size:130%;text-decoration:none;}#yiv4773771658 #yiv4773771658ygrp-sponsor #yiv4773771658ov li {font-size:77%;list-style-type:square;
Mohon saran dan batuannya atas masalah saya nih,, Terima kasih,
Bams. T
Pada Selasa, 28 Oktober 2014 15:56, "AKBAR Latif bams_99999@yahoo.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Dear Pak Nang Agus,
Mohon maaf saya salah tik, maksudnya sesuai formula yg saya krim yaitu jika C di isi dan F kosong maka hasilnya in supplier dan untuk jika C di isi dan F di isi hasilnya retur pak,
mohon saran bantu, sepertinya formula sy tdk nyambung karena untuk retur prod reject dan Relokasi in tidak muncul pak.
Di tunggu ya pak bantuannya.. Terima kasih,
Bams. T
Pada Selasa, 28 Oktober 2014 15:35, "Nang Agus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Mohon maaf Pak Bam, Saya bingung dengan pernyatan yang berwarna merah?
jika C dan F di isi makahasilnya in supplier, jika C dan E di isi maka hasilnya Relokasi in,jika D di isi dan F tdak di isi maka hasilnya Produksi, jika C dan F di isi makahasilnya Retur, jika D dan G di isi hasilnya retur prod reject.
2014-10-28 9:37 GMT+07:00 AKBAR Latif bams_99999@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:
|
|
Dear semua master dan Be excell,
Selamat pagi semuanya, apabila tidak merepotkan mohon bantuannya dengan permasalahan ini. sudah rada mentok nih buat perbaiki formula If nya.karena 2 point belum muncul yaitu relokasi in dan retur prod reject di formula yang saya buat yaitu :mohon saran formula ini apanya yang harus di ganti atau ada cara lain kah selain formula If ?
=IF(AND(C12<
kondisi tabel dan hasil formula yang di inginkan ;
jika C dan F di isi maka hasilnya in supplier, jika C dan E di isi maka hasilnya Relokasi in, jika D di isi dan F tdak di isi maka hasilnya Produksi, jika C dan F di isi maka hasilnya Retur, jika D dan G di isi hasilnya retur prod reject.
Terima kasih,
Bams. T
#yiv4773771658 #yiv4773771658 -- #yiv4773771658ygrp-