11 Messages
Digest #4335
2c
Re: Fwd: MOHON BANTUAN RUMUS MENAMPILKAN DATA DUPLIKAT SECARA OTOMAT by "Mr. Kid" nmkid.family@ymail.com
Messages
Mon Oct 23, 2017 10:14 pm (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Oh begitu...
Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan
di hasil akhir saat mau print saja ?
Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa to
?
Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis
laporan yang akan di-print saja.
On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai
> agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel
> pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat
> ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah
> nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah
> dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul
> adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul
> diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak
> itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan
> pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks
> sebelumnya
>
>
> Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Deskripsi juga diperiksa sudah masuk atau belum?
>
> Sent from my smart enough phone
>
> On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika
> langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang
> input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing
> masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
>
>
> Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Hai Susilo,
>
> Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk
> setiap siswa ?
> Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa
> oleh supervisornya ?
> Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per
> siswa ?
>
> Regards,
> Kid
>
>
>
>
>
>
> On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> [image: Jadikan gambar sebaris]
> Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
>
> Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
>
> On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak
> ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan
> scrip UDF ke VBA yang ada di seet saya tks
>
>
> Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups. com>
> <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Dear Susilo,
> COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih
> dari 250KB.
> Salam
> On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah
> kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi
> kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa
> berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya
> untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip
> deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya
> nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D
> perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para
> master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai
> di semua sheet terima kasih.
> Wassalamualikum
>
>
>
>
>
>
>
>
> <image.png>
>
>
>
>
>
Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan
di hasil akhir saat mau print saja ?
Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa to
?
Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis
laporan yang akan di-print saja.
On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai
> agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel
> pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat
> ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah
> nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah
> dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul
> adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul
> diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak
> itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan
> pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks
> sebelumnya
>
>
> Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Deskripsi juga diperiksa sudah masuk atau belum?
>
> Sent from my smart enough phone
>
> On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika
> langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang
> input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing
> masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
>
>
> Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Hai Susilo,
>
> Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk
> setiap siswa ?
> Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa
> oleh supervisornya ?
> Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per
> siswa ?
>
> Regards,
> Kid
>
>
>
>
>
>
> On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> [image: Jadikan gambar sebaris]
> Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
>
> Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
>
> On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak
> ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan
> scrip UDF ke VBA yang ada di seet saya tks
>
>
> Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups. com>
> <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Dear Susilo,
> COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih
> dari 250KB.
> Salam
> On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah
> kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi
> kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa
> berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya
> untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip
> deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya
> nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D
> perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para
> master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai
> di semua sheet terima kasih.
> Wassalamualikum
>
>
>
>
>
>
>
>
> <image.png>
>
>
>
>
>
Mon Oct 23, 2017 11:04 pm (PDT) . Posted by:
"Susilo Pratama" pratama_susilo
1. iya pak , nanti hasil deskripsi tinggal di link ke rapot2. kalau no dan nama masuknya ananda , nama,baru nilai3. iya pak,saya pengin scrip deskripsi ini bisa di pakai d semua sheet jika saya copykan scrip udf deskripsi ini ke sheet lain apakah saya cukup merubah nama sheet misal di contohkan nama sheet 1, jika saya copy di sheet saya yg misal sheet 35 saya cukup rubah itu saja atau ada coding lain yg di ganti tks? maaf banyak tanya heee
Function DeskripsiNile(Nama As String, N1 As Integer, N2 As Integer, N3 As Integer, Optional N4 As Integer, Optional N5 As Integer, Optional n6 As Integer, Optional N7 As Integer, Optional N8 As Integer, Optional N9 As Integer, Optional N10 As Integer, Optional N11 As Integer, Optional N12 As Integer) As String 'deskripsi nilai pengetahuanDim nil(12) ' nilaiDim ko(12) ' kodeDim kd(12) 'nama aspekDim j(12)Dim mi As IntegerDim ma As IntegerDim maa As DoubleDim mii As DoubleDim o As IntegerDim jen As StringDim has As StringDim rg As StringDim ba As IntegerDim en As Integernil(1) = N1nil(2) = N2nil(3) = N3nil(4) = N4nil(5) = N5nil(6) = n6nil(7) = N7nil(8) = N8nil(9) = N9nil(10) = N10nil(11) = N11nil(12) = N12
For o = 1 To 12If nil(o) > 0 Then en = oNext o For o = 1 To en kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", " Next ojen = "" If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Functionhas = "Ananda " & Nama & " baik dalam KD " maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12) mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12) For o = 1 To en ko(o) = 0 If nil(o) = maa Then ma = o If nil(o) = mii Then mi = o Next o'MsgBox mi
jen = has & kd(ma)
jen = jen & " perlu pendampingan dalam KD " & kd(mi)DeskripsiNile = jenEnd Function
Function DeskripsiNilai(Nama As String, N1 As Double, N2 As Double, N3 As Double, Optional N4 As Double, Optional N5 As Double, Optional n6 As Double) As String 'deskripsi nilai pengetahuanDim nil(6) ' nilaiDim ko(6) ' kodeDim kd(6) 'nama aspekDim j(6)Dim mi As IntegerDim ma As IntegerDim maa As DoubleDim mii As DoubleDim o As IntegerDim jen As StringDim has As StringDim rg As StringDim ba As IntegerDim en As Integernil(1) = N1nil(2) = N2nil(3) = N3nil(4) = N4nil(5) = N5nil(6) = n6
For o = 1 To 6 kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", " Next ojen = "" If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Functionhas = "Ananda " & Nama & " baik dalam KD " maa = Application.Max(N1, N2, N3, N4, N5, n6) mii = Application.Min(N1, N2, N3, N4, N5, n6) For o = 1 To 6 ko(o) = 0 If nil(o) = maa Then ma = o If nil(o) = mii Then mi = o Next o'MsgBox mi
jen = has & kd(ma)
jen = jen & " perlu pendampingan dalam KD " & kd(mi)DeskripsiNilai = jenEnd Function
Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Oh begitu...
Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan di hasil akhir saat mau print saja ?Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa to ?
Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis laporan yang akan di-print saja.
On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks sebelumnya
Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Deskripsi juga diperiksa sudah masuk atau belum?
Sent from my smart enough phone
On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Hai Susilo,
Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk setiap siswa ?
Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa oleh supervisornya ?
Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per siswa ?
Regards,
Kid
On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] wrote:
ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan scrip UDF ke VBA yang ada di seet saya tks
Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups. com> menulis:
Dear Susilo, COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih dari 250KB. Salam
On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] wrote:
Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai di semua sheet terima kasih. Wassalamualikum
<image.png>
#yiv7234174276 #yiv7234174276 -- #yiv7234174276ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv7234174276 #yiv7234174276ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv7234174276 #yiv7234174276ygrp-mkp #yiv7234174276hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv7234174276 #yiv7234174276ygrp-mkp #yiv7234174276ads {margin-bottom:10px;}#yiv7234174276 #yiv7234174276ygrp-mkp .yiv7234174276ad {padding:0 0;}#yiv7234174276 #yiv7234174276ygrp-mkp .yiv7234174276ad p {margin:0;}#yiv7234174276 #yiv7234174276ygrp-mkp .yiv7234174276ad a {color:#0000ff;text-decoration:none;}#yiv7234174276 #yiv7234174276ygrp-sponsor #yiv7234174276ygrp-lc {font-family:Arial;}#yiv7234174276 #yiv7234174276ygrp-sponsor #yiv7234174276ygrp-lc #yiv7234174276hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv7234174276 #yiv7234174276ygrp-sponsor #yiv7234174276ygrp-lc .yiv7234174276ad {margin-bottom:10px;padding:0 0;}#yiv7234174276 #yiv7234174276actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv7234174276 #yiv7234174276activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv7234174276 #yiv7234174276activity span {font-weight:700;}#yiv7234174276 #yiv7234174276activity span:first-child {text-transform:uppercase;}#yiv7234174276 #yiv7234174276activity span a {color:#5085b6;text-decoration:none;}#yiv7234174276 #yiv7234174276activity span span {color:#ff7900;}#yiv7234174276 #yiv7234174276activity span .yiv7234174276underline {text-decoration:underline;}#yiv7234174276 .yiv7234174276attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv7234174276 .yiv7234174276attach div a {text-decoration:none;}#yiv7234174276 .yiv7234174276attach img {border:none;padding-right:5px;}#yiv7234174276 .yiv7234174276attach label {display:block;margin-bottom:5px;}#yiv7234174276 .yiv7234174276attach label a {text-decoration:none;}#yiv7234174276 blockquote {margin:0 0 0 4px;}#yiv7234174276 .yiv7234174276bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv7234174276 .yiv7234174276bold a {text-decoration:none;}#yiv7234174276 dd.yiv7234174276last p a {font-family:Verdana;font-weight:700;}#yiv7234174276 dd.yiv7234174276last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv7234174276 dd.yiv7234174276last p span.yiv7234174276yshortcuts {margin-right:0;}#yiv7234174276 div.yiv7234174276attach-table div div a {text-decoration:none;}#yiv7234174276 div.yiv7234174276attach-table {width:400px;}#yiv7234174276 div.yiv7234174276file-title a, #yiv7234174276 div.yiv7234174276file-title a:active, #yiv7234174276 div.yiv7234174276file-title a:hover, #yiv7234174276 div.yiv7234174276file-title a:visited {text-decoration:none;}#yiv7234174276 div.yiv7234174276photo-title a, #yiv7234174276 div.yiv7234174276photo-title a:active, #yiv7234174276 div.yiv7234174276photo-title a:hover, #yiv7234174276 div.yiv7234174276photo-title a:visited {text-decoration:none;}#yiv7234174276 div#yiv7234174276ygrp-mlmsg #yiv7234174276ygrp-msg p a span.yiv7234174276yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv7234174276 .yiv7234174276green {color:#628c2a;}#yiv7234174276 .yiv7234174276MsoNormal {margin:0 0 0 0;}#yiv7234174276 o {font-size:0;}#yiv7234174276 #yiv7234174276photos div {float:left;width:72px;}#yiv7234174276 #yiv7234174276photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv7234174276 #yiv7234174276photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv7234174276 #yiv7234174276reco-category {font-size:77%;}#yiv7234174276 #yiv7234174276reco-desc {font-size:77%;}#yiv7234174276 .yiv7234174276replbq {margin:4px;}#yiv7234174276 #yiv7234174276ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv7234174276 #yiv7234174276ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv7234174276 #yiv7234174276ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv7234174276 #yiv7234174276ygrp-mlmsg select, #yiv7234174276 input, #yiv7234174276 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv7234174276 #yiv7234174276ygrp-mlmsg pre, #yiv7234174276 code {font:115% monospace;}#yiv7234174276 #yiv7234174276ygrp-mlmsg * {line-height:1.22em;}#yiv7234174276 #yiv7234174276ygrp-mlmsg #yiv7234174276logo {padding-bottom:10px;}#yiv7234174276 #yiv7234174276ygrp-msg p a {font-family:Verdana;}#yiv7234174276 #yiv7234174276ygrp-msg p#yiv7234174276attach-count span {color:#1E66AE;font-weight:700;}#yiv7234174276 #yiv7234174276ygrp-reco #yiv7234174276reco-head {color:#ff7900;font-weight:700;}#yiv7234174276 #yiv7234174276ygrp-reco {margin-bottom:20px;padding:0px;}#yiv7234174276 #yiv7234174276ygrp-sponsor #yiv7234174276ov li a {font-size:130%;text-decoration:none;}#yiv7234174276 #yiv7234174276ygrp-sponsor #yiv7234174276ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv7234174276 #yiv7234174276ygrp-sponsor #yiv7234174276ov ul {margin:0;padding:0 0 0 8px;}#yiv7234174276 #yiv7234174276ygrp-text {font-family:Georgia;}#yiv7234174276 #yiv7234174276ygrp-text p {margin:0 0 1em 0;}#yiv7234174276 #yiv7234174276ygrp-text tt {font-size:120%;}#yiv7234174276 #yiv7234174276ygrp-vital ul li:last-child {border-right:none !important;}#yiv7234174276
Function DeskripsiNile(Nama As String, N1 As Integer, N2 As Integer, N3 As Integer, Optional N4 As Integer, Optional N5 As Integer, Optional n6 As Integer, Optional N7 As Integer, Optional N8 As Integer, Optional N9 As Integer, Optional N10 As Integer, Optional N11 As Integer, Optional N12 As Integer) As String 'deskripsi nilai pengetahuanDim nil(12) ' nilaiDim ko(12) ' kodeDim kd(12) 'nama aspekDim j(12)Dim mi As IntegerDim ma As IntegerDim maa As DoubleDim mii As DoubleDim o As IntegerDim jen As StringDim has As StringDim rg As StringDim ba As IntegerDim en As Integernil(1) = N1nil(2) = N2nil(3) = N3nil(4) = N4nil(5) = N5nil(6) = n6nil(7) = N7nil(8) = N8nil(9) = N9nil(10) = N10nil(11) = N11nil(12) = N12
For o = 1 To 12If nil(o) > 0 Then en = oNext o For o = 1 To en kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", " Next ojen = "" If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Functionhas = "Ananda " & Nama & " baik dalam KD " maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12) mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12) For o = 1 To en ko(o) = 0 If nil(o) = maa Then ma = o If nil(o) = mii Then mi = o Next o'MsgBox mi
jen = has & kd(ma)
jen = jen & " perlu pendampingan dalam KD " & kd(mi)DeskripsiNile = jenEnd Function
Function DeskripsiNilai(Nama As String, N1 As Double, N2 As Double, N3 As Double, Optional N4 As Double, Optional N5 As Double, Optional n6 As Double) As String 'deskripsi nilai pengetahuanDim nil(6) ' nilaiDim ko(6) ' kodeDim kd(6) 'nama aspekDim j(6)Dim mi As IntegerDim ma As IntegerDim maa As DoubleDim mii As DoubleDim o As IntegerDim jen As StringDim has As StringDim rg As StringDim ba As IntegerDim en As Integernil(1) = N1nil(2) = N2nil(3) = N3nil(4) = N4nil(5) = N5nil(6) = n6
For o = 1 To 6 kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", " Next ojen = "" If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Functionhas = "Ananda " & Nama & " baik dalam KD " maa = Application.Max(N1, N2, N3, N4, N5, n6) mii = Application.Min(N1, N2, N3, N4, N5, n6) For o = 1 To 6 ko(o) = 0 If nil(o) = maa Then ma = o If nil(o) = mii Then mi = o Next o'MsgBox mi
jen = has & kd(ma)
jen = jen & " perlu pendampingan dalam KD " & kd(mi)DeskripsiNilai = jenEnd Function
Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Oh begitu...
Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan di hasil akhir saat mau print saja ?Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa to ?
Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis laporan yang akan di-print saja.
On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks sebelumnya
Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Deskripsi juga diperiksa sudah masuk atau belum?
Sent from my smart enough phone
On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Hai Susilo,
Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk setiap siswa ?
Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa oleh supervisornya ?
Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per siswa ?
Regards,
Kid
On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] wrote:
ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan scrip UDF ke VBA yang ada di seet saya tks
Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups. com> menulis:
Dear Susilo, COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih dari 250KB. Salam
On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] wrote:
Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai di semua sheet terima kasih. Wassalamualikum
<image.png>
#yiv7234174276 #yiv7234174276 -- #yiv7234174276ygrp-
Mon Oct 23, 2017 11:21 pm (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Tinggal di link ke raport ?
Kenapa deskripsi tidak dibuat di raport saja ?
Kan jadi lebih mudah. Kalau deskripsi sudah dipaksakan dibuat di tabel
data, jadi tidak efisien, karena kalimat deskripsi itu bukan data tapi
suatu report. Report kok diletakkan di sheet data to..
atau.. oh, ada banyak sheet raport sebanyak jumlah siswa ya... dan di
raport itu tidak menampilkan nilai-nilainya lagi, tapi hanya satu kalimat
desripsi saja...
hmmm... beneran gak mudeng saya ini...
imho,
Biarkan saja daftar nilai tanpa deskripsi.
Di sheet raport lah tempat dilakukan proses penyusunan deskripsi.
Toh printout raportnya nanti satu per satu nama murid bukan ?
Guru yang input nilai pun gak akan peduli dengan bunyi deskripsi di tabel
data. Yang dibutuhkan si guru cuma memastikan nilai-nilai sudah masuk di
tabel data.
Setelah itu si guru mulai menyusun raport di sheet lain, satu per satu
untuk setiap muridnya si guru.
Proses menyusun raport di sheet lain ini yang kemudian dibantu dengan
menyusunkan deskripsi.
Jadi, beban Excel jadi lebih rendah, proses lebih efisien, dan mudah
dikembangkan suatu saat nanti.
Setahu saya, tidak ada record transaksi perusahaan yang perlu di cetak
kuitansi dengan bunyi *terbilang*, sudah menyimpan hasil deskripsi *terbilang
*dalam datanya.
Yang ada itu, semua data TANPA deskripsi terbilang, ada di suatu sheet data
terpisah.
Lalu ada sheet lain bernama FORM CETAK KUITANSI yang isinya mengambil nilai
data dari sheet data,
lalu di sheet form cetak kuitansi tersebut, dengan nilai data yang sudah
diambil tersebut, dilakukan penyusunan deskripsi *terbilang*.
Kalau pakai UDF terbilang, maka UDF terbilang dipakai di sheet FORM CETAK
KUITANSI tok til, bukan malah di sheet data.
btw, it's just my 2cents
---------
untuk UDF yang akan Anda pakai tersebut, hilangkan saja rujukan ke sheet
tertentu, agar merujuk ke sheet yang sama dengan lokasi sheet yang pakai
UDF.
Regards,
Kid
2017-10-24 12:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> 1. iya pak , nanti hasil deskripsi tinggal di link ke rapot
> 2. kalau no dan nama masuknya ananda , nama,baru nilai
> 3. iya pak,saya pengin scrip deskripsi ini bisa di pakai d semua sheet
> jika saya copykan scrip udf deskripsi ini ke sheet lain apakah saya cukup
> merubah nama sheet misal di contohkan nama sheet 1, jika saya copy di sheet
> saya yg misal sheet 35 saya cukup rubah itu saja atau ada coding lain yg di
> ganti tks? maaf banyak tanya heee
>
> Function DeskripsiNile(Nama As String, N1 As Integer, N2 As Integer, N3 As
> Integer, Optional N4 As Integer, Optional N5 As Integer, Optional n6 As
> Integer, Optional N7 As Integer, Optional N8 As Integer, Optional N9 As
> Integer, Optional N10 As Integer, Optional N11 As Integer, Optional N12 As
> Integer) As String
> 'deskripsi nilai pengetahuan
> Dim nil(12) ' nilai
> Dim ko(12) ' kode
> Dim kd(12) 'nama aspek
> Dim j(12)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1 <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2 <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3 <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4 <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5 <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6 <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
> nil(7) = N7
> nil(8) = N8 <https://maps.google.com/?q=8)+%3D+N8&entry=gmail&source=g>
> nil(9) = N9 <https://maps.google.com/?q=9)+%3D+N9&entry=gmail&source=g>
> nil(10) = N10
> <https://maps.google.com/?q=10)+%3D+N10&entry=gmail&source=g>
> nil(11) = N11
> <https://maps.google.com/?q=11)+%3D+N11&entry=gmail&source=g>
> nil(12) = N12
> <https://maps.google.com/?q=12)+%3D+N12&entry=gmail&source=g>
>
> For o = 1 To 12
> If nil(o) > 0 Then en = o
> Next o
> For o = 1 To en
> kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12)
> mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12)
> For o = 1 To en
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNile = jen
> End Function
>
> Function DeskripsiNilai(Nama As String, N1 As Double, N2 As Double, N3 As
> Double, Optional N4 As Double, Optional N5 As Double, Optional n6 As
> Double) As String
> 'deskripsi nilai pengetahuan
> Dim nil(6) ' nilai
> Dim ko(6) ' kode
> Dim kd(6) 'nama aspek
> Dim j(6)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1 <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2 <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3 <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4 <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5 <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6 <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
>
> For o = 1 To 6
> kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6)
> mii = Application.Min(N1, N2, N3, N4, N5, n6)
> For o = 1 To 6
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNilai = jen
> End Function
>
>
>
> Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Oh begitu...
>
> Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan
> di hasil akhir saat mau print saja ?
> Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa
> to ?
> Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis
> laporan yang akan di-print saja.
>
>
>
>
>
> On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai
> agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel
> pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat
> ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah
> nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah
> dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul
> adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul
> diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak
> itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan
> pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks
> sebelumnya
>
>
> Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
> Deskripsi juga diperiksa sudah masuk atau belum?
>
> Sent from my smart enough phone
>
> On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika
> langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang
> input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing
> masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
>
>
> Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
> Hai Susilo,
>
> Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk
> setiap siswa ?
> Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa
> oleh supervisornya ?
> Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per
> siswa ?
>
> Regards,
> Kid
>
>
>
>
>
>
> On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> [image: Jadikan gambar sebaris]
> Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
>
> Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
>
> On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak
> ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan
> scrip UDF ke VBA yang ada di seet saya tks
>
>
> Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups. com>
> <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Dear Susilo,
> COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih
> dari 250KB.
> Salam
> On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah
> kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi
> kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa
> berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya
> untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip
> deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya
> nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D
> perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para
> master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai
> di semua sheet terima kasih.
> Wassalamualikum
>
>
>
>
>
>
>
>
> <image.png>
>
>
>
>
>
>
>
>
Kenapa deskripsi tidak dibuat di raport saja ?
Kan jadi lebih mudah. Kalau deskripsi sudah dipaksakan dibuat di tabel
data, jadi tidak efisien, karena kalimat deskripsi itu bukan data tapi
suatu report. Report kok diletakkan di sheet data to..
atau.. oh, ada banyak sheet raport sebanyak jumlah siswa ya... dan di
raport itu tidak menampilkan nilai-nilainya lagi, tapi hanya satu kalimat
desripsi saja...
hmmm... beneran gak mudeng saya ini...
imho,
Biarkan saja daftar nilai tanpa deskripsi.
Di sheet raport lah tempat dilakukan proses penyusunan deskripsi.
Toh printout raportnya nanti satu per satu nama murid bukan ?
Guru yang input nilai pun gak akan peduli dengan bunyi deskripsi di tabel
data. Yang dibutuhkan si guru cuma memastikan nilai-nilai sudah masuk di
tabel data.
Setelah itu si guru mulai menyusun raport di sheet lain, satu per satu
untuk setiap muridnya si guru.
Proses menyusun raport di sheet lain ini yang kemudian dibantu dengan
menyusunkan deskripsi.
Jadi, beban Excel jadi lebih rendah, proses lebih efisien, dan mudah
dikembangkan suatu saat nanti.
Setahu saya, tidak ada record transaksi perusahaan yang perlu di cetak
kuitansi dengan bunyi *terbilang*, sudah menyimpan hasil deskripsi *terbilang
*dalam datanya.
Yang ada itu, semua data TANPA deskripsi terbilang, ada di suatu sheet data
terpisah.
Lalu ada sheet lain bernama FORM CETAK KUITANSI yang isinya mengambil nilai
data dari sheet data,
lalu di sheet form cetak kuitansi tersebut, dengan nilai data yang sudah
diambil tersebut, dilakukan penyusunan deskripsi *terbilang*.
Kalau pakai UDF terbilang, maka UDF terbilang dipakai di sheet FORM CETAK
KUITANSI tok til, bukan malah di sheet data.
btw, it's just my 2cents
---------
untuk UDF yang akan Anda pakai tersebut, hilangkan saja rujukan ke sheet
tertentu, agar merujuk ke sheet yang sama dengan lokasi sheet yang pakai
UDF.
Regards,
Kid
2017-10-24 12:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> 1. iya pak , nanti hasil deskripsi tinggal di link ke rapot
> 2. kalau no dan nama masuknya ananda , nama,baru nilai
> 3. iya pak,saya pengin scrip deskripsi ini bisa di pakai d semua sheet
> jika saya copykan scrip udf deskripsi ini ke sheet lain apakah saya cukup
> merubah nama sheet misal di contohkan nama sheet 1, jika saya copy di sheet
> saya yg misal sheet 35 saya cukup rubah itu saja atau ada coding lain yg di
> ganti tks? maaf banyak tanya heee
>
> Function DeskripsiNile(Nama As String, N1 As Integer, N2 As Integer, N3 As
> Integer, Optional N4 As Integer, Optional N5 As Integer, Optional n6 As
> Integer, Optional N7 As Integer, Optional N8 As Integer, Optional N9 As
> Integer, Optional N10 As Integer, Optional N11 As Integer, Optional N12 As
> Integer) As String
> 'deskripsi nilai pengetahuan
> Dim nil(12) ' nilai
> Dim ko(12) ' kode
> Dim kd(12) 'nama aspek
> Dim j(12)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1 <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2 <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3 <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4 <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5 <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6 <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
> nil(7) = N7
> nil(8) = N8 <https://maps.google.com/?q=8)+%3D+N8&entry=gmail&source=g>
> nil(9) = N9 <https://maps.google.com/?q=9)+%3D+N9&entry=gmail&source=g>
> nil(10) = N10
> <https://maps.google.com/?q=10)+%3D+N10&entry=gmail&source=g>
> nil(11) = N11
> <https://maps.google.com/?q=11)+%3D+N11&entry=gmail&source=g>
> nil(12) = N12
> <https://maps.google.com/?q=12)+%3D+N12&entry=gmail&source=g>
>
> For o = 1 To 12
> If nil(o) > 0 Then en = o
> Next o
> For o = 1 To en
> kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12)
> mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12)
> For o = 1 To en
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNile = jen
> End Function
>
> Function DeskripsiNilai(Nama As String, N1 As Double, N2 As Double, N3 As
> Double, Optional N4 As Double, Optional N5 As Double, Optional n6 As
> Double) As String
> 'deskripsi nilai pengetahuan
> Dim nil(6) ' nilai
> Dim ko(6) ' kode
> Dim kd(6) 'nama aspek
> Dim j(6)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1 <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2 <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3 <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4 <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5 <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6 <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
>
> For o = 1 To 6
> kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6)
> mii = Application.Min(N1, N2, N3, N4, N5, n6)
> For o = 1 To 6
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNilai = jen
> End Function
>
>
>
> Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Oh begitu...
>
> Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan
> di hasil akhir saat mau print saja ?
> Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa
> to ?
> Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis
> laporan yang akan di-print saja.
>
>
>
>
>
> On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai
> agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel
> pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat
> ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah
> nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah
> dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul
> adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul
> diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak
> itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan
> pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks
> sebelumnya
>
>
> Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
> Deskripsi juga diperiksa sudah masuk atau belum?
>
> Sent from my smart enough phone
>
> On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika
> langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang
> input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing
> masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
>
>
> Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
> Hai Susilo,
>
> Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk
> setiap siswa ?
> Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa
> oleh supervisornya ?
> Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per
> siswa ?
>
> Regards,
> Kid
>
>
>
>
>
>
> On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> [image: Jadikan gambar sebaris]
> Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
>
> Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
>
> On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak
> ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan
> scrip UDF ke VBA yang ada di seet saya tks
>
>
> Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups. com>
> <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Dear Susilo,
> COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih
> dari 250KB.
> Salam
> On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah
> kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi
> kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa
> berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya
> untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip
> deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya
> nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D
> perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para
> master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai
> di semua sheet terima kasih.
> Wassalamualikum
>
>
>
>
>
>
>
>
> <image.png>
>
>
>
>
>
>
>
>
Tue Oct 24, 2017 12:46 am (PDT) . Posted by:
"Susilo Pratama" pratama_susilo
boleh saya kirim file aplikasi saya ,ukuranya kurang lebih 4 mb karen sudah ada sekitar 45 sheet dan macro macro buat contoh saja
Pada Selasa, 24 Oktober 2017 13:22, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Tinggal di link ke raport ?
Kenapa deskripsi tidak dibuat di raport saja ?
Kan jadi lebih mudah. Kalau deskripsi sudah dipaksakan dibuat di tabel data, jadi tidak efisien, karena kalimat deskripsi itu bukan data tapi suatu report. Report kok diletakkan di sheet data to..
atau.. oh, ada banyak sheet raport sebanyak jumlah siswa ya... dan di raport itu tidak menampilkan nilai-nilainya lagi, tapi hanya satu kalimat desripsi saja...
hmmm... beneran gak mudeng saya ini...
imho,Biarkan saja daftar nilai tanpa deskripsi.Di sheet raport lah tempat dilakukan proses penyusunan deskripsi.Toh printout raportnya nanti satu per satu nama murid bukan ?
Guru yang input nilai pun gak akan peduli dengan bunyi deskripsi di tabel data. Yang dibutuhkan si guru cuma memastikan nilai-nilai sudah masuk di tabel data.Setelah itu si guru mulai menyusun raport di sheet lain, satu per satu untuk setiap muridnya si guru.
Proses menyusun raport di sheet lain ini yang kemudian dibantu dengan menyusunkan deskripsi.Jadi, beban Excel jadi lebih rendah, proses lebih efisien, dan mudah dikembangkan suatu saat nanti.
Setahu saya, tidak ada record transaksi perusahaan yang perlu di cetak kuitansi dengan bunyi terbilang, sudah menyimpan hasil deskripsi terbilang dalam datanya.Yang ada itu, semua data TANPA deskripsi terbilang, ada di suatu sheet data terpisah.
Lalu ada sheet lain bernama FORM CETAK KUITANSI yang isinya mengambil nilai data dari sheet data,
lalu di sheet form cetak kuitansi tersebut, dengan nilai data yang sudah diambil tersebut, dilakukan penyusunan deskripsi terbilang.Kalau pakai UDF terbilang, maka UDF terbilang dipakai di sheet FORM CETAK KUITANSI tok til, bukan malah di sheet data.
btw, it's just my 2cents
---------
untuk UDF yang akan Anda pakai tersebut, hilangkan saja rujukan ke sheet tertentu, agar merujuk ke sheet yang sama dengan lokasi sheet yang pakai UDF.
Regards,Kid
2017-10-24 12:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
1. iya pak , nanti hasil deskripsi tinggal di link ke rapot2. kalau no dan nama masuknya ananda , nama,baru nilai3. iya pak,saya pengin scrip deskripsi ini bisa di pakai d semua sheet jika saya copykan scrip udf deskripsi ini ke sheet lain apakah saya cukup merubah nama sheet misal di contohkan nama sheet 1, jika saya copy di sheet saya yg misal sheet 35 saya cukup rubah itu saja atau ada coding lain yg di ganti tks? maaf banyak tanya heee
Function DeskripsiNile(Nama As String, N1 As Integer, N2 As Integer, N3 As Integer, Optional N4 As Integer, Optional N5 As Integer, Optional n6 As Integer, Optional N7 As Integer, Optional N8 As Integer, Optional N9 As Integer, Optional N10 As Integer, Optional N11 As Integer, Optional N12 As Integer) As String 'deskripsi nilai pengetahuanDim nil(12) ' nilaiDim ko(12) ' kodeDim kd(12) 'nama aspekDim j(12)Dim mi As IntegerDim ma As IntegerDim maa As DoubleDim mii As DoubleDim o As IntegerDim jen As StringDim has As StringDim rg As StringDim ba As IntegerDim en As Integernil(1) = N1nil(2) = N2nil(3) = N3nil(4) = N4nil(5) = N5nil(6) = n6nil(7) = N7nil(8) = N8nil(9) = N9nil(10) = N10nil(11) = N11nil(12) = N12
For o = 1 To 12If nil(o) > 0 Then en = oNext o For o = 1 To en kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", " Next ojen = "" If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Functionhas = "Ananda " & Nama & " baik dalam KD " maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12) mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12) For o = 1 To en ko(o) = 0 If nil(o) = maa Then ma = o If nil(o) = mii Then mi = o Next o'MsgBox mi
jen = has & kd(ma)
jen = jen & " perlu pendampingan dalam KD " & kd(mi)DeskripsiNile = jenEnd Function
Function DeskripsiNilai(Nama As String, N1 As Double, N2 As Double, N3 As Double, Optional N4 As Double, Optional N5 As Double, Optional n6 As Double) As String 'deskripsi nilai pengetahuanDim nil(6) ' nilaiDim ko(6) ' kodeDim kd(6) 'nama aspekDim j(6)Dim mi As IntegerDim ma As IntegerDim maa As DoubleDim mii As DoubleDim o As IntegerDim jen As StringDim has As StringDim rg As StringDim ba As IntegerDim en As Integernil(1) = N1nil(2) = N2nil(3) = N3nil(4) = N4nil(5) = N5nil(6) = n6
For o = 1 To 6 kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", " Next ojen = "" If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Functionhas = "Ananda " & Nama & " baik dalam KD " maa = Application.Max(N1, N2, N3, N4, N5, n6) mii = Application.Min(N1, N2, N3, N4, N5, n6) For o = 1 To 6 ko(o) = 0 If nil(o) = maa Then ma = o If nil(o) = mii Then mi = o Next o'MsgBox mi
jen = has & kd(ma)
jen = jen & " perlu pendampingan dalam KD " & kd(mi)DeskripsiNilai = jenEnd Function
Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Oh begitu...
Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan di hasil akhir saat mau print saja ?Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa to ?
Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis laporan yang akan di-print saja.
On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks sebelumnya
Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Deskripsi juga diperiksa sudah masuk atau belum?
Sent from my smart enough phone
On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Hai Susilo,
Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk setiap siswa ?
Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa oleh supervisornya ?
Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per siswa ?
Regards,
Kid
On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] wrote:
ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan scrip UDF ke VBA yang ada di seet saya tks
Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups. com> menulis:
Dear Susilo, COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih dari 250KB. Salam
On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] wrote:
Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai di semua sheet terima kasih. Wassalamualikum
<image.png>
#yiv2826942927 #yiv2826942927 -- #yiv2826942927ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv2826942927 #yiv2826942927ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv2826942927 #yiv2826942927ygrp-mkp #yiv2826942927hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv2826942927 #yiv2826942927ygrp-mkp #yiv2826942927ads {margin-bottom:10px;}#yiv2826942927 #yiv2826942927ygrp-mkp .yiv2826942927ad {padding:0 0;}#yiv2826942927 #yiv2826942927ygrp-mkp .yiv2826942927ad p {margin:0;}#yiv2826942927 #yiv2826942927ygrp-mkp .yiv2826942927ad a {color:#0000ff;text-decoration:none;}#yiv2826942927 #yiv2826942927ygrp-sponsor #yiv2826942927ygrp-lc {font-family:Arial;}#yiv2826942927 #yiv2826942927ygrp-sponsor #yiv2826942927ygrp-lc #yiv2826942927hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv2826942927 #yiv2826942927ygrp-sponsor #yiv2826942927ygrp-lc .yiv2826942927ad {margin-bottom:10px;padding:0 0;}#yiv2826942927 #yiv2826942927actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv2826942927 #yiv2826942927activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv2826942927 #yiv2826942927activity span {font-weight:700;}#yiv2826942927 #yiv2826942927activity span:first-child {text-transform:uppercase;}#yiv2826942927 #yiv2826942927activity span a {color:#5085b6;text-decoration:none;}#yiv2826942927 #yiv2826942927activity span span {color:#ff7900;}#yiv2826942927 #yiv2826942927activity span .yiv2826942927underline {text-decoration:underline;}#yiv2826942927 .yiv2826942927attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv2826942927 .yiv2826942927attach div a {text-decoration:none;}#yiv2826942927 .yiv2826942927attach img {border:none;padding-right:5px;}#yiv2826942927 .yiv2826942927attach label {display:block;margin-bottom:5px;}#yiv2826942927 .yiv2826942927attach label a {text-decoration:none;}#yiv2826942927 blockquote {margin:0 0 0 4px;}#yiv2826942927 .yiv2826942927bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv2826942927 .yiv2826942927bold a {text-decoration:none;}#yiv2826942927 dd.yiv2826942927last p a {font-family:Verdana;font-weight:700;}#yiv2826942927 dd.yiv2826942927last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv2826942927 dd.yiv2826942927last p span.yiv2826942927yshortcuts {margin-right:0;}#yiv2826942927 div.yiv2826942927attach-table div div a {text-decoration:none;}#yiv2826942927 div.yiv2826942927attach-table {width:400px;}#yiv2826942927 div.yiv2826942927file-title a, #yiv2826942927 div.yiv2826942927file-title a:active, #yiv2826942927 div.yiv2826942927file-title a:hover, #yiv2826942927 div.yiv2826942927file-title a:visited {text-decoration:none;}#yiv2826942927 div.yiv2826942927photo-title a, #yiv2826942927 div.yiv2826942927photo-title a:active, #yiv2826942927 div.yiv2826942927photo-title a:hover, #yiv2826942927 div.yiv2826942927photo-title a:visited {text-decoration:none;}#yiv2826942927 div#yiv2826942927ygrp-mlmsg #yiv2826942927ygrp-msg p a span.yiv2826942927yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv2826942927 .yiv2826942927green {color:#628c2a;}#yiv2826942927 .yiv2826942927MsoNormal {margin:0 0 0 0;}#yiv2826942927 o {font-size:0;}#yiv2826942927 #yiv2826942927photos div {float:left;width:72px;}#yiv2826942927 #yiv2826942927photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv2826942927 #yiv2826942927photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv2826942927 #yiv2826942927reco-category {font-size:77%;}#yiv2826942927 #yiv2826942927reco-desc {font-size:77%;}#yiv2826942927 .yiv2826942927replbq {margin:4px;}#yiv2826942927 #yiv2826942927ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv2826942927 #yiv2826942927ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv2826942927 #yiv2826942927ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv2826942927 #yiv2826942927ygrp-mlmsg select, #yiv2826942927 input, #yiv2826942927 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv2826942927 #yiv2826942927ygrp-mlmsg pre, #yiv2826942927 code {font:115% monospace;}#yiv2826942927 #yiv2826942927ygrp-mlmsg * {line-height:1.22em;}#yiv2826942927 #yiv2826942927ygrp-mlmsg #yiv2826942927logo {padding-bottom:10px;}#yiv2826942927 #yiv2826942927ygrp-msg p a {font-family:Verdana;}#yiv2826942927 #yiv2826942927ygrp-msg p#yiv2826942927attach-count span {color:#1E66AE;font-weight:700;}#yiv2826942927 #yiv2826942927ygrp-reco #yiv2826942927reco-head {color:#ff7900;font-weight:700;}#yiv2826942927 #yiv2826942927ygrp-reco {margin-bottom:20px;padding:0px;}#yiv2826942927 #yiv2826942927ygrp-sponsor #yiv2826942927ov li a {font-size:130%;text-decoration:none;}#yiv2826942927 #yiv2826942927ygrp-sponsor #yiv2826942927ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv2826942927 #yiv2826942927ygrp-sponsor #yiv2826942927ov ul {margin:0;padding:0 0 0 8px;}#yiv2826942927 #yiv2826942927ygrp-text {font-family:Georgia;}#yiv2826942927 #yiv2826942927ygrp-text p {margin:0 0 1em 0;}#yiv2826942927 #yiv2826942927ygrp-text tt {font-size:120%;}#yiv2826942927 #yiv2826942927ygrp-vital ul li:last-child {border-right:none !important;}#yiv2826942927
Pada Selasa, 24 Oktober 2017 13:22, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Tinggal di link ke raport ?
Kenapa deskripsi tidak dibuat di raport saja ?
Kan jadi lebih mudah. Kalau deskripsi sudah dipaksakan dibuat di tabel data, jadi tidak efisien, karena kalimat deskripsi itu bukan data tapi suatu report. Report kok diletakkan di sheet data to..
atau.. oh, ada banyak sheet raport sebanyak jumlah siswa ya... dan di raport itu tidak menampilkan nilai-nilainya lagi, tapi hanya satu kalimat desripsi saja...
hmmm... beneran gak mudeng saya ini...
imho,Biarkan saja daftar nilai tanpa deskripsi.Di sheet raport lah tempat dilakukan proses penyusunan deskripsi.Toh printout raportnya nanti satu per satu nama murid bukan ?
Guru yang input nilai pun gak akan peduli dengan bunyi deskripsi di tabel data. Yang dibutuhkan si guru cuma memastikan nilai-nilai sudah masuk di tabel data.Setelah itu si guru mulai menyusun raport di sheet lain, satu per satu untuk setiap muridnya si guru.
Proses menyusun raport di sheet lain ini yang kemudian dibantu dengan menyusunkan deskripsi.Jadi, beban Excel jadi lebih rendah, proses lebih efisien, dan mudah dikembangkan suatu saat nanti.
Setahu saya, tidak ada record transaksi perusahaan yang perlu di cetak kuitansi dengan bunyi terbilang, sudah menyimpan hasil deskripsi terbilang dalam datanya.Yang ada itu, semua data TANPA deskripsi terbilang, ada di suatu sheet data terpisah.
Lalu ada sheet lain bernama FORM CETAK KUITANSI yang isinya mengambil nilai data dari sheet data,
lalu di sheet form cetak kuitansi tersebut, dengan nilai data yang sudah diambil tersebut, dilakukan penyusunan deskripsi terbilang.Kalau pakai UDF terbilang, maka UDF terbilang dipakai di sheet FORM CETAK KUITANSI tok til, bukan malah di sheet data.
btw, it's just my 2cents
---------
untuk UDF yang akan Anda pakai tersebut, hilangkan saja rujukan ke sheet tertentu, agar merujuk ke sheet yang sama dengan lokasi sheet yang pakai UDF.
Regards,Kid
2017-10-24 12:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
1. iya pak , nanti hasil deskripsi tinggal di link ke rapot2. kalau no dan nama masuknya ananda , nama,baru nilai3. iya pak,saya pengin scrip deskripsi ini bisa di pakai d semua sheet jika saya copykan scrip udf deskripsi ini ke sheet lain apakah saya cukup merubah nama sheet misal di contohkan nama sheet 1, jika saya copy di sheet saya yg misal sheet 35 saya cukup rubah itu saja atau ada coding lain yg di ganti tks? maaf banyak tanya heee
Function DeskripsiNile(Nama As String, N1 As Integer, N2 As Integer, N3 As Integer, Optional N4 As Integer, Optional N5 As Integer, Optional n6 As Integer, Optional N7 As Integer, Optional N8 As Integer, Optional N9 As Integer, Optional N10 As Integer, Optional N11 As Integer, Optional N12 As Integer) As String 'deskripsi nilai pengetahuanDim nil(12) ' nilaiDim ko(12) ' kodeDim kd(12) 'nama aspekDim j(12)Dim mi As IntegerDim ma As IntegerDim maa As DoubleDim mii As DoubleDim o As IntegerDim jen As StringDim has As StringDim rg As StringDim ba As IntegerDim en As Integernil(1) = N1nil(2) = N2nil(3) = N3nil(4) = N4nil(5) = N5nil(6) = n6nil(7) = N7nil(8) = N8nil(9) = N9nil(10) = N10nil(11) = N11nil(12) = N12
For o = 1 To 12If nil(o) > 0 Then en = oNext o For o = 1 To en kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", " Next ojen = "" If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Functionhas = "Ananda " & Nama & " baik dalam KD " maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12) mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12) For o = 1 To en ko(o) = 0 If nil(o) = maa Then ma = o If nil(o) = mii Then mi = o Next o'MsgBox mi
jen = has & kd(ma)
jen = jen & " perlu pendampingan dalam KD " & kd(mi)DeskripsiNile = jenEnd Function
Function DeskripsiNilai(Nama As String, N1 As Double, N2 As Double, N3 As Double, Optional N4 As Double, Optional N5 As Double, Optional n6 As Double) As String 'deskripsi nilai pengetahuanDim nil(6) ' nilaiDim ko(6) ' kodeDim kd(6) 'nama aspekDim j(6)Dim mi As IntegerDim ma As IntegerDim maa As DoubleDim mii As DoubleDim o As IntegerDim jen As StringDim has As StringDim rg As StringDim ba As IntegerDim en As Integernil(1) = N1nil(2) = N2nil(3) = N3nil(4) = N4nil(5) = N5nil(6) = n6
For o = 1 To 6 kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", " Next ojen = "" If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Functionhas = "Ananda " & Nama & " baik dalam KD " maa = Application.Max(N1, N2, N3, N4, N5, n6) mii = Application.Min(N1, N2, N3, N4, N5, n6) For o = 1 To 6 ko(o) = 0 If nil(o) = maa Then ma = o If nil(o) = mii Then mi = o Next o'MsgBox mi
jen = has & kd(ma)
jen = jen & " perlu pendampingan dalam KD " & kd(mi)DeskripsiNilai = jenEnd Function
Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Oh begitu...
Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan di hasil akhir saat mau print saja ?Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa to ?
Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis laporan yang akan di-print saja.
On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks sebelumnya
Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Deskripsi juga diperiksa sudah masuk atau belum?
Sent from my smart enough phone
On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Hai Susilo,
Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk setiap siswa ?
Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa oleh supervisornya ?
Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per siswa ?
Regards,
Kid
On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] wrote:
ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan scrip UDF ke VBA yang ada di seet saya tks
Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups. com> menulis:
Dear Susilo, COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih dari 250KB. Salam
On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] wrote:
Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai di semua sheet terima kasih. Wassalamualikum
<image.png>
#yiv2826942927 #yiv2826942927 -- #yiv2826942927ygrp-
Tue Oct 24, 2017 12:47 am (PDT) . Posted by:
"Susilo Pratama" pratama_susilo
nilai harian diambil dari ini ,kemdian baru masuk ke
ini nilai harian + nilai pts+pas kemdian hasilnya baru masuk ke rapot
ini rapotnya pak, jadi lumayan ribiet soalny ini rapot mi ,kalau smp lebih sedikit mungkin prosesnya tks
Pada Selasa, 24 Oktober 2017 13:22, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
Tinggal di link ke raport ?
Kenapa deskripsi tidak dibuat di raport saja ?
Kan jadi lebih mudah. Kalau deskripsi sudah dipaksakan dibuat di tabel data, jadi tidak efisien, karena kalimat deskripsi itu bukan data tapi suatu report. Report kok diletakkan di sheet data to..
atau.. oh, ada banyak sheet raport sebanyak jumlah siswa ya... dan di raport itu tidak menampilkan nilai-nilainya lagi, tapi hanya satu kalimat desripsi saja...
hmmm... beneran gak mudeng saya ini...
imho,Biarkan saja daftar nilai tanpa deskripsi.Di sheet raport lah tempat dilakukan proses penyusunan deskripsi.Toh printout raportnya nanti satu per satu nama murid bukan ?
Guru yang input nilai pun gak akan peduli dengan bunyi deskripsi di tabel data. Yang dibutuhkan si guru cuma memastikan nilai-nilai sudah masuk di tabel data.Setelah itu si guru mulai menyusun raport di sheet lain, satu per satu untuk setiap muridnya si guru.
Proses menyusun raport di sheet lain ini yang kemudian dibantu dengan menyusunkan deskripsi.Jadi, beban Excel jadi lebih rendah, proses lebih efisien, dan mudah dikembangkan suatu saat nanti.
Setahu saya, tidak ada record transaksi perusahaan yang perlu di cetak kuitansi dengan bunyi terbilang, sudah menyimpan hasil deskripsi terbilang dalam datanya.Yang ada itu, semua data TANPA deskripsi terbilang, ada di suatu sheet data terpisah.
Lalu ada sheet lain bernama FORM CETAK KUITANSI yang isinya mengambil nilai data dari sheet data,
lalu di sheet form cetak kuitansi tersebut, dengan nilai data yang sudah diambil tersebut, dilakukan penyusunan deskripsi terbilang.Kalau pakai UDF terbilang, maka UDF terbilang dipakai di sheet FORM CETAK KUITANSI tok til, bukan malah di sheet data.
btw, it's just my 2cents
---------
untuk UDF yang akan Anda pakai tersebut, hilangkan saja rujukan ke sheet tertentu, agar merujuk ke sheet yang sama dengan lokasi sheet yang pakai UDF.
Regards,Kid
2017-10-24 12:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
1. iya pak , nanti hasil deskripsi tinggal di link ke rapot2. kalau no dan nama masuknya ananda , nama,baru nilai3. iya pak,saya pengin scrip deskripsi ini bisa di pakai d semua sheet jika saya copykan scrip udf deskripsi ini ke sheet lain apakah saya cukup merubah nama sheet misal di contohkan nama sheet 1, jika saya copy di sheet saya yg misal sheet 35 saya cukup rubah itu saja atau ada coding lain yg di ganti tks? maaf banyak tanya heee
Function DeskripsiNile(Nama As String, N1 As Integer, N2 As Integer, N3 As Integer, Optional N4 As Integer, Optional N5 As Integer, Optional n6 As Integer, Optional N7 As Integer, Optional N8 As Integer, Optional N9 As Integer, Optional N10 As Integer, Optional N11 As Integer, Optional N12 As Integer) As String 'deskripsi nilai pengetahuanDim nil(12) ' nilaiDim ko(12) ' kodeDim kd(12) 'nama aspekDim j(12)Dim mi As IntegerDim ma As IntegerDim maa As DoubleDim mii As DoubleDim o As IntegerDim jen As StringDim has As StringDim rg As StringDim ba As IntegerDim en As Integernil(1) = N1nil(2) = N2nil(3) = N3nil(4) = N4nil(5) = N5nil(6) = n6nil(7) = N7nil(8) = N8nil(9) = N9nil(10) = N10nil(11) = N11nil(12) = N12
For o = 1 To 12If nil(o) > 0 Then en = oNext o For o = 1 To en kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", " Next ojen = "" If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Functionhas = "Ananda " & Nama & " baik dalam KD " maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12) mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12) For o = 1 To en ko(o) = 0 If nil(o) = maa Then ma = o If nil(o) = mii Then mi = o Next o'MsgBox mi
jen = has & kd(ma)
jen = jen & " perlu pendampingan dalam KD " & kd(mi)DeskripsiNile = jenEnd Function
Function DeskripsiNilai(Nama As String, N1 As Double, N2 As Double, N3 As Double, Optional N4 As Double, Optional N5 As Double, Optional n6 As Double) As String 'deskripsi nilai pengetahuanDim nil(6) ' nilaiDim ko(6) ' kodeDim kd(6) 'nama aspekDim j(6)Dim mi As IntegerDim ma As IntegerDim maa As DoubleDim mii As DoubleDim o As IntegerDim jen As StringDim has As StringDim rg As StringDim ba As IntegerDim en As Integernil(1) = N1nil(2) = N2nil(3) = N3nil(4) = N4nil(5) = N5nil(6) = n6
For o = 1 To 6 kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", " Next ojen = "" If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Functionhas = "Ananda " & Nama & " baik dalam KD " maa = Application.Max(N1, N2, N3, N4, N5, n6) mii = Application.Min(N1, N2, N3, N4, N5, n6) For o = 1 To 6 ko(o) = 0 If nil(o) = maa Then ma = o If nil(o) = mii Then mi = o Next o'MsgBox mi
jen = has & kd(ma)
jen = jen & " perlu pendampingan dalam KD " & kd(mi)DeskripsiNilai = jenEnd Function
Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Oh begitu...
Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan di hasil akhir saat mau print saja ?Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa to ?
Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis laporan yang akan di-print saja.
On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks sebelumnya
Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Deskripsi juga diperiksa sudah masuk atau belum?
Sent from my smart enough phone
On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
Hai Susilo,
Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk setiap siswa ?
Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa oleh supervisornya ?
Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per siswa ?
Regards,
Kid
On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] wrote:
ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan scrip UDF ke VBA yang ada di seet saya tks
Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups. com> menulis:
Dear Susilo, COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih dari 250KB. Salam
On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com [belajar-excel] wrote:
Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai di semua sheet terima kasih. Wassalamualikum
<image.png>
#yiv7892065191 #yiv7892065191 -- #yiv7892065191ygrp-
Tue Oct 24, 2017 12:47 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Boleh, sila. Untuk bahan belajar bagi BeExceller.
Regards,
Kid
2017-10-24 14:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> boleh saya kirim file aplikasi saya ,ukuranya kurang lebih 4 mb karen
> sudah ada sekitar 45 sheet dan macro macro buat contoh saja
>
>
> Pada Selasa, 24 Oktober 2017 13:22, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Tinggal di link ke raport ?
> Kenapa deskripsi tidak dibuat di raport saja ?
> Kan jadi lebih mudah. Kalau deskripsi sudah dipaksakan dibuat di tabel
> data, jadi tidak efisien, karena kalimat deskripsi itu bukan data tapi
> suatu report. Report kok diletakkan di sheet data to..
>
> atau.. oh, ada banyak sheet raport sebanyak jumlah siswa ya... dan di
> raport itu tidak menampilkan nilai-nilainya lagi, tapi hanya satu kalimat
> desripsi saja...
> hmmm... beneran gak mudeng saya ini...
>
>
> imho,
> Biarkan saja daftar nilai tanpa deskripsi.
> Di sheet raport lah tempat dilakukan proses penyusunan deskripsi.
> Toh printout raportnya nanti satu per satu nama murid bukan ?
>
> Guru yang input nilai pun gak akan peduli dengan bunyi deskripsi di tabel
> data. Yang dibutuhkan si guru cuma memastikan nilai-nilai sudah masuk di
> tabel data.
> Setelah itu si guru mulai menyusun raport di sheet lain, satu per satu
> untuk setiap muridnya si guru.
> Proses menyusun raport di sheet lain ini yang kemudian dibantu dengan
> menyusunkan deskripsi.
> Jadi, beban Excel jadi lebih rendah, proses lebih efisien, dan mudah
> dikembangkan suatu saat nanti.
>
> Setahu saya, tidak ada record transaksi perusahaan yang perlu di cetak
> kuitansi dengan bunyi *terbilang*, sudah menyimpan hasil deskripsi *terbilang
> *dalam datanya.
> Yang ada itu, semua data TANPA deskripsi terbilang, ada di suatu sheet
> data terpisah.
> Lalu ada sheet lain bernama FORM CETAK KUITANSI yang isinya mengambil
> nilai data dari sheet data,
> lalu di sheet form cetak kuitansi tersebut, dengan nilai data yang sudah
> diambil tersebut, dilakukan penyusunan deskripsi *terbilang*.
> Kalau pakai UDF terbilang, maka UDF terbilang dipakai di sheet FORM CETAK
> KUITANSI tok til, bukan malah di sheet data.
>
> btw, it's just my 2cents
>
> ---------
>
> untuk UDF yang akan Anda pakai tersebut, hilangkan saja rujukan ke sheet
> tertentu, agar merujuk ke sheet yang sama dengan lokasi sheet yang pakai
> UDF.
>
> Regards,
> Kid
>
>
>
> 2017-10-24 12:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> 1. iya pak , nanti hasil deskripsi tinggal di link ke rapot
> 2. kalau no dan nama masuknya ananda , nama,baru nilai
> 3. iya pak,saya pengin scrip deskripsi ini bisa di pakai d semua sheet
> jika saya copykan scrip udf deskripsi ini ke sheet lain apakah saya cukup
> merubah nama sheet misal di contohkan nama sheet 1, jika saya copy di sheet
> saya yg misal sheet 35 saya cukup rubah itu saja atau ada coding lain yg di
> ganti tks? maaf banyak tanya heee
>
> Function DeskripsiNile(Nama As String, N1 As Integer, N2 As Integer, N3 As
> Integer, Optional N4 As Integer, Optional N5 As Integer, Optional n6 As
> Integer, Optional N7 As Integer, Optional N8 As Integer, Optional N9 As
> Integer, Optional N10 As Integer, Optional N11 As Integer, Optional N12 As
> Integer) As String
> 'deskripsi nilai pengetahuan
> Dim nil(12) ' nilai
> Dim ko(12) ' kode
> Dim kd(12) 'nama aspek
> Dim j(12)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1 <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2 <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3 <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4 <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5 <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6 <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
> nil(7) = N7
> nil(8) = N8 <https://maps.google.com/?q=8)+%3D+N8&entry=gmail&source=g>
> nil(9) = N9 <https://maps.google.com/?q=9)+%3D+N9&entry=gmail&source=g>
> nil(10) = N10
> <https://maps.google.com/?q=10)+%3D+N10&entry=gmail&source=g>
> nil(11) = N11
> <https://maps.google.com/?q=11)+%3D+N11&entry=gmail&source=g>
> nil(12) = N12
> <https://maps.google.com/?q=12)+%3D+N12&entry=gmail&source=g>
>
> For o = 1 To 12
> If nil(o) > 0 Then en = o
> Next o
> For o = 1 To en
> kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12)
> mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12)
> For o = 1 To en
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNile = jen
> End Function
>
> Function DeskripsiNilai(Nama As String, N1 As Double, N2 As Double, N3 As
> Double, Optional N4 As Double, Optional N5 As Double, Optional n6 As
> Double) As String
> 'deskripsi nilai pengetahuan
> Dim nil(6) ' nilai
> Dim ko(6) ' kode
> Dim kd(6) 'nama aspek
> Dim j(6)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1 <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2 <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3 <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4 <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5 <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6 <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
>
> For o = 1 To 6
> kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6)
> mii = Application.Min(N1, N2, N3, N4, N5, n6)
> For o = 1 To 6
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNilai = jen
> End Function
>
>
>
> Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
> Oh begitu...
>
> Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan
> di hasil akhir saat mau print saja ?
> Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa
> to ?
> Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis
> laporan yang akan di-print saja.
>
>
>
>
>
> On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai
> agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel
> pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat
> ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah
> nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah
> dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul
> adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul
> diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak
> itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan
> pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks
> sebelumnya
>
>
> Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
> Deskripsi juga diperiksa sudah masuk atau belum?
>
> Sent from my smart enough phone
>
> On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika
> langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang
> input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing
> masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
>
>
> Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
> Hai Susilo,
>
> Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk
> setiap siswa ?
> Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa
> oleh supervisornya ?
> Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per
> siswa ?
>
> Regards,
> Kid
>
>
>
>
>
>
> On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> [image: Jadikan gambar sebaris]
> Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
>
> Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
>
> On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak
> ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan
> scrip UDF ke VBA yang ada di seet saya tks
>
>
> Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups. com>
> <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Dear Susilo,
> COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih
> dari 250KB.
> Salam
> On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah
> kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi
> kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa
> berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya
> untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip
> deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya
> nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D
> perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para
> master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai
> di semua sheet terima kasih.
> Wassalamualikum
>
>
>
>
>
>
>
>
> <image.png>
>
>
>
>
>
>
>
>
>
>
>
Regards,
Kid
2017-10-24 14:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> boleh saya kirim file aplikasi saya ,ukuranya kurang lebih 4 mb karen
> sudah ada sekitar 45 sheet dan macro macro buat contoh saja
>
>
> Pada Selasa, 24 Oktober 2017 13:22, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Tinggal di link ke raport ?
> Kenapa deskripsi tidak dibuat di raport saja ?
> Kan jadi lebih mudah. Kalau deskripsi sudah dipaksakan dibuat di tabel
> data, jadi tidak efisien, karena kalimat deskripsi itu bukan data tapi
> suatu report. Report kok diletakkan di sheet data to..
>
> atau.. oh, ada banyak sheet raport sebanyak jumlah siswa ya... dan di
> raport itu tidak menampilkan nilai-nilainya lagi, tapi hanya satu kalimat
> desripsi saja...
> hmmm... beneran gak mudeng saya ini...
>
>
> imho,
> Biarkan saja daftar nilai tanpa deskripsi.
> Di sheet raport lah tempat dilakukan proses penyusunan deskripsi.
> Toh printout raportnya nanti satu per satu nama murid bukan ?
>
> Guru yang input nilai pun gak akan peduli dengan bunyi deskripsi di tabel
> data. Yang dibutuhkan si guru cuma memastikan nilai-nilai sudah masuk di
> tabel data.
> Setelah itu si guru mulai menyusun raport di sheet lain, satu per satu
> untuk setiap muridnya si guru.
> Proses menyusun raport di sheet lain ini yang kemudian dibantu dengan
> menyusunkan deskripsi.
> Jadi, beban Excel jadi lebih rendah, proses lebih efisien, dan mudah
> dikembangkan suatu saat nanti.
>
> Setahu saya, tidak ada record transaksi perusahaan yang perlu di cetak
> kuitansi dengan bunyi *terbilang*, sudah menyimpan hasil deskripsi *terbilang
> *dalam datanya.
> Yang ada itu, semua data TANPA deskripsi terbilang, ada di suatu sheet
> data terpisah.
> Lalu ada sheet lain bernama FORM CETAK KUITANSI yang isinya mengambil
> nilai data dari sheet data,
> lalu di sheet form cetak kuitansi tersebut, dengan nilai data yang sudah
> diambil tersebut, dilakukan penyusunan deskripsi *terbilang*.
> Kalau pakai UDF terbilang, maka UDF terbilang dipakai di sheet FORM CETAK
> KUITANSI tok til, bukan malah di sheet data.
>
> btw, it's just my 2cents
>
> ---------
>
> untuk UDF yang akan Anda pakai tersebut, hilangkan saja rujukan ke sheet
> tertentu, agar merujuk ke sheet yang sama dengan lokasi sheet yang pakai
> UDF.
>
> Regards,
> Kid
>
>
>
> 2017-10-24 12:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> 1. iya pak , nanti hasil deskripsi tinggal di link ke rapot
> 2. kalau no dan nama masuknya ananda , nama,baru nilai
> 3. iya pak,saya pengin scrip deskripsi ini bisa di pakai d semua sheet
> jika saya copykan scrip udf deskripsi ini ke sheet lain apakah saya cukup
> merubah nama sheet misal di contohkan nama sheet 1, jika saya copy di sheet
> saya yg misal sheet 35 saya cukup rubah itu saja atau ada coding lain yg di
> ganti tks? maaf banyak tanya heee
>
> Function DeskripsiNile(Nama As String, N1 As Integer, N2 As Integer, N3 As
> Integer, Optional N4 As Integer, Optional N5 As Integer, Optional n6 As
> Integer, Optional N7 As Integer, Optional N8 As Integer, Optional N9 As
> Integer, Optional N10 As Integer, Optional N11 As Integer, Optional N12 As
> Integer) As String
> 'deskripsi nilai pengetahuan
> Dim nil(12) ' nilai
> Dim ko(12) ' kode
> Dim kd(12) 'nama aspek
> Dim j(12)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1 <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2 <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3 <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4 <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5 <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6 <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
> nil(7) = N7
> nil(8) = N8 <https://maps.google.com/?q=8)+%3D+N8&entry=gmail&source=g>
> nil(9) = N9 <https://maps.google.com/?q=9)+%3D+N9&entry=gmail&source=g>
> nil(10) = N10
> <https://maps.google.com/?q=10)+%3D+N10&entry=gmail&source=g>
> nil(11) = N11
> <https://maps.google.com/?q=11)+%3D+N11&entry=gmail&source=g>
> nil(12) = N12
> <https://maps.google.com/?q=12)+%3D+N12&entry=gmail&source=g>
>
> For o = 1 To 12
> If nil(o) > 0 Then en = o
> Next o
> For o = 1 To en
> kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12)
> mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10, N11, N12)
> For o = 1 To en
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNile = jen
> End Function
>
> Function DeskripsiNilai(Nama As String, N1 As Double, N2 As Double, N3 As
> Double, Optional N4 As Double, Optional N5 As Double, Optional n6 As
> Double) As String
> 'deskripsi nilai pengetahuan
> Dim nil(6) ' nilai
> Dim ko(6) ' kode
> Dim kd(6) 'nama aspek
> Dim j(6)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1 <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2 <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3 <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4 <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5 <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6 <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
>
> For o = 1 To 6
> kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6)
> mii = Application.Min(N1, N2, N3, N4, N5, n6)
> For o = 1 To 6
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNilai = jen
> End Function
>
>
>
> Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
> Oh begitu...
>
> Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut dan bukan
> di hasil akhir saat mau print saja ?
> Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi kenapa
> to ?
> Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk menulis
> laporan yang akan di-print saja.
>
>
>
>
>
> On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> iya pak, jadi nanti fungsi sheet cek nilai itu untuk menjumlahkan nilai
> agar menjadi nilai rapot, Nilai harian setiap kd dari ,masing masing mapel
> pertema semdiri sendiri, nilai pts(penilaian tengah semster), dan nilai pat
> ( penilaian akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat, nah
> nantinya nilai hasil dari itu menjadi nilai per kd yg sudah di tambah
> dengan nilai pat dan pas , setiap kd ada deskripsinya jadi nanti yg muncul
> adalah nilai akhir diambil dari rata-rata kd tsb dan deskripsi yg muncul
> diambil dari kd terendah dan tetinggi saja. seperti yg saya contohkan pak
> itu untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai pat dan
> pas, nah kalau bisa saya dibuatkan add in contoh kaya rumus terbilang tks
> sebelumnya
>
>
> Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
> Deskripsi juga diperiksa sudah masuk atau belum?
>
> Sent from my smart enough phone
>
> On Oct 23, 2017, at 09:43, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> untuk mempermudah pengecekan nilai tiap kd setiap siswa saja pak , jika
> langsung dimasukan hasil kahir atau nilai rapot nanti bapak.ibu guru yang
> input nilai tidak bisa mengetahui sudah masuk apa belum. karena masing
> masing guru sdm berbeda beda jadi saya buatkan yang mudah dipahami .
>
>
> Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
> Hai Susilo,
>
> Boleh tahu kenapa kok deskripsi dibuat langsung disebuah kolom untuk
> setiap siswa ?
> Apakah kebutuhannya akan memeriksa nilai sampai deskripsi setiap siswa
> oleh supervisornya ?
> Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai laporan per
> siswa ?
>
> Regards,
> Kid
>
>
>
>
>
>
> On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> [image: Jadikan gambar sebaris]
> Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya coba belum bisa
>
> Pada Kamis, 19 Oktober 2017 21:15, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > menulis:
>
>
>
>
> On 19/10/2017 11:56, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> ini pak, sya kirimkan contoh 1 mapel semua nya makimal paling banyak
> ada 12 kd ,,kalu bisa saya di buatkan add in pak dan juga cara memindakaan
> scrip UDF ke VBA yang ada di seet saya tks
>
>
> Pada Kamis, 19 Oktober 2017 11:39, "nangagus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups. com>
> <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Dear Susilo,
> COba kirim ulang filenya. Ingat peraturan milis: FIle tidak boleh lebih
> dari 250KB.
> Salam
> On 19/10/2017 07:29, Susilo Pratama pratama_susilo@yahoo.com
> [belajar-excel] wrote:
>
>
> Assalamualikum para master disini saya ingin ada kesulitan lagi, stelah
> kemarin saya di kasih contoh skrip vba udf dan mavcro tentang deskripsi
> kemudian saya coba masukan scrip pada aplilkasi saya namun belum bisa
> berjalan saya belum tau apa masalahnya , disini saya kirmkan aplikasi saya
> untuk penilaian k13 yang saya buat , saya mohon untuk di isikan scrip
> deskripsi pada cek nilai, dimana nilai yang muncul pada deskripsi hanya
> nilai tertinggi dan terendah saja , rentang nilai kurang 55 berarati D
> perlu pendampingan, 56-70 berarti C, 71-80 B 81-100 A, Jika berkenan para
> master bisa membuatkan add in untuk di masukan permanen jadi bisa di pakai
> di semua sheet terima kasih.
> Wassalamualikum
>
>
>
>
>
>
>
>
> <image.png>
>
>
>
>
>
>
>
>
>
>
>
Tue Oct 24, 2017 3:51 pm (PDT) . Posted by:
"nangagus"
Dear Bapak Susilo;
Sekedar Usulan pak...
File nilai anda sebaiknya hanya 8 sheet saja.
sheet1 untuk data
sheet2 untuk tabel referensi
sheet3 untuk input KI 1 dan KI 2 (sheet ini bisa digunakan untuk seluruh
mapel (28 mapel)karena sheet ini menyimpan datanya di sheet data)
sheet4 untuk input KI 3 (sheet ini bisa digunakan untuk seluruh mapel
(28 mapel))
sheet5 untuk input KI 4 (sheet ini bisa digunakan untuk seluruh mapel
(28 mapel))
Sheet6 untuk Report KI 3 (sheet ini bisa digunakan untuk seluruh mapel
(28 mapel)karena sheet ini membaca dari di sheet data)
sheet7 untuk Report KI 4 (sheet ini bisa digunakan untuk seluruh mapel
(28 mapel)
Sheet8 untuk Report NIlai Raport
atau mungkin lebih simpel lagi tidak dibedakan antara sheet input dan
sheet report,
maksudnya sheet input menjadi sekaligus sheet report (karena guru-guru
di sekolah saya masih gaptek seperti saya,
sehingga dibuat tidak banyak form) sehingga hanya dibutuhkan 5 sheet saja,
atau lebih bagus lagi kalau datanya disimpan di file lain.
Sebelum saya belajar excel bersama Mas Kid, Mas Dwint, Pak Hendrik, Mas
Aliif dan semua member B-excel lainnya, saya membuat
nilai untuk setiap KI dan kelas dibuat 1 sheet karena setiap data
langsung disimpan dalam form output seperti milik bapak susilo.
Total sebuah file nilai berisi 24 kelas X (KI12 + KI3 + KI4 ) X (input +
report) = 144 sheet dengan setiap sheet memiliki banyak
conditional formating dan format lainnya sehingga 1 file besarnya 5MB,
file tersebut terasa sangat lamban jika diisi.
(saya juga membayangkan file pak Susilo yang terdiri dari (sheet KI1&2,
sheetKI3, SheetKI4)X26 mapel=72 sheet)
Setelah data saya pisahkan, input dan report saya jadikan satu (total
hanya 5 sheet), maka besar filenya hanya 300KB (15 kali lebih kecil)
dan pengisiannyapun menjadi lebih cepat
Salam
NangAgus
On 24/10/2017 14:36, Susilo Pratama pratama_susilo@yahoo.com
[belajar-excel] wrote:
>
> Pada Selasa, 24 Oktober 2017 13:22, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
> Tinggal di link ke raport ?
> Kenapa deskripsi tidak dibuat di raport saja ?
> Kan jadi lebih mudah. Kalau deskripsi sudah dipaksakan dibuat di tabel
> data, jadi tidak efisien, karena kalimat deskripsi itu bukan data tapi
> suatu report. Report kok diletakkan di sheet data to..
>
> atau.. oh, ada banyak sheet raport sebanyak jumlah siswa ya... dan di
> raport itu tidak menampilkan nilai-nilainya lagi, tapi hanya satu
> kalimat desripsi saja...
> hmmm... beneran gak mudeng saya ini...
>
>
> imho,
> Biarkan saja daftar nilai tanpa deskripsi.
> Di sheet raport lah tempat dilakukan proses penyusunan deskripsi.
> Toh printout raportnya nanti satu per satu nama murid bukan ?
>
> Guru yang input nilai pun gak akan peduli dengan bunyi deskripsi di
> tabel data. Yang dibutuhkan si guru cuma memastikan nilai-nilai sudah
> masuk di tabel data.
> Setelah itu si guru mulai menyusun raport di sheet lain, satu per satu
> untuk setiap muridnya si guru.
> Proses menyusun raport di sheet lain ini yang kemudian dibantu dengan
> menyusunkan deskripsi.
> Jadi, beban Excel jadi lebih rendah, proses lebih efisien, dan mudah
> dikembangkan suatu saat nanti.
>
> Setahu saya, tidak ada record transaksi perusahaan yang perlu di cetak
> kuitansi dengan bunyi *terbilang*, sudah menyimpan hasil deskripsi
> *terbilang *dalam datanya.
> Yang ada itu, semua data TANPA deskripsi terbilang, ada di suatu sheet
> data terpisah.
> Lalu ada sheet lain bernama FORM CETAK KUITANSI yang isinya mengambil
> nilai data dari sheet data,
> lalu di sheet form cetak kuitansi tersebut, dengan nilai data yang
> sudah diambil tersebut, dilakukan penyusunan deskripsi *terbilang*.
> Kalau pakai UDF terbilang, maka UDF terbilang dipakai di sheet FORM
> CETAK KUITANSI tok til, bukan malah di sheet data.
>
> btw, it's just my 2cents
>
> ---------
>
> untuk UDF yang akan Anda pakai tersebut, hilangkan saja rujukan ke
> sheet tertentu, agar merujuk ke sheet yang sama dengan lokasi sheet
> yang pakai UDF.
>
> Regards,
> Kid
>
>
>
> 2017-10-24 12:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com
> <mailto:pratama_susilo@yahoo.com> [belajar-excel]
> <belajar-excel@yahoogroups.com <mailto:belajar-excel@yahoogroups.com>>:
>
> 1. iya pak , nanti hasil deskripsi tinggal di link ke rapot
> 2. kalau no dan nama masuknya ananda , nama,baru nilai
> 3. iya pak,saya pengin scrip deskripsi ini bisa di pakai d semua
> sheet
> jika saya copykan scrip udf deskripsi ini ke sheet lain apakah
> saya cukup merubah nama sheet misal di contohkan nama sheet 1,
> jika saya copy di sheet saya yg misal sheet 35 saya cukup rubah
> itu saja atau ada coding lain yg di ganti tks? maaf banyak tanya heee
>
> Function DeskripsiNile(Nama As String, N1 As Integer, N2 As
> Integer, N3 As Integer, Optional N4 As Integer, Optional N5 As
> Integer, Optional n6 As Integer, Optional N7 As Integer, Optional
> N8 As Integer, Optional N9 As Integer, Optional N10 As Integer,
> Optional N11 As Integer, Optional N12 As Integer) As String
> 'deskripsi nilai pengetahuan
> Dim nil(12) ' nilai
> Dim ko(12) ' kode
> Dim kd(12) 'nama aspek
> Dim j(12)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1
> <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2
> <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3
> <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4
> <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5
> <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6
> <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
> nil(7) = N7
> nil(8) = N8
> <https://maps.google.com/?q=8)+%3D+N8&entry=gmail&source=g>
> nil(9) = N9
> <https://maps.google.com/?q=9)+%3D+N9&entry=gmail&source=g>
> nil(10) = N10
> <https://maps.google.com/?q=10)+%3D+N10&entry=gmail&source=g>
> nil(11) = N11
> <https://maps.google.com/?q=11)+%3D+N11&entry=gmail&source=g>
> nil(12) = N12
> <https://maps.google.com/?q=12)+%3D+N12&entry=gmail&source=g>
>
> For o = 1 To 12
> If nil(o) > 0 Then en = o
> Next o
> For o = 1 To en
> kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10,
> N11, N12)
> mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10,
> N11, N12)
> For o = 1 To en
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNile = jen
> End Function
>
> Function DeskripsiNilai(Nama As String, N1 As Double, N2 As
> Double, N3 As Double, Optional N4 As Double, Optional N5 As
> Double, Optional n6 As Double) As String
> 'deskripsi nilai pengetahuan
> Dim nil(6) ' nilai
> Dim ko(6) ' kode
> Dim kd(6) 'nama aspek
> Dim j(6)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1
> <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2
> <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3
> <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4
> <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5
> <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6
> <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
>
> For o = 1 To 6
> kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6)
> mii = Application.Min(N1, N2, N3, N4, N5, n6)
> For o = 1 To 6
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNilai = jen
> End Function
>
>
>
> Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com
> <mailto:mr.nmkid@gmail.com> [belajar-excel]"
> <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com> > menulis:
>
>
> Oh begitu...
>
> Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut
> dan bukan di hasil akhir saat mau print saja ?
> Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi
> kenapa to ?
> Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk
> menulis laporan yang akan di-print saja.
>
>
>
>
>
> On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama
> pratama_susilo@yahoo.com <mailto:pratama_susilo@yahoo.com>
> [belajar-excel] <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com> > wrote:
>
> iya pak, jadi nanti fungsi sheet cek nilai itu untuk
> menjumlahkan nilai agar menjadi nilai rapot, Nilai harian
> setiap kd dari ,masing masing mapel pertema semdiri sendiri,
> nilai pts(penilaian tengah semster), dan nilai pat ( penilaian
> akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat,
> nah nantinya nilai hasil dari itu menjadi nilai per kd yg
> sudah di tambah dengan nilai pat dan pas , setiap kd ada
> deskripsinya jadi nanti yg muncul adalah nilai akhir diambil
> dari rata-rata kd tsb dan deskripsi yg muncul diambil dari kd
> terendah dan tetinggi saja. seperti yg saya contohkan pak itu
> untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai
> pat dan pas, nah kalau bisa saya dibuatkan add in contoh kaya
> rumus terbilang tks sebelumnya
>
>
> Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid'
> mr.nmkid@gmail.com <mailto:mr.nmkid@gmail.com>
> [belajar-excel]" <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com> > menulis:
>
>
> Deskripsi juga diperiksa sudah masuk atau belum?
>
> Sent from my smart enough phone
>
> On Oct 23, 2017, at 09:43, Susilo Pratama
> pratama_susilo@yahoo.com <mailto:pratama_susilo@yahoo.com>
> [belajar-excel] <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com> > wrote:
>
>> untuk mempermudah pengecekan nilai tiap kd setiap siswa saja
>> pak , jika langsung dimasukan hasil kahir atau nilai rapot
>> nanti bapak.ibu guru yang input nilai tidak bisa mengetahui
>> sudah masuk apa belum. karena masing masing guru sdm berbeda
>> beda jadi saya buatkan yang mudah dipahami .
>>
>>
>> Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid'
>> mr.nmkid@gmail.com <mailto:mr.nmkid@gmail.com>
>> [belajar-excel]" <belajar-excel@yahoogroups.com
>> <mailto:belajar-excel@yahoogroups.com> > menulis:
>>
>>
>> Hai Susilo,
>>
>> Boleh tahu kenapa kok deskripsi dibuat langsung disebuah
>> kolom untuk setiap siswa ?
>> Apakah kebutuhannya akan memeriksa nilai sampai deskripsi
>> setiap siswa oleh supervisornya ?
>> Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai
>> laporan per siswa ?
>>
>> Regards,
>> Kid
>>
>>
>>
>>
>>
>>
>> On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama
>> pratama_susilo@yahoo.com <mailto:pratama_susilo@yahoo.com>
>> [belajar-excel] <belajar-excel@yahoogroups.com
>> <mailto:belajar-excel@yahoogroups.com> > wrote:
>>
>> Jadikan gambar sebaris
>> Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya
>> coba belum bisa
>>
>> Pada Kamis, 19 Oktober 2017 21:15, "nangagus
>> nangagus@gmail.com <mailto:nangagus@gmail.com>
>> [belajar-excel]" <belajar-excel@yahoogroups.com
>> <mailto:belajar-excel@yahoogroups.com> > menulis:
>>
>>
>>
>> On 19/10/2017 11:56, Susilo Pratama
>> pratama_susilo@yahoo.com
>> <mailto:pratama_susilo@yahoo.com> [belajar-excel] wrote:
>>> ini pak, sya kirimkan contoh 1 mapel semua nya makimal
>>> paling banyak ada 12 kd ,,kalu bisa saya di buatkan add
>>> in pak dan juga cara memindakaan scrip UDF ke VBA yang
>>> ada di seet saya tks
>>>
>>>
>>> Pada Kamis, 19 Oktober 2017 11:39, "nangagus
>>> nangagus@gmail.com <mailto:nangagus@gmail.com>
>>> [belajar-excel]" <belajar-excel@yahoogroups. com>
>>> <mailto:belajar-excel@yahoogroups.com> menulis:
>>>
>>>
>>> Dear Susilo,
>>> COba kirim ulang filenya. Ingat peraturan milis: FIle
>>> tidak boleh lebih dari 250KB.
>>> Salam
>>> On 19/10/2017 07:29, Susilo Pratama
>>> pratama_susilo@yahoo.com
>>> <mailto:pratama_susilo@yahoo.com> [belajar-excel] wrote:
>>>> Assalamualikum para master disini saya ingin ada
>>>> kesulitan lagi, stelah kemarin saya di kasih contoh
>>>> skrip vba udf dan mavcro tentang deskripsi kemudian
>>>> saya coba masukan scrip pada aplilkasi saya namun belum
>>>> bisa berjalan saya belum tau apa masalahnya , disini
>>>> saya kirmkan aplikasi saya untuk penilaian k13 yang
>>>> saya buat , saya mohon untuk di isikan scrip deskripsi
>>>> pada cek nilai, dimana nilai yang muncul pada deskripsi
>>>> hanya nilai tertinggi dan terendah saja , rentang
>>>> nilai kurang 55 berarati D perlu pendampingan, 56-70
>>>> berarti C, 71-80 B 81-100 A, Jika berkenan para master
>>>> bisa membuatkan add in untuk di masukan permanen jadi
>>>> bisa di pakai di semua sheet terima kasih.
>>>> Wassalamualikum
>>>
>>>
>>
>>
>>
>>
>>
>> <image.png>
>
>
>
>
>
>
>
>
>
Sekedar Usulan pak...
File nilai anda sebaiknya hanya 8 sheet saja.
sheet1 untuk data
sheet2 untuk tabel referensi
sheet3 untuk input KI 1 dan KI 2 (sheet ini bisa digunakan untuk seluruh
mapel (28 mapel)karena sheet ini menyimpan datanya di sheet data)
sheet4 untuk input KI 3 (sheet ini bisa digunakan untuk seluruh mapel
(28 mapel))
sheet5 untuk input KI 4 (sheet ini bisa digunakan untuk seluruh mapel
(28 mapel))
Sheet6 untuk Report KI 3 (sheet ini bisa digunakan untuk seluruh mapel
(28 mapel)karena sheet ini membaca dari di sheet data)
sheet7 untuk Report KI 4 (sheet ini bisa digunakan untuk seluruh mapel
(28 mapel)
Sheet8 untuk Report NIlai Raport
atau mungkin lebih simpel lagi tidak dibedakan antara sheet input dan
sheet report,
maksudnya sheet input menjadi sekaligus sheet report (karena guru-guru
di sekolah saya masih gaptek seperti saya,
sehingga dibuat tidak banyak form) sehingga hanya dibutuhkan 5 sheet saja,
atau lebih bagus lagi kalau datanya disimpan di file lain.
Sebelum saya belajar excel bersama Mas Kid, Mas Dwint, Pak Hendrik, Mas
Aliif dan semua member B-excel lainnya, saya membuat
nilai untuk setiap KI dan kelas dibuat 1 sheet karena setiap data
langsung disimpan dalam form output seperti milik bapak susilo.
Total sebuah file nilai berisi 24 kelas X (KI12 + KI3 + KI4 ) X (input +
report) = 144 sheet dengan setiap sheet memiliki banyak
conditional formating dan format lainnya sehingga 1 file besarnya 5MB,
file tersebut terasa sangat lamban jika diisi.
(saya juga membayangkan file pak Susilo yang terdiri dari (sheet KI1&2,
sheetKI3, SheetKI4)X26 mapel=72 sheet)
Setelah data saya pisahkan, input dan report saya jadikan satu (total
hanya 5 sheet), maka besar filenya hanya 300KB (15 kali lebih kecil)
dan pengisiannyapun menjadi lebih cepat
Salam
NangAgus
On 24/10/2017 14:36, Susilo Pratama pratama_susilo@yahoo.com
[belajar-excel] wrote:
>
> Pada Selasa, 24 Oktober 2017 13:22, "'Mr. Kid' mr.nmkid@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
> Tinggal di link ke raport ?
> Kenapa deskripsi tidak dibuat di raport saja ?
> Kan jadi lebih mudah. Kalau deskripsi sudah dipaksakan dibuat di tabel
> data, jadi tidak efisien, karena kalimat deskripsi itu bukan data tapi
> suatu report. Report kok diletakkan di sheet data to..
>
> atau.. oh, ada banyak sheet raport sebanyak jumlah siswa ya... dan di
> raport itu tidak menampilkan nilai-nilainya lagi, tapi hanya satu
> kalimat desripsi saja...
> hmmm... beneran gak mudeng saya ini...
>
>
> imho,
> Biarkan saja daftar nilai tanpa deskripsi.
> Di sheet raport lah tempat dilakukan proses penyusunan deskripsi.
> Toh printout raportnya nanti satu per satu nama murid bukan ?
>
> Guru yang input nilai pun gak akan peduli dengan bunyi deskripsi di
> tabel data. Yang dibutuhkan si guru cuma memastikan nilai-nilai sudah
> masuk di tabel data.
> Setelah itu si guru mulai menyusun raport di sheet lain, satu per satu
> untuk setiap muridnya si guru.
> Proses menyusun raport di sheet lain ini yang kemudian dibantu dengan
> menyusunkan deskripsi.
> Jadi, beban Excel jadi lebih rendah, proses lebih efisien, dan mudah
> dikembangkan suatu saat nanti.
>
> Setahu saya, tidak ada record transaksi perusahaan yang perlu di cetak
> kuitansi dengan bunyi *terbilang*, sudah menyimpan hasil deskripsi
> *terbilang *dalam datanya.
> Yang ada itu, semua data TANPA deskripsi terbilang, ada di suatu sheet
> data terpisah.
> Lalu ada sheet lain bernama FORM CETAK KUITANSI yang isinya mengambil
> nilai data dari sheet data,
> lalu di sheet form cetak kuitansi tersebut, dengan nilai data yang
> sudah diambil tersebut, dilakukan penyusunan deskripsi *terbilang*.
> Kalau pakai UDF terbilang, maka UDF terbilang dipakai di sheet FORM
> CETAK KUITANSI tok til, bukan malah di sheet data.
>
> btw, it's just my 2cents
>
> ---------
>
> untuk UDF yang akan Anda pakai tersebut, hilangkan saja rujukan ke
> sheet tertentu, agar merujuk ke sheet yang sama dengan lokasi sheet
> yang pakai UDF.
>
> Regards,
> Kid
>
>
>
> 2017-10-24 12:27 GMT+07:00 Susilo Pratama pratama_susilo@yahoo.com
> <mailto:pratama_susilo@yahoo.com> [belajar-excel]
> <belajar-excel@yahoogroups.com <mailto:belajar-excel@yahoogroups.com>>:
>
> 1. iya pak , nanti hasil deskripsi tinggal di link ke rapot
> 2. kalau no dan nama masuknya ananda , nama,baru nilai
> 3. iya pak,saya pengin scrip deskripsi ini bisa di pakai d semua
> sheet
> jika saya copykan scrip udf deskripsi ini ke sheet lain apakah
> saya cukup merubah nama sheet misal di contohkan nama sheet 1,
> jika saya copy di sheet saya yg misal sheet 35 saya cukup rubah
> itu saja atau ada coding lain yg di ganti tks? maaf banyak tanya heee
>
> Function DeskripsiNile(Nama As String, N1 As Integer, N2 As
> Integer, N3 As Integer, Optional N4 As Integer, Optional N5 As
> Integer, Optional n6 As Integer, Optional N7 As Integer, Optional
> N8 As Integer, Optional N9 As Integer, Optional N10 As Integer,
> Optional N11 As Integer, Optional N12 As Integer) As String
> 'deskripsi nilai pengetahuan
> Dim nil(12) ' nilai
> Dim ko(12) ' kode
> Dim kd(12) 'nama aspek
> Dim j(12)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1
> <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2
> <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3
> <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4
> <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5
> <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6
> <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
> nil(7) = N7
> nil(8) = N8
> <https://maps.google.com/?q=8)+%3D+N8&entry=gmail&source=g>
> nil(9) = N9
> <https://maps.google.com/?q=9)+%3D+N9&entry=gmail&source=g>
> nil(10) = N10
> <https://maps.google.com/?q=10)+%3D+N10&entry=gmail&source=g>
> nil(11) = N11
> <https://maps.google.com/?q=11)+%3D+N11&entry=gmail&source=g>
> nil(12) = N12
> <https://maps.google.com/?q=12)+%3D+N12&entry=gmail&source=g>
>
> For o = 1 To 12
> If nil(o) > 0 Then en = o
> Next o
> For o = 1 To en
> kd(o) = Sheets("Sheet1").Cells(6, 23 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10,
> N11, N12)
> mii = Application.Min(N1, N2, N3, N4, N5, n6, N7, N8, N9, N10,
> N11, N12)
> For o = 1 To en
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNile = jen
> End Function
>
> Function DeskripsiNilai(Nama As String, N1 As Double, N2 As
> Double, N3 As Double, Optional N4 As Double, Optional N5 As
> Double, Optional n6 As Double) As String
> 'deskripsi nilai pengetahuan
> Dim nil(6) ' nilai
> Dim ko(6) ' kode
> Dim kd(6) 'nama aspek
> Dim j(6)
> Dim mi As Integer
> Dim ma As Integer
> Dim maa As Double
> Dim mii As Double
> Dim o As Integer
> Dim jen As String
> Dim has As String
> Dim rg As String
> Dim ba As Integer
> Dim en As Integer
> nil(1) = N1
> <https://maps.google.com/?q=1)+%3D+N1&entry=gmail&source=g>
> nil(2) = N2
> <https://maps.google.com/?q=2)+%3D+N2&entry=gmail&source=g>
> nil(3) = N3
> <https://maps.google.com/?q=3)+%3D+N3&entry=gmail&source=g>
> nil(4) = N4
> <https://maps.google.com/?q=4)+%3D+N4&entry=gmail&source=g>
> nil(5) = N5
> <https://maps.google.com/?q=5)+%3D+N5&entry=gmail&source=g>
> nil(6) = n6
> <https://maps.google.com/?q=6)+%3D+n6&entry=gmail&source=g>
>
> For o = 1 To 6
> kd(o) = Sheets("Sheet1").Cells(6, 13 + o) & ", "
> Next o
> jen = ""
> If N1 = 0 Or N2 = 0 Or N3 = 0 Then Exit Function
> has = "Ananda " & Nama & " baik dalam KD "
> maa = Application.Max(N1, N2, N3, N4, N5, n6)
> mii = Application.Min(N1, N2, N3, N4, N5, n6)
> For o = 1 To 6
> ko(o) = 0
> If nil(o) = maa Then ma = o
> If nil(o) = mii Then mi = o
> Next o
> 'MsgBox mi
>
> jen = has & kd(ma)
>
> jen = jen & " perlu pendampingan dalam KD " & kd(mi)
> DeskripsiNilai = jen
> End Function
>
>
>
> Pada Selasa, 24 Oktober 2017 12:14, "'Mr. Kid' mr.nmkid@gmail.com
> <mailto:mr.nmkid@gmail.com> [belajar-excel]"
> <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com> > menulis:
>
>
> Oh begitu...
>
> Sebegitu pentingnya si deskripsi langsung ada di sheet tersebut
> dan bukan di hasil akhir saat mau print saja ?
> Kalau sheet daftar nama dan nilai itu tidak pakai kolom deskripsi
> kenapa to ?
> Bukankah UDF terbilang pun biasanya digunakan dihasil akhir untuk
> menulis laporan yang akan di-print saja.
>
>
>
>
>
> On Tue, Oct 24, 2017 at 7:10 AM, Susilo Pratama
> pratama_susilo@yahoo.com <mailto:pratama_susilo@yahoo.com>
> [belajar-excel] <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com> > wrote:
>
> iya pak, jadi nanti fungsi sheet cek nilai itu untuk
> menjumlahkan nilai agar menjadi nilai rapot, Nilai harian
> setiap kd dari ,masing masing mapel pertema semdiri sendiri,
> nilai pts(penilaian tengah semster), dan nilai pat ( penilaian
> akhir semster) di jumlahkan dengan rumus 2x nh + pts + pat,
> nah nantinya nilai hasil dari itu menjadi nilai per kd yg
> sudah di tambah dengan nilai pat dan pas , setiap kd ada
> deskripsinya jadi nanti yg muncul adalah nilai akhir diambil
> dari rata-rata kd tsb dan deskripsi yg muncul diambil dari kd
> terendah dan tetinggi saja. seperti yg saya contohkan pak itu
> untuk penilai pengetahuan atau KI3 kalau KI 4 itu tanpa nilai
> pat dan pas, nah kalau bisa saya dibuatkan add in contoh kaya
> rumus terbilang tks sebelumnya
>
>
> Pada Senin, 23 Oktober 2017 12:00, "'Mr. Kid'
> mr.nmkid@gmail.com <mailto:mr.nmkid@gmail.com>
> [belajar-excel]" <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com> > menulis:
>
>
> Deskripsi juga diperiksa sudah masuk atau belum?
>
> Sent from my smart enough phone
>
> On Oct 23, 2017, at 09:43, Susilo Pratama
> pratama_susilo@yahoo.com <mailto:pratama_susilo@yahoo.com>
> [belajar-excel] <belajar-excel@yahoogroups.com
> <mailto:belajar-excel@yahoogroups.com> > wrote:
>
>> untuk mempermudah pengecekan nilai tiap kd setiap siswa saja
>> pak , jika langsung dimasukan hasil kahir atau nilai rapot
>> nanti bapak.ibu guru yang input nilai tidak bisa mengetahui
>> sudah masuk apa belum. karena masing masing guru sdm berbeda
>> beda jadi saya buatkan yang mudah dipahami .
>>
>>
>> Pada Jumat, 20 Oktober 2017 19:12, "'Mr. Kid'
>> mr.nmkid@gmail.com <mailto:mr.nmkid@gmail.com>
>> [belajar-excel]" <belajar-excel@yahoogroups.com
>> <mailto:belajar-excel@yahoogroups.com> > menulis:
>>
>>
>> Hai Susilo,
>>
>> Boleh tahu kenapa kok deskripsi dibuat langsung disebuah
>> kolom untuk setiap siswa ?
>> Apakah kebutuhannya akan memeriksa nilai sampai deskripsi
>> setiap siswa oleh supervisornya ?
>> Ataukah maksudnya untuk mempermudah saat akan dicetak sebagai
>> laporan per siswa ?
>>
>> Regards,
>> Kid
>>
>>
>>
>>
>>
>>
>> On Fri, Oct 20, 2017 at 4:12 PM, Susilo Pratama
>> pratama_susilo@yahoo.com <mailto:pratama_susilo@yahoo.com>
>> [belajar-excel] <belajar-excel@yahoogroups.com
>> <mailto:belajar-excel@yahoogroups.com> > wrote:
>>
>> Jadikan gambar sebaris
>> Maaf pak untuk yang KI 4 belum ada rumusnya apa yah saya
>> coba belum bisa
>>
>> Pada Kamis, 19 Oktober 2017 21:15, "nangagus
>> nangagus@gmail.com <mailto:nangagus@gmail.com>
>> [belajar-excel]" <belajar-excel@yahoogroups.com
>> <mailto:belajar-excel@yahoogroups.com> > menulis:
>>
>>
>>
>> On 19/10/2017 11:56, Susilo Pratama
>> pratama_susilo@yahoo.com
>> <mailto:pratama_susilo@yahoo.com> [belajar-excel] wrote:
>>> ini pak, sya kirimkan contoh 1 mapel semua nya makimal
>>> paling banyak ada 12 kd ,,kalu bisa saya di buatkan add
>>> in pak dan juga cara memindakaan scrip UDF ke VBA yang
>>> ada di seet saya tks
>>>
>>>
>>> Pada Kamis, 19 Oktober 2017 11:39, "nangagus
>>> nangagus@gmail.com <mailto:nangagus@gmail.com>
>>> [belajar-excel]" <belajar-excel@yahoogroups. com>
>>> <mailto:belajar-excel@yahoogroups.com> menulis:
>>>
>>>
>>> Dear Susilo,
>>> COba kirim ulang filenya. Ingat peraturan milis: FIle
>>> tidak boleh lebih dari 250KB.
>>> Salam
>>> On 19/10/2017 07:29, Susilo Pratama
>>> pratama_susilo@yahoo.com
>>> <mailto:pratama_susilo@yahoo.com> [belajar-excel] wrote:
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>
>>
>>
>>
>>
>> <image.png>
>
>
>
>
>
>
>
>
>
Tue Oct 24, 2017 12:44 am (PDT) . Posted by:
"Zulfikar N"
Dear Master Excel,
Mohon bantuannya untuk case excel terlampir, cara untuk menampilkan data
tanpa duplikat berdasarkan kriteria tanggal.
Terima kasih sebelumnya.
salam
*Zulfikar, Palopo, Sul-sel*
Mohon bantuannya untuk case excel terlampir, cara untuk menampilkan data
tanpa duplikat berdasarkan kriteria tanggal.
Terima kasih sebelumnya.
salam
*Zulfikar, Palopo, Sul-sel*
Tue Oct 24, 2017 2:11 am (PDT) . Posted by:
"Sony Ario"
Halo Zulfikar,
Mungkin bisa dengan Pivot di sheet "Revisi" ?
Maaf kalau belum sesuai ya ?
*gnl-excelinfo.blogspot.co.id <http://gnl-excelinfo.blogspot.co.id>*
2017-10-24 14:02 GMT+07:00 Zulfikar N bengbeng.beatles@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Dear Master Excel,
> Mohon bantuannya untuk case excel terlampir, cara untuk menampilkan data
> tanpa duplikat berdasarkan kriteria tanggal.
>
> Terima kasih sebelumnya.
>
> salam
>
> *Zulfikar, Palopo, Sul-sel*
>
>
>
Mungkin bisa dengan Pivot di sheet "Revisi" ?
Maaf kalau belum sesuai ya ?
*gnl-excelinfo.blogspot.co.id <http://gnl-excelinfo.blogspot.co.id>*
2017-10-24 14:02 GMT+07:00 Zulfikar N bengbeng.beatles@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Dear Master Excel,
> Mohon bantuannya untuk case excel terlampir, cara untuk menampilkan data
> tanpa duplikat berdasarkan kriteria tanggal.
>
> Terima kasih sebelumnya.
>
> salam
>
> *Zulfikar, Palopo, Sul-sel*
>
>
>
Tue Oct 24, 2017 2:53 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Zulfikar,
Pivot Table bisa membantu. Seperti terlampir.
Silakan pelajari tentang Excel Table jika ingin pivot table menjadi lebih
dinamis dalam mengambil data.
Silakan pelajari tentang Excel Pivot Table jika ingin memanipulasi tampilan
pivot table.
Regards,
Kid
2017-10-24 14:02 GMT+07:00 Zulfikar N bengbeng.beatles@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Dear Master Excel,
> Mohon bantuannya untuk case excel terlampir, cara untuk menampilkan data
> tanpa duplikat berdasarkan kriteria tanggal.
>
> Terima kasih sebelumnya.
>
> salam
>
> *Zulfikar, Palopo, Sul-sel*
>
>
>
Pivot Table bisa membantu. Seperti terlampir.
Silakan pelajari tentang Excel Table jika ingin pivot table menjadi lebih
dinamis dalam mengambil data.
Silakan pelajari tentang Excel Pivot Table jika ingin memanipulasi tampilan
pivot table.
Regards,
Kid
2017-10-24 14:02 GMT+07:00 Zulfikar N bengbeng.beatles@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Dear Master Excel,
> Mohon bantuannya untuk case excel terlampir, cara untuk menampilkan data
> tanpa duplikat berdasarkan kriteria tanggal.
>
> Terima kasih sebelumnya.
>
> salam
>
> *Zulfikar, Palopo, Sul-sel*
>
>
>
Tue Oct 24, 2017 6:22 am (PDT) . Posted by:
"nangagus"
Dear Zulfikar;
Coba di H4 diketik formula:
Cara 1.
=LOOKUP(2;
1/(((COUNTIF($G4:G$4;$D$5:$D$22)=0)*(COUNTIF($D$5:$D$22;$D$5:$D$22)>1)));
$D$5:$D$22)
copy formula tersebut sampai P4.
Cara 2.
=IFERROR(INDEX($D$5:$D$22; MATCH(0;COUNTIF(G4:$G$4;$D$5:$D$22);0));"")
ini merupakan formula array, jadi cara memasukkannya dengan tombol Ctrl
+ Shift + Enter
Untuk Cell G5, silahkan dicoba sendiri.
Salam
NangAgus
On 24/10/2017 14:02, Zulfikar N bengbeng.beatles@gmail.com
[belajar-excel] wrote:
> Dear Master Excel,
> Mohon bantuannya untuk case excel terlampir, cara untuk menampilkan
> data tanpa duplikat berdasarkan kriteria tanggal.
>
> Terima kasih sebelumnya.
>
> salam
>
> /Zulfikar, Palopo, Sul-sel/
>
>
Coba di H4 diketik formula:
Cara 1.
=LOOKUP(2;
1/(((COUNTIF($G4:G$4;$D$5:$D$22)=0)*(COUNTIF($D$5:$D$22;$D$5:$D$22)>1)));
$D$5:$D$22)
copy formula tersebut sampai P4.
Cara 2.
=IFERROR(INDEX($D$5:$D$22; MATCH(0;COUNTIF(G4:$G$4;$D$5:$D$22);0));"")
ini merupakan formula array, jadi cara memasukkannya dengan tombol Ctrl
+ Shift + Enter
Untuk Cell G5, silahkan dicoba sendiri.
Salam
NangAgus
On 24/10/2017 14:02, Zulfikar N bengbeng.beatles@gmail.com
[belajar-excel] wrote:
> Dear Master Excel,
> Mohon bantuannya untuk case excel terlampir, cara untuk menampilkan
> data tanpa duplikat berdasarkan kriteria tanggal.
>
> Terima kasih sebelumnya.
>
> salam
>
> /Zulfikar, Palopo, Sul-sel/
>
>
============================================================
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