5 Messages
Digest #4543
1c
Re: Fw: Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexc by "hendrik karnadi" hendrikkarnadi
Messages
Thu Jul 12, 2018 11:05 pm (PDT) . Posted by:
"Ade Chandra"
maaf pak HK, saya kembali bertanya lagi ini.
setelah sebelumnya pertanyaan yang saya tanyakan sudah terjawab dan sesuai
dengan keinginan, sekarang muncul pertanyaan lagi .
bagaimana cara menampilkan data dengan beberapa kriteria, dari sheet
database kedalam sheet tampil (KHS) ?
berikut saya lampirkan contoh filenya.
Terima Kasih
2018-06-21 13:23 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Maaf, krn range yang dicopy harus fleksibel, maka ubah saja codenya
> menjadi seperti ini:
>
> Sub KOPI()
> ' Copy Data dari Sheet Input_KRS Range B1:B3
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom A dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp).Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Tambahan*
> *ActiveCell.Resize(1, 3).Copy*
> * ActiveCell.Offset(1, 0).Resize(11, 3).Select*
> * ActiveSheet.Paste*
> * Application.CutCopyMode = False*
> ' Copy Data dari Sheet Input_KRS Range B4:B15
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom D dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp).Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> End Sub
>
> Semoga sesuai kebutuhan.
>
> *Catatan : Warna Merah adalah Code tambahan untuk mengcopy Sel A.. sd C..*
>
> Salam,
> HK
>
>
>
> ----- Forwarded message -----
> *From:* hendrik karnadi <hendrikkarnadi@yahoo.com>
> *To:* belajar-excel@yahoogroups.com <belajar-excel@yahoogroups.com>
> *Sent:* Thursday, 21 June 2018, 6:44:30 AM GMT+7
> *Subject:* Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel
>
> Jalankan Macro.
> Kemudian coba buat rekaman macro untuk mangcopy data sel A1 sd C1 (sorot
> cel A1 sd C1, lihat tanda + pada bag kanan bawah sel C1 dan double click
> mouse).
> Lalu tambahkan codenya (tanpa Sub dan End Sub) pada bagian akhir macro
> sebelumnya (sebelum End Sub).
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 21, 2018 at 4:03, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com> wrote:
>
>
> Maaf pak Hendrik...
> Sedikit perubahan lagi....
>
> kalau data semester, nama, nim, mengikuti jumlah mata kuliah yang diambil,
> bagaimana sourcecode modulnya ?
> kalau yang mata kuliah 1 - mata kuliah 12, sudah sesuai dengan harapan...
> soalnya saya kesulitan di pemanggilan datanya, kalau data semester, nama,
> dan nim tidak mengikuti jumlah mata kuliah.
>
>
> kalau data yang masuk database seperti file yang saya lampirkan berikut,
> bisa kah tidak ?
>
> Terima Kasih.
>
> 2018-06-19 11:45 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
> Hai Ade,
>
> Coba copas macro ini pada VBE Sheet Module1,
> Sub KOPI()
> *' Copy Data dari Sheet Input_KRS Range B1:B3*
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom A dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Copy Data dari Sheet Input_KRS Range B4:B15*
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom D dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> Application.CutCopyMode = False
> End Sub
>
> Ini adalah modifikasi hasil rekaman macro.
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 19 June 2018, 6:01:30 AM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Selamat pagi pak Hendrik Karnadi.
> Sebelumnya saya minta maaf, kalau terlambat balas email bapak.
>
> saya sudah coba ganti field-nya sesuai dengan yang saya inginkan, memang
> input datanya vertikal kebawah, tetapi begitu masuk ke sheet database
> (DBInput), datanya menjadi horisontal.
> maksud saya itu, data inputan yang vertikal tadi, begitu masuk sheet
> database (DBInput) datanya tetap vertikal....
>
> mohon maaf pak, sekali lagi saya katakan kalau saya tidak ada maksud untuk
> tes pak Hendrik, tapi saya memang benar2 tidak bisa..
> dan saya berharap pak Hendrik, mau dan tidak bosan mengajari saya...
>
> TERIMA KASIH
>
> berikut saya lampirkan contoh data yang saya harapkan...
>
>
> On Thu, Jun 14, 2018 at 7:50 PM, hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Prinsipnya 1 semester kan 1 x input,
> Inputnya vertikal ke bwh dan hasilnya di transpose ke Database.
> Coba ganti Field1, Field2, dst.nya pada Sheet Design dengan judul2 kolom
> yang diinginkan,
> Nama, NIM, Mata Kuliah 1 -12. Hapus Field yang tidak terpakai.
>
> Setelah itu jalankan/tes "petunjuk" yang ada pada VBE Sheet.
>
> Walaupun format/tombolnya tidak sama dengan yang diminta namun seharusnya
> hasilnya sdh mendekati apa yang diinginkan.
>
> Silakan dicoba dulu (tanpa harus mengganti codingnya).
>
> Hasilnya dishare ke grup untuk dibahas dan diganti codingnya apabila perlu.
>
> Seperti pernah disampaikan oleh Mr. Kid,
> disini kan forum Belajar Excel....jadi solusi yang diberikan umumnya bukan
> program jadi yang siap pakai, seperti yang diinginkan oleh penanya.
>
> Mudah2an jawaban saya bisa diterima dengan hati yang lapang dan kalau ada
> kata2 yang salah mohon dimaafkan....
>
> Salam,
> Hendrik Karnadi
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau)....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus....
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau)....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus...
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> <hendrikkarnadi@yahoo..com> [belajar-excel]" <
> belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
>
>
>
setelah sebelumnya pertanyaan yang saya tanyakan sudah terjawab dan sesuai
dengan keinginan, sekarang muncul pertanyaan lagi .
bagaimana cara menampilkan data dengan beberapa kriteria, dari sheet
database kedalam sheet tampil (KHS) ?
berikut saya lampirkan contoh filenya.
Terima Kasih
2018-06-21 13:23 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Maaf, krn range yang dicopy harus fleksibel, maka ubah saja codenya
> menjadi seperti ini:
>
> Sub KOPI()
> ' Copy Data dari Sheet Input_KRS Range B1:B3
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom A dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp).Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Tambahan*
> *ActiveCell.Resize(1, 3).Copy*
> * ActiveCell.Offset(1, 0).Resize(11, 3).Select*
> * ActiveSheet.Paste*
> * Application.CutCopyMode = False*
> ' Copy Data dari Sheet Input_KRS Range B4:B15
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom D dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp).Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> End Sub
>
> Semoga sesuai kebutuhan.
>
> *Catatan : Warna Merah adalah Code tambahan untuk mengcopy Sel A.. sd C..*
>
> Salam,
> HK
>
>
>
> ----- Forwarded message -----
> *From:* hendrik karnadi <hendrikkarnadi@yahoo.com>
> *To:* belajar-excel@yahoogroups.com <belajar-excel@yahoogroups.com>
> *Sent:* Thursday, 21 June 2018, 6:44:30 AM GMT+7
> *Subject:* Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel
>
> Jalankan Macro.
> Kemudian coba buat rekaman macro untuk mangcopy data sel A1 sd C1 (sorot
> cel A1 sd C1, lihat tanda + pada bag kanan bawah sel C1 dan double click
> mouse).
> Lalu tambahkan codenya (tanpa Sub dan End Sub) pada bagian akhir macro
> sebelumnya (sebelum End Sub).
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 21, 2018 at 4:03, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com> wrote:
>
>
> Maaf pak Hendrik...
> Sedikit perubahan lagi....
>
> kalau data semester, nama, nim, mengikuti jumlah mata kuliah yang diambil,
> bagaimana sourcecode modulnya ?
> kalau yang mata kuliah 1 - mata kuliah 12, sudah sesuai dengan harapan...
> soalnya saya kesulitan di pemanggilan datanya, kalau data semester, nama,
> dan nim tidak mengikuti jumlah mata kuliah.
>
>
> kalau data yang masuk database seperti file yang saya lampirkan berikut,
> bisa kah tidak ?
>
> Terima Kasih.
>
> 2018-06-19 11:45 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
> Hai Ade,
>
> Coba copas macro ini pada VBE Sheet Module1,
> Sub KOPI()
> *' Copy Data dari Sheet Input_KRS Range B1:B3*
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom A dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Copy Data dari Sheet Input_KRS Range B4:B15*
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom D dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> Application.CutCopyMode = False
> End Sub
>
> Ini adalah modifikasi hasil rekaman macro.
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 19 June 2018, 6:01:30 AM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Selamat pagi pak Hendrik Karnadi.
> Sebelumnya saya minta maaf, kalau terlambat balas email bapak.
>
> saya sudah coba ganti field-nya sesuai dengan yang saya inginkan, memang
> input datanya vertikal kebawah, tetapi begitu masuk ke sheet database
> (DBInput), datanya menjadi horisontal.
> maksud saya itu, data inputan yang vertikal tadi, begitu masuk sheet
> database (DBInput) datanya tetap vertikal....
>
> mohon maaf pak, sekali lagi saya katakan kalau saya tidak ada maksud untuk
> tes pak Hendrik, tapi saya memang benar2 tidak bisa..
> dan saya berharap pak Hendrik, mau dan tidak bosan mengajari saya...
>
> TERIMA KASIH
>
> berikut saya lampirkan contoh data yang saya harapkan...
>
>
> On Thu, Jun 14, 2018 at 7:50 PM, hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Prinsipnya 1 semester kan 1 x input,
> Inputnya vertikal ke bwh dan hasilnya di transpose ke Database.
> Coba ganti Field1, Field2, dst.nya pada Sheet Design dengan judul2 kolom
> yang diinginkan,
> Nama, NIM, Mata Kuliah 1 -12. Hapus Field yang tidak terpakai.
>
> Setelah itu jalankan/tes "petunjuk" yang ada pada VBE Sheet.
>
> Walaupun format/tombolnya tidak sama dengan yang diminta namun seharusnya
> hasilnya sdh mendekati apa yang diinginkan.
>
> Silakan dicoba dulu (tanpa harus mengganti codingnya).
>
> Hasilnya dishare ke grup untuk dibahas dan diganti codingnya apabila perlu.
>
> Seperti pernah disampaikan oleh Mr. Kid,
> disini kan forum Belajar Excel....jadi solusi yang diberikan umumnya bukan
> program jadi yang siap pakai, seperti yang diinginkan oleh penanya.
>
> Mudah2an jawaban saya bisa diterima dengan hati yang lapang dan kalau ada
> kata2 yang salah mohon dimaafkan....
>
> Salam,
> Hendrik Karnadi
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau)....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus....
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau)....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus...
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> <hendrikkarnadi@yahoo..com> [belajar-excel]" <
> belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData)
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
>
>
>
Thu Jul 12, 2018 11:05 pm (PDT) . Posted by:
"Ade Chandra"
maaf pak HK, saya kembali bertanya lagi ini.
setelah sebelumnya pertanyaan yang saya tanyakan sudah terjawab dan sesuai
dengan keinginan, sekarang muncul pertanyaan lagi .
bagaimana cara menampilkan data dengan beberapa kriteria, dari sheet
database kedalam sheet tampil (KHS) ?
karena Rumus yang saya terapkan, tidak bisa menampilkan data yang saya
inginkan.
adakah formula vba yang bisa menampilkan data yang saya inginkan ?
Terima Kasih
2018-06-21 13:23 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Maaf, krn range yang dicopy harus fleksibel, maka ubah saja codenya
> menjadi seperti ini:
>
> Sub KOPI()
> ' Copy Data dari Sheet Input_KRS Range B1:B3
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom A dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp).Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Tambahan*
> *ActiveCell.Resize(1, 3)..Copy*
> * ActiveCell.Offset(1, 0).Resize(11, 3).Select*
> * ActiveSheet.Paste*
> * Application.CutCopyMode = False*
> ' Copy Data dari Sheet Input_KRS Range B4:B15
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom D dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp).Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> End Sub
>
> Semoga sesuai kebutuhan.
>
> *Catatan : Warna Merah adalah Code tambahan untuk mengcopy Sel A.. sd C..*
>
> Salam,
> HK
>
>
>
> ----- Forwarded message -----
> *From:* hendrik karnadi <hendrikkarnadi@yahoo.com>
> *To:* belajar-excel@yahoogroups.com <belajar-excel@yahoogroups..com>
> *Sent:* Thursday, 21 June 2018, 6:44:30 AM GMT+7
> *Subject:* Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel
>
> Jalankan Macro.
> Kemudian coba buat rekaman macro untuk mangcopy data sel A1 sd C1 (sorot
> cel A1 sd C1, lihat tanda + pada bag kanan bawah sel C1 dan double click
> mouse).
> Lalu tambahkan codenya (tanpa Sub dan End Sub) pada bagian akhir macro
> sebelumnya (sebelum End Sub).
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 21, 2018 at 4:03, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com> wrote:
>
>
> Maaf pak Hendrik...
> Sedikit perubahan lagi....
>
> kalau data semester, nama, nim, mengikuti jumlah mata kuliah yang diambil,
> bagaimana sourcecode modulnya ?
> kalau yang mata kuliah 1 - mata kuliah 12, sudah sesuai dengan harapan...
> soalnya saya kesulitan di pemanggilan datanya, kalau data semester, nama,
> dan nim tidak mengikuti jumlah mata kuliah.
>
>
> kalau data yang masuk database seperti file yang saya lampirkan berikut,
> bisa kah tidak ?
>
> Terima Kasih.
>
> 2018-06-19 11:45 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
> Hai Ade,
>
> Coba copas macro ini pada VBE Sheet Module1,
> Sub KOPI()
> *' Copy Data dari Sheet Input_KRS Range B1:B3*
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom A dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Copy Data dari Sheet Input_KRS Range B4:B15*
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom D dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> Application.CutCopyMode = False
> End Sub
>
> Ini adalah modifikasi hasil rekaman macro.
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 19 June 2018, 6:01:30 AM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Selamat pagi pak Hendrik Karnadi.
> Sebelumnya saya minta maaf, kalau terlambat balas email bapak.
>
> saya sudah coba ganti field-nya sesuai dengan yang saya inginkan, memang
> input datanya vertikal kebawah, tetapi begitu masuk ke sheet database
> (DBInput), datanya menjadi horisontal.
> maksud saya itu, data inputan yang vertikal tadi, begitu masuk sheet
> database (DBInput) datanya tetap vertikal....
>
> mohon maaf pak, sekali lagi saya katakan kalau saya tidak ada maksud untuk
> tes pak Hendrik, tapi saya memang benar2 tidak bisa...
> dan saya berharap pak Hendrik, mau dan tidak bosan mengajari saya...
>
> TERIMA KASIH
>
> berikut saya lampirkan contoh data yang saya harapkan....
>
>
> On Thu, Jun 14, 2018 at 7:50 PM, hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Prinsipnya 1 semester kan 1 x input,
> Inputnya vertikal ke bwh dan hasilnya di transpose ke Database.
> Coba ganti Field1, Field2, dst.nya pada Sheet Design dengan judul2 kolom
> yang diinginkan,
> Nama, NIM, Mata Kuliah 1 -12. Hapus Field yang tidak terpakai.
>
> Setelah itu jalankan/tes "petunjuk" yang ada pada VBE Sheet.
>
> Walaupun format/tombolnya tidak sama dengan yang diminta namun seharusnya
> hasilnya sdh mendekati apa yang diinginkan.
>
> Silakan dicoba dulu (tanpa harus mengganti codingnya).
>
> Hasilnya dishare ke grup untuk dibahas dan diganti codingnya apabila perlu.
>
> Seperti pernah disampaikan oleh Mr. Kid,
> disini kan forum Belajar Excel....jadi solusi yang diberikan umumnya bukan
> program jadi yang siap pakai, seperti yang diinginkan oleh penanya.
>
> Mudah2an jawaban saya bisa diterima dengan hati yang lapang dan kalau ada
> kata2 yang salah mohon dimaafkan....
>
> Salam,
> Hendrik Karnadi
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau)....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus....
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau)....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus...
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> <hendrikkarnadi@yahoo..com> [belajar-excel]" <
> belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ....
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
>
>
>
setelah sebelumnya pertanyaan yang saya tanyakan sudah terjawab dan sesuai
dengan keinginan, sekarang muncul pertanyaan lagi .
bagaimana cara menampilkan data dengan beberapa kriteria, dari sheet
database kedalam sheet tampil (KHS) ?
karena Rumus yang saya terapkan, tidak bisa menampilkan data yang saya
inginkan.
adakah formula vba yang bisa menampilkan data yang saya inginkan ?
Terima Kasih
2018-06-21 13:23 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Maaf, krn range yang dicopy harus fleksibel, maka ubah saja codenya
> menjadi seperti ini:
>
> Sub KOPI()
> ' Copy Data dari Sheet Input_KRS Range B1:B3
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom A dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp).Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Tambahan*
> *ActiveCell.Resize(1, 3)..Copy*
> * ActiveCell.Offset(1, 0).Resize(11, 3).Select*
> * ActiveSheet.Paste*
> * Application.CutCopyMode = False*
> ' Copy Data dari Sheet Input_KRS Range B4:B15
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom D dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp).Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> End Sub
>
> Semoga sesuai kebutuhan.
>
> *Catatan : Warna Merah adalah Code tambahan untuk mengcopy Sel A.. sd C..*
>
> Salam,
> HK
>
>
>
> ----- Forwarded message -----
> *From:* hendrik karnadi <hendrikkarnadi@yahoo.com>
> *To:* belajar-excel@yahoogroups.com <belajar-excel@yahoogroups..com>
> *Sent:* Thursday, 21 June 2018, 6:44:30 AM GMT+7
> *Subject:* Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel
>
> Jalankan Macro.
> Kemudian coba buat rekaman macro untuk mangcopy data sel A1 sd C1 (sorot
> cel A1 sd C1, lihat tanda + pada bag kanan bawah sel C1 dan double click
> mouse).
> Lalu tambahkan codenya (tanpa Sub dan End Sub) pada bagian akhir macro
> sebelumnya (sebelum End Sub).
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 21, 2018 at 4:03, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com> wrote:
>
>
> Maaf pak Hendrik...
> Sedikit perubahan lagi....
>
> kalau data semester, nama, nim, mengikuti jumlah mata kuliah yang diambil,
> bagaimana sourcecode modulnya ?
> kalau yang mata kuliah 1 - mata kuliah 12, sudah sesuai dengan harapan...
> soalnya saya kesulitan di pemanggilan datanya, kalau data semester, nama,
> dan nim tidak mengikuti jumlah mata kuliah.
>
>
> kalau data yang masuk database seperti file yang saya lampirkan berikut,
> bisa kah tidak ?
>
> Terima Kasih.
>
> 2018-06-19 11:45 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
> Hai Ade,
>
> Coba copas macro ini pada VBE Sheet Module1,
> Sub KOPI()
> *' Copy Data dari Sheet Input_KRS Range B1:B3*
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom A dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Copy Data dari Sheet Input_KRS Range B4:B15*
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom D dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> Application.CutCopyMode = False
> End Sub
>
> Ini adalah modifikasi hasil rekaman macro.
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 19 June 2018, 6:01:30 AM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Selamat pagi pak Hendrik Karnadi.
> Sebelumnya saya minta maaf, kalau terlambat balas email bapak.
>
> saya sudah coba ganti field-nya sesuai dengan yang saya inginkan, memang
> input datanya vertikal kebawah, tetapi begitu masuk ke sheet database
> (DBInput), datanya menjadi horisontal.
> maksud saya itu, data inputan yang vertikal tadi, begitu masuk sheet
> database (DBInput) datanya tetap vertikal....
>
> mohon maaf pak, sekali lagi saya katakan kalau saya tidak ada maksud untuk
> tes pak Hendrik, tapi saya memang benar2 tidak bisa...
> dan saya berharap pak Hendrik, mau dan tidak bosan mengajari saya...
>
> TERIMA KASIH
>
> berikut saya lampirkan contoh data yang saya harapkan....
>
>
> On Thu, Jun 14, 2018 at 7:50 PM, hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Prinsipnya 1 semester kan 1 x input,
> Inputnya vertikal ke bwh dan hasilnya di transpose ke Database.
> Coba ganti Field1, Field2, dst.nya pada Sheet Design dengan judul2 kolom
> yang diinginkan,
> Nama, NIM, Mata Kuliah 1 -12. Hapus Field yang tidak terpakai.
>
> Setelah itu jalankan/tes "petunjuk" yang ada pada VBE Sheet.
>
> Walaupun format/tombolnya tidak sama dengan yang diminta namun seharusnya
> hasilnya sdh mendekati apa yang diinginkan.
>
> Silakan dicoba dulu (tanpa harus mengganti codingnya).
>
> Hasilnya dishare ke grup untuk dibahas dan diganti codingnya apabila perlu.
>
> Seperti pernah disampaikan oleh Mr. Kid,
> disini kan forum Belajar Excel....jadi solusi yang diberikan umumnya bukan
> program jadi yang siap pakai, seperti yang diinginkan oleh penanya.
>
> Mudah2an jawaban saya bisa diterima dengan hati yang lapang dan kalau ada
> kata2 yang salah mohon dimaafkan....
>
> Salam,
> Hendrik Karnadi
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau)....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus....
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau)....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus...
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> <hendrikkarnadi@yahoo..com> [belajar-excel]" <
> belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData)
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ....
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
>
>
>
Fri Jul 13, 2018 12:06 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Maaf, saya blm mudeng...Apakah semua data yang ingin ditampilkan pada sheet KHS ada pada Sheet database ?Coba berikan contoh tampilan yang diinginkan pada sheet khs.
Salam,HK
On Friday, 13 July 2018, 1:05:41 PM GMT+7, Ade Chandra adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
maaf pak HK, saya kembali bertanya lagi ini.setelah sebelumnya pertanyaan yang saya tanyakan sudah terjawab dan sesuai dengan keinginan, sekarang muncul pertanyaan lagi .
bagaimana cara menampilkan data dengan beberapa kriteria, dari sheet database kedalam sheet tampil (KHS) ?karena Rumus yang saya terapkan, tidak bisa menampilkan data yang saya inginkan.adakah formula vba yang bisa menampilkan data yang saya inginkan ?
Terima Kasih
2018-06-21 13:23 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
Maaf, krn range yang dicopy harus fleksibel, maka ubah saja codenya menjadi seperti ini:
Sub KOPI()' Copy Data dari Sheet Input_KRS Range B1:B3 Sheets("Input_KRS").Select Range("B1:B3").Select Selection..Copy' Pilih baris baru pada Sheet Database Kolom A dan Paste Data Sheets("Database")..Select Range("D65000").End(xlUp). Offset(1, -3).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True' Tambahan ActiveCell.Resize(1, 3).Copy ActiveCell.Offset(1, 0).Resize(11, 3).Select ActiveSheet.Paste Application.CutCopyMode = False' Copy Data dari Sheet Input_KRS Range B4:B15 Sheets("Input_KRS").Select Range("B4:B15").Select Selection.Copy' Pilih baris baru pada Sheet Database Kolom D dan Paste Data Sheets("Database").Select Range("D65000").End(xlUp). Offset(1, 0).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=FalseEnd Sub
Semoga sesuai kebutuhan.
Catatan : Warna Merah adalah Code tambahan untuk mengcopy Sel A.. sd C..
Salam,HK
----- Forwarded message ----- From: hendrik karnadi <hendrikkarnadi@yahoo.com>To: belajar-excel@yahoogroups.com <belajar-excel@yahoogroups.com >Sent: Thursday, 21 June 2018, 6:44:30 AM GMT+7Subject: Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel
Jalankan Macro.Kemudian coba buat rekaman macro untuk mangcopy data sel A1 sd C1 (sorot cel A1 sd C1, lihat tanda + pada bag kanan bawah sel C1 dan double click mouse).Lalu tambahkan codenya (tanpa Sub dan End Sub) pada bagian akhir macro sebelumnya (sebelum End Sub).
Salam,HK
Sent from Yahoo Mail on Android
On Thu, Jun 21, 2018 at 4:03, Ade Chandra adebolanglumajang@gmail.com [belajar-excel]<belajar-excel@yahoogroups.com > wrote:
Maaf pak Hendrik...Sedikit perubahan lagi....
kalau data semester, nama, nim, mengikuti jumlah mata kuliah yang diambil, bagaimana sourcecode modulnya ?kalau yang mata kuliah 1 - mata kuliah 12, sudah sesuai dengan harapan..soalnya saya kesulitan di pemanggilan datanya, kalau data semester, nama, dan nim tidak mengikuti jumlah mata kuliah..
kalau data yang masuk database seperti file yang saya lampirkan berikut, bisa kah tidak ?
Terima Kasih.
2018-06-19 11:45 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com >:
Hai Ade,
Coba copas macro ini pada VBE Sheet Module1,Sub KOPI()' Copy Data dari Sheet Input_KRS Range B1:B3 Sheets("Input_KRS").Select Range("B1:B3")..Select Selection.Copy' Pilih baris baru pada Sheet Database Kolom A dan Paste Data Sheets("Database").Select Range("D65000").End(xlUp). Offset(1, -3).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True' Copy Data dari Sheet Input_KRS Range B4:B15 Sheets("Input_KRS").Select Range("B4:B15").Select Selection.Copy' Pilih baris baru pada Sheet Database Kolom D dan Paste Data Sheets("Database").Select Range("D65000").End(xlUp). Offset(1, 0).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = FalseEnd Sub
Ini adalah modifikasi hasil rekaman macro.Selamat mencoba.
Salam,HK
On Tuesday, 19 June 2018, 6:01:30 AM GMT+7, Ade Chandra adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Selamat pagi pak Hendrik Karnadi.Sebelumnya saya minta maaf, kalau terlambat balas email bapak.
saya sudah coba ganti field-nya sesuai dengan yang saya inginkan, memang input datanya vertikal kebawah, tetapi begitu masuk ke sheet database (DBInput), datanya menjadi horisontal.maksud saya itu, data inputan yang vertikal tadi, begitu masuk sheet database (DBInput) datanya tetap vertikal....
mohon maaf pak, sekali lagi saya katakan kalau saya tidak ada maksud untuk tes pak Hendrik, tapi saya memang benar2 tidak bisa..dan saya berharap pak Hendrik, mau dan tidak bosan mengajari saya...
TERIMA KASIH
berikut saya lampirkan contoh data yang saya harapkan...
On Thu, Jun 14, 2018 at 7:50 PM, hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Hai Ade,Prinsipnya 1 semester kan 1 x input,Inputnya vertikal ke bwh dan hasilnya di transpose ke Database.Coba ganti Field1, Field2, dst.nya pada Sheet Design dengan judul2 kolom yang diinginkan,Nama, NIM, Mata Kuliah 1 -12. Hapus Field yang tidak terpakai.
Setelah itu jalankan/tes "petunjuk" yang ada pada VBE Sheet.
Walaupun format/tombolnya tidak sama dengan yang diminta namun seharusnya hasilnya sdh mendekati apa yang diinginkan.
Silakan dicoba dulu (tanpa harus mengganti codingnya).
Hasilnya dishare ke grup untuk dibahas dan diganti codingnya apabila perlu.
Seperti pernah disampaikan oleh Mr. Kid,disini kan forum Belajar Excel....jadi solusi yang diberikan umumnya bukan program jadi yang siap pakai, seperti yang diinginkan oleh penanya.
Mudah2an jawaban saya bisa diterima dengan hati yang lapang dan kalau ada kata2 yang salah mohon dimaafkan....
Salam,
Hendrik Karnadi
Sent from Yahoo Mail on Android
On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com [belajar-excel]<belajar-excel@yahoogroups.com > wrote:
Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
Kalau misalnya form input dan outputnya kayak punya saya, coding modul vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak tau)......
Mohon maklum pak, saya masih awam jadi tanya2 terus.....
On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
Hai Ade,Telampir saya berikan contoh database untuk mendesign, input dan output dengan jumlah kolom yang fleksibel.
Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
Selamat mencoba.
Salam,HK
On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Salam Kenal Sahabat Milis Belajar Excel...
Saya mau tanya tentang sourecode vbexcel nih...
Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala, kiranya Master bisa membantu saya.
Sheet InputData di Kolom A1 = Nama
di Kolom A2 = NIM
di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol Button )
Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
di Kolom B2 = Nama ( yang terinput dari sheetInpuData )
di Kolom C2 = NIM ( yang terinput dari sheetInpuData )
di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12 (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang sudah ambil Pertama ).
Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL vbexcel yang tepat ...
berikut saya lampirkan contoh filenya.
Terima Kasih
On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com [belajar-excel]<belajar-excel@yahoogroups.com > wrote:
Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
Kalau misalnya form input dan outputnya kayak punya saya, coding modul vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak tau)......
Mohon maklum pak, saya masih awam jadi tanya2 terus...
On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
Hai Ade,Telampir saya berikan contoh database untuk mendesign, input dan output dengan jumlah kolom yang fleksibel.
Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
Selamat mencoba.
Salam,HK
On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Salam Kenal Sahabat Milis Belajar Excel...
Saya mau tanya tentang sourecode vbexcel nih...
Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala, kiranya Master bisa membantu saya.
Sheet InputData di Kolom A1 = Nama
di Kolom A2 = NIM
di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol Button )
Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
di Kolom B2 = Nama ( yang terinput dari sheetInpuData )
di Kolom C2 = NIM ( yang terinput dari sheetInpuData )
di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12 (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang sudah ambil Pertama ).
Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL vbexcel yang tepat ...
berikut saya lampirkan contoh filenya..
Terima Kasih
Salam,HK
On Friday, 13 July 2018, 1:05:41 PM GMT+7, Ade Chandra adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
maaf pak HK, saya kembali bertanya lagi ini.setelah sebelumnya pertanyaan yang saya tanyakan sudah terjawab dan sesuai dengan keinginan, sekarang muncul pertanyaan lagi .
bagaimana cara menampilkan data dengan beberapa kriteria, dari sheet database kedalam sheet tampil (KHS) ?karena Rumus yang saya terapkan, tidak bisa menampilkan data yang saya inginkan.adakah formula vba yang bisa menampilkan data yang saya inginkan ?
Terima Kasih
2018-06-21 13:23 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:
Maaf, krn range yang dicopy harus fleksibel, maka ubah saja codenya menjadi seperti ini:
Sub KOPI()' Copy Data dari Sheet Input_KRS Range B1:B3 Sheets("Input_KRS").Select Range("B1:B3").Select Selection..Copy' Pilih baris baru pada Sheet Database Kolom A dan Paste Data Sheets("Database")..Select Range("D65000").End(xlUp). Offset(1, -3).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True' Tambahan ActiveCell.Resize(1, 3).Copy ActiveCell.Offset(1, 0).Resize(11, 3).Select ActiveSheet.Paste Application.CutCopyMode = False' Copy Data dari Sheet Input_KRS Range B4:B15 Sheets("Input_KRS").Select Range("B4:B15").Select Selection.Copy' Pilih baris baru pada Sheet Database Kolom D dan Paste Data Sheets("Database").Select Range("D65000").End(xlUp). Offset(1, 0).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=FalseEnd Sub
Semoga sesuai kebutuhan.
Catatan : Warna Merah adalah Code tambahan untuk mengcopy Sel A.. sd C..
Salam,HK
----- Forwarded message ----- From: hendrik karnadi <hendrikkarnadi@yahoo.com>To: belajar-excel@yahoogroups.com <belajar-excel@yahoogroups.com >Sent: Thursday, 21 June 2018, 6:44:30 AM GMT+7Subject: Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel
Jalankan Macro.Kemudian coba buat rekaman macro untuk mangcopy data sel A1 sd C1 (sorot cel A1 sd C1, lihat tanda + pada bag kanan bawah sel C1 dan double click mouse).Lalu tambahkan codenya (tanpa Sub dan End Sub) pada bagian akhir macro sebelumnya (sebelum End Sub).
Salam,HK
Sent from Yahoo Mail on Android
On Thu, Jun 21, 2018 at 4:03, Ade Chandra adebolanglumajang@gmail.com [belajar-excel]<belajar-excel@yahoogroups.com > wrote:
Maaf pak Hendrik...Sedikit perubahan lagi....
kalau data semester, nama, nim, mengikuti jumlah mata kuliah yang diambil, bagaimana sourcecode modulnya ?kalau yang mata kuliah 1 - mata kuliah 12, sudah sesuai dengan harapan..soalnya saya kesulitan di pemanggilan datanya, kalau data semester, nama, dan nim tidak mengikuti jumlah mata kuliah..
kalau data yang masuk database seperti file yang saya lampirkan berikut, bisa kah tidak ?
Terima Kasih.
2018-06-19 11:45 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com >:
Hai Ade,
Coba copas macro ini pada VBE Sheet Module1,Sub KOPI()' Copy Data dari Sheet Input_KRS Range B1:B3 Sheets("Input_KRS").Select Range("B1:B3")..Select Selection.Copy' Pilih baris baru pada Sheet Database Kolom A dan Paste Data Sheets("Database").Select Range("D65000").End(xlUp). Offset(1, -3).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True' Copy Data dari Sheet Input_KRS Range B4:B15 Sheets("Input_KRS").Select Range("B4:B15").Select Selection.Copy' Pilih baris baru pada Sheet Database Kolom D dan Paste Data Sheets("Database").Select Range("D65000").End(xlUp). Offset(1, 0).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = FalseEnd Sub
Ini adalah modifikasi hasil rekaman macro.Selamat mencoba.
Salam,HK
On Tuesday, 19 June 2018, 6:01:30 AM GMT+7, Ade Chandra adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Selamat pagi pak Hendrik Karnadi.Sebelumnya saya minta maaf, kalau terlambat balas email bapak.
saya sudah coba ganti field-nya sesuai dengan yang saya inginkan, memang input datanya vertikal kebawah, tetapi begitu masuk ke sheet database (DBInput), datanya menjadi horisontal.maksud saya itu, data inputan yang vertikal tadi, begitu masuk sheet database (DBInput) datanya tetap vertikal....
mohon maaf pak, sekali lagi saya katakan kalau saya tidak ada maksud untuk tes pak Hendrik, tapi saya memang benar2 tidak bisa..dan saya berharap pak Hendrik, mau dan tidak bosan mengajari saya...
TERIMA KASIH
berikut saya lampirkan contoh data yang saya harapkan...
On Thu, Jun 14, 2018 at 7:50 PM, hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Hai Ade,Prinsipnya 1 semester kan 1 x input,Inputnya vertikal ke bwh dan hasilnya di transpose ke Database.Coba ganti Field1, Field2, dst.nya pada Sheet Design dengan judul2 kolom yang diinginkan,Nama, NIM, Mata Kuliah 1 -12. Hapus Field yang tidak terpakai.
Setelah itu jalankan/tes "petunjuk" yang ada pada VBE Sheet.
Walaupun format/tombolnya tidak sama dengan yang diminta namun seharusnya hasilnya sdh mendekati apa yang diinginkan.
Silakan dicoba dulu (tanpa harus mengganti codingnya).
Hasilnya dishare ke grup untuk dibahas dan diganti codingnya apabila perlu.
Seperti pernah disampaikan oleh Mr. Kid,disini kan forum Belajar Excel....jadi solusi yang diberikan umumnya bukan program jadi yang siap pakai, seperti yang diinginkan oleh penanya.
Mudah2an jawaban saya bisa diterima dengan hati yang lapang dan kalau ada kata2 yang salah mohon dimaafkan....
Salam,
Hendrik Karnadi
Sent from Yahoo Mail on Android
On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com [belajar-excel]<belajar-excel@yahoogroups.com > wrote:
Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
Kalau misalnya form input dan outputnya kayak punya saya, coding modul vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak tau)......
Mohon maklum pak, saya masih awam jadi tanya2 terus.....
On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
Hai Ade,Telampir saya berikan contoh database untuk mendesign, input dan output dengan jumlah kolom yang fleksibel.
Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
Selamat mencoba.
Salam,HK
On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Salam Kenal Sahabat Milis Belajar Excel...
Saya mau tanya tentang sourecode vbexcel nih...
Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala, kiranya Master bisa membantu saya.
Sheet InputData di Kolom A1 = Nama
di Kolom A2 = NIM
di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol Button )
Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
di Kolom B2 = Nama ( yang terinput dari sheetInpuData )
di Kolom C2 = NIM ( yang terinput dari sheetInpuData )
di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12 (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang sudah ambil Pertama ).
Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL vbexcel yang tepat ...
berikut saya lampirkan contoh filenya.
Terima Kasih
On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com [belajar-excel]<belajar-excel@yahoogroups.com > wrote:
Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
Kalau misalnya form input dan outputnya kayak punya saya, coding modul vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak tau)......
Mohon maklum pak, saya masih awam jadi tanya2 terus...
On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
Hai Ade,Telampir saya berikan contoh database untuk mendesign, input dan output dengan jumlah kolom yang fleksibel.
Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
Selamat mencoba.
Salam,HK
On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
Salam Kenal Sahabat Milis Belajar Excel...
Saya mau tanya tentang sourecode vbexcel nih...
Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala, kiranya Master bisa membantu saya.
Sheet InputData di Kolom A1 = Nama
di Kolom A2 = NIM
di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol Button )
Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
di Kolom B2 = Nama ( yang terinput dari sheetInpuData )
di Kolom C2 = NIM ( yang terinput dari sheetInpuData )
di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12 (yang diambil dari sheetInpuData)
Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL vbexcel yang tepat ...
berikut saya lampirkan contoh filenya..
Terima Kasih
Fri Jul 13, 2018 8:41 pm (PDT) . Posted by:
"Ade Chandra"
Semuanya data yang ingin ditampilkan pada sheet KHS, ada di sheet database.
Misalkan, pada sheet KHS saya ingin menampilkan mata kuliah dengan kriteria
nama sandi & tahun ajaran 2017/2018 ganjil, maka data mata kuliah yg ada
pada sheet database, tampil di sheet KHS.
Terima kasih
On Fri, Jul 13, 2018, 16:06 hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Maaf, saya blm mudeng...
> Apakah *semua data* yang ingin ditampilkan pada sheet KHS *ada pada Sheet
> database* ?
> Coba berikan *contoh tampilan* yang diinginkan *pada sheet khs*.
>
> Salam,
> HK
>
>
> On Friday, 13 July 2018, 1:05:41 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> wrote:
>
>
>
>
> maaf pak HK, saya kembali bertanya lagi ini.
> setelah sebelumnya pertanyaan yang saya tanyakan sudah terjawab dan sesuai
> dengan keinginan, sekarang muncul pertanyaan lagi .
>
> bagaimana cara menampilkan data dengan beberapa kriteria, dari sheet
> database kedalam sheet tampil (KHS) ?
> karena Rumus yang saya terapkan, tidak bisa menampilkan data yang saya
> inginkan.
> adakah formula vba yang bisa menampilkan data yang saya inginkan ?
>
> Terima Kasih
>
> 2018-06-21 13:23 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
> Maaf, krn range yang dicopy harus fleksibel, maka ubah saja codenya
> menjadi seperti ini:
>
> Sub KOPI()
> ' Copy Data dari Sheet Input_KRS Range B1:B3
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection..Copy
> ' Pilih baris baru pada Sheet Database Kolom A dan Paste Data
> Sheets("Database")..Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Tambahan*
> *ActiveCell.Resize(1, 3).Copy*
> * ActiveCell.Offset(1, 0).Resize(11, 3).Select*
> * ActiveSheet.Paste*
> * Application.CutCopyMode = False*
> ' Copy Data dari Sheet Input_KRS Range B4:B15
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom D dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> End Sub
>
> Semoga sesuai kebutuhan.
>
> *Catatan : Warna Merah adalah Code tambahan untuk mengcopy Sel A.. sd C..*
>
> Salam,
> HK
>
>
>
> ----- Forwarded message -----
> *From:* hendrik karnadi <hendrikkarnadi@yahoo.com>
> *To:* belajar-excel@yahoogroups.com <belajar-excel@yahoogroups.com >
> *Sent:* Thursday, 21 June 2018, 6:44:30 AM GMT+7
> *Subject:* Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel
>
> Jalankan Macro.
> Kemudian coba buat rekaman macro untuk mangcopy data sel A1 sd C1 (sorot
> cel A1 sd C1, lihat tanda + pada bag kanan bawah sel C1 dan double click
> mouse).
> Lalu tambahkan codenya (tanpa Sub dan End Sub) pada bagian akhir macro
> sebelumnya (sebelum End Sub).
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 21, 2018 at 4:03, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Maaf pak Hendrik...
> Sedikit perubahan lagi....
>
> kalau data semester, nama, nim, mengikuti jumlah mata kuliah yang diambil,
> bagaimana sourcecode modulnya ?
> kalau yang mata kuliah 1 - mata kuliah 12, sudah sesuai dengan harapan...
> soalnya saya kesulitan di pemanggilan datanya, kalau data semester, nama,
> dan nim tidak mengikuti jumlah mata kuliah.
>
>
> kalau data yang masuk database seperti file yang saya lampirkan berikut,
> bisa kah tidak ?
>
> Terima Kasih.
>
> 2018-06-19 11:45 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com >:
>
>
>
> Hai Ade,
>
> Coba copas macro ini pada VBE Sheet Module1,
> Sub KOPI()
> *' Copy Data dari Sheet Input_KRS Range B1:B3*
> Sheets("Input_KRS").Select
> Range("B1:B3")..Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom A dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Copy Data dari Sheet Input_KRS Range B4:B15*
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom D dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> Application.CutCopyMode = False
> End Sub
>
> Ini adalah modifikasi hasil rekaman macro.
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 19 June 2018, 6:01:30 AM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Selamat pagi pak Hendrik Karnadi.
> Sebelumnya saya minta maaf, kalau terlambat balas email bapak.
>
> saya sudah coba ganti field-nya sesuai dengan yang saya inginkan, memang
> input datanya vertikal kebawah, tetapi begitu masuk ke sheet database
> (DBInput), datanya menjadi horisontal.
> maksud saya itu, data inputan yang vertikal tadi, begitu masuk sheet
> database (DBInput) datanya tetap vertikal....
>
> mohon maaf pak, sekali lagi saya katakan kalau saya tidak ada maksud untuk
> tes pak Hendrik, tapi saya memang benar2 tidak bisa..
> dan saya berharap pak Hendrik, mau dan tidak bosan mengajari saya...
>
> TERIMA KASIH
>
> berikut saya lampirkan contoh data yang saya harapkan...
>
>
> On Thu, Jun 14, 2018 at 7:50 PM, hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Prinsipnya 1 semester kan 1 x input,
> Inputnya vertikal ke bwh dan hasilnya di transpose ke Database.
> Coba ganti Field1, Field2, dst.nya pada Sheet Design dengan judul2 kolom
> yang diinginkan,
> Nama, NIM, Mata Kuliah 1 -12. Hapus Field yang tidak terpakai.
>
> Setelah itu jalankan/tes "petunjuk" yang ada pada VBE Sheet.
>
> Walaupun format/tombolnya tidak sama dengan yang diminta namun seharusnya
> hasilnya sdh mendekati apa yang diinginkan.
>
> Silakan dicoba dulu (tanpa harus mengganti codingnya).
>
> Hasilnya dishare ke grup untuk dibahas dan diganti codingnya apabila perlu.
>
> Seperti pernah disampaikan oleh Mr. Kid,
> disini kan forum Belajar Excel....jadi solusi yang diberikan umumnya bukan
> program jadi yang siap pakai, seperti yang diinginkan oleh penanya.
>
> Mudah2an jawaban saya bisa diterima dengan hati yang lapang dan kalau ada
> kata2 yang salah mohon dimaafkan....
>
> Salam,
> Hendrik Karnadi
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau).....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus.....
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail..com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau).....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus...
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> <hendrikkarnadi@yahoo..com> [belajar-excel]" <
> belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya..
>
> Terima Kasih
>
>
>
>
>
>
On Fri, Jul 13, 2018, 16:06 hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Maaf, saya blm mudeng...
> Apakah *semua data* yang ingin ditampilkan pada sheet KHS *ada pada Sheet
> database* ?
> Coba berikan *contoh tampilan* yang diinginkan *pada sheet khs*.
>
> Salam,
> HK
>
>
> On Friday, 13 July 2018, 1:05:41 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> wrote:
>
>
>
>
> maaf pak HK, saya kembali bertanya lagi ini.
> setelah sebelumnya pertanyaan yang saya tanyakan sudah terjawab dan sesuai
> dengan keinginan, sekarang muncul pertanyaan lagi .
>
> bagaimana cara menampilkan data dengan beberapa kriteria, dari sheet
> database kedalam sheet tampil (KHS) ?
> karena Rumus yang saya terapkan, tidak bisa menampilkan data yang saya
> inginkan.
> adakah formula vba yang bisa menampilkan data yang saya inginkan ?
>
> Terima Kasih
>
> 2018-06-21 13:23 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
> Maaf, krn range yang dicopy harus fleksibel, maka ubah saja codenya
> menjadi seperti ini:
>
> Sub KOPI()
> ' Copy Data dari Sheet Input_KRS Range B1:B3
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection..Copy
> ' Pilih baris baru pada Sheet Database Kolom A dan Paste Data
> Sheets("Database")..Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Tambahan*
> *ActiveCell.Resize(1, 3).Copy*
> * ActiveCell.Offset(1, 0).Resize(11, 3).Select*
> * ActiveSheet.Paste*
> * Application.CutCopyMode = False*
> ' Copy Data dari Sheet Input_KRS Range B4:B15
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom D dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> End Sub
>
> Semoga sesuai kebutuhan.
>
> *Catatan : Warna Merah adalah Code tambahan untuk mengcopy Sel A.. sd C..*
>
> Salam,
> HK
>
>
>
> ----- Forwarded message -----
> *From:* hendrik karnadi <hendrikkarnadi@yahoo.com>
> *To:* belajar-excel@yahoogroups.com <belajar-excel@yahoogroups.com >
> *Sent:* Thursday, 21 June 2018, 6:44:30 AM GMT+7
> *Subject:* Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel
>
> Jalankan Macro.
> Kemudian coba buat rekaman macro untuk mangcopy data sel A1 sd C1 (sorot
> cel A1 sd C1, lihat tanda + pada bag kanan bawah sel C1 dan double click
> mouse).
> Lalu tambahkan codenya (tanpa Sub dan End Sub) pada bagian akhir macro
> sebelumnya (sebelum End Sub).
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 21, 2018 at 4:03, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Maaf pak Hendrik...
> Sedikit perubahan lagi....
>
> kalau data semester, nama, nim, mengikuti jumlah mata kuliah yang diambil,
> bagaimana sourcecode modulnya ?
> kalau yang mata kuliah 1 - mata kuliah 12, sudah sesuai dengan harapan...
> soalnya saya kesulitan di pemanggilan datanya, kalau data semester, nama,
> dan nim tidak mengikuti jumlah mata kuliah.
>
>
> kalau data yang masuk database seperti file yang saya lampirkan berikut,
> bisa kah tidak ?
>
> Terima Kasih.
>
> 2018-06-19 11:45 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com >:
>
>
>
> Hai Ade,
>
> Coba copas macro ini pada VBE Sheet Module1,
> Sub KOPI()
> *' Copy Data dari Sheet Input_KRS Range B1:B3*
> Sheets("Input_KRS").Select
> Range("B1:B3")..Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom A dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Copy Data dari Sheet Input_KRS Range B4:B15*
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom D dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> Application.CutCopyMode = False
> End Sub
>
> Ini adalah modifikasi hasil rekaman macro.
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 19 June 2018, 6:01:30 AM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Selamat pagi pak Hendrik Karnadi.
> Sebelumnya saya minta maaf, kalau terlambat balas email bapak.
>
> saya sudah coba ganti field-nya sesuai dengan yang saya inginkan, memang
> input datanya vertikal kebawah, tetapi begitu masuk ke sheet database
> (DBInput), datanya menjadi horisontal.
> maksud saya itu, data inputan yang vertikal tadi, begitu masuk sheet
> database (DBInput) datanya tetap vertikal....
>
> mohon maaf pak, sekali lagi saya katakan kalau saya tidak ada maksud untuk
> tes pak Hendrik, tapi saya memang benar2 tidak bisa..
> dan saya berharap pak Hendrik, mau dan tidak bosan mengajari saya...
>
> TERIMA KASIH
>
> berikut saya lampirkan contoh data yang saya harapkan...
>
>
> On Thu, Jun 14, 2018 at 7:50 PM, hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Prinsipnya 1 semester kan 1 x input,
> Inputnya vertikal ke bwh dan hasilnya di transpose ke Database.
> Coba ganti Field1, Field2, dst.nya pada Sheet Design dengan judul2 kolom
> yang diinginkan,
> Nama, NIM, Mata Kuliah 1 -12. Hapus Field yang tidak terpakai.
>
> Setelah itu jalankan/tes "petunjuk" yang ada pada VBE Sheet.
>
> Walaupun format/tombolnya tidak sama dengan yang diminta namun seharusnya
> hasilnya sdh mendekati apa yang diinginkan.
>
> Silakan dicoba dulu (tanpa harus mengganti codingnya).
>
> Hasilnya dishare ke grup untuk dibahas dan diganti codingnya apabila perlu.
>
> Seperti pernah disampaikan oleh Mr. Kid,
> disini kan forum Belajar Excel....jadi solusi yang diberikan umumnya bukan
> program jadi yang siap pakai, seperti yang diinginkan oleh penanya.
>
> Mudah2an jawaban saya bisa diterima dengan hati yang lapang dan kalau ada
> kata2 yang salah mohon dimaafkan....
>
> Salam,
> Hendrik Karnadi
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo..com/mobile/?.src=Android>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups..com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau).....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus.....
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau).....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus...
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> <hendrikkarnadi@yahoo..com> [belajar-excel]" <
> belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya..
>
> Terima Kasih
>
>
>
>
>
>
Misalkan, pada sheet KHS saya ingin menampilkan mata kuliah dengan kriteria
nama sandi & tahun ajaran 2017/2018 ganjil, maka data mata kuliah yg ada
pada sheet database, tampil di sheet KHS.
Terima kasih
On Fri, Jul 13, 2018, 16:06 hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Maaf, saya blm mudeng...
> Apakah *semua data* yang ingin ditampilkan pada sheet KHS *ada pada Sheet
> database* ?
> Coba berikan *contoh tampilan* yang diinginkan *pada sheet khs*.
>
> Salam,
> HK
>
>
> On Friday, 13 July 2018, 1:05:41 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> wrote:
>
>
>
>
> maaf pak HK, saya kembali bertanya lagi ini.
> setelah sebelumnya pertanyaan yang saya tanyakan sudah terjawab dan sesuai
> dengan keinginan, sekarang muncul pertanyaan lagi .
>
> bagaimana cara menampilkan data dengan beberapa kriteria, dari sheet
> database kedalam sheet tampil (KHS) ?
> karena Rumus yang saya terapkan, tidak bisa menampilkan data yang saya
> inginkan.
> adakah formula vba yang bisa menampilkan data yang saya inginkan ?
>
> Terima Kasih
>
> 2018-06-21 13:23 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
> Maaf, krn range yang dicopy harus fleksibel, maka ubah saja codenya
> menjadi seperti ini:
>
> Sub KOPI()
> ' Copy Data dari Sheet Input_KRS Range B1:B3
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection..Copy
> ' Pilih baris baru pada Sheet Database Kolom A dan Paste Data
> Sheets("Database")..Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Tambahan*
> *ActiveCell.Resize(1, 3).Copy*
> * ActiveCell.Offset(1, 0).Resize(11, 3).Select*
> * ActiveSheet.Paste*
> * Application.CutCopyMode = False*
> ' Copy Data dari Sheet Input_KRS Range B4:B15
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom D dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> End Sub
>
> Semoga sesuai kebutuhan.
>
> *Catatan : Warna Merah adalah Code tambahan untuk mengcopy Sel A.. sd C..*
>
> Salam,
> HK
>
>
>
> ----- Forwarded message -----
> *From:* hendrik karnadi <hendrikkarnadi@yahoo.com>
> *To:* belajar-excel@yahoogroups.com <belajar-excel@yahoogroups.com >
> *Sent:* Thursday, 21 June 2018, 6:44:30 AM GMT+7
> *Subject:* Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel
>
> Jalankan Macro.
> Kemudian coba buat rekaman macro untuk mangcopy data sel A1 sd C1 (sorot
> cel A1 sd C1, lihat tanda + pada bag kanan bawah sel C1 dan double click
> mouse).
> Lalu tambahkan codenya (tanpa Sub dan End Sub) pada bagian akhir macro
> sebelumnya (sebelum End Sub).
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 21, 2018 at 4:03, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Maaf pak Hendrik...
> Sedikit perubahan lagi....
>
> kalau data semester, nama, nim, mengikuti jumlah mata kuliah yang diambil,
> bagaimana sourcecode modulnya ?
> kalau yang mata kuliah 1 - mata kuliah 12, sudah sesuai dengan harapan...
> soalnya saya kesulitan di pemanggilan datanya, kalau data semester, nama,
> dan nim tidak mengikuti jumlah mata kuliah.
>
>
> kalau data yang masuk database seperti file yang saya lampirkan berikut,
> bisa kah tidak ?
>
> Terima Kasih.
>
> 2018-06-19 11:45 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com >:
>
>
>
> Hai Ade,
>
> Coba copas macro ini pada VBE Sheet Module1,
> Sub KOPI()
> *' Copy Data dari Sheet Input_KRS Range B1:B3*
> Sheets("Input_KRS").Select
> Range("B1:B3")..Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom A dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Copy Data dari Sheet Input_KRS Range B4:B15*
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom D dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> Application.CutCopyMode = False
> End Sub
>
> Ini adalah modifikasi hasil rekaman macro.
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 19 June 2018, 6:01:30 AM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Selamat pagi pak Hendrik Karnadi.
> Sebelumnya saya minta maaf, kalau terlambat balas email bapak.
>
> saya sudah coba ganti field-nya sesuai dengan yang saya inginkan, memang
> input datanya vertikal kebawah, tetapi begitu masuk ke sheet database
> (DBInput), datanya menjadi horisontal.
> maksud saya itu, data inputan yang vertikal tadi, begitu masuk sheet
> database (DBInput) datanya tetap vertikal....
>
> mohon maaf pak, sekali lagi saya katakan kalau saya tidak ada maksud untuk
> tes pak Hendrik, tapi saya memang benar2 tidak bisa..
> dan saya berharap pak Hendrik, mau dan tidak bosan mengajari saya...
>
> TERIMA KASIH
>
> berikut saya lampirkan contoh data yang saya harapkan...
>
>
> On Thu, Jun 14, 2018 at 7:50 PM, hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Prinsipnya 1 semester kan 1 x input,
> Inputnya vertikal ke bwh dan hasilnya di transpose ke Database.
> Coba ganti Field1, Field2, dst.nya pada Sheet Design dengan judul2 kolom
> yang diinginkan,
> Nama, NIM, Mata Kuliah 1 -12. Hapus Field yang tidak terpakai.
>
> Setelah itu jalankan/tes "petunjuk" yang ada pada VBE Sheet.
>
> Walaupun format/tombolnya tidak sama dengan yang diminta namun seharusnya
> hasilnya sdh mendekati apa yang diinginkan.
>
> Silakan dicoba dulu (tanpa harus mengganti codingnya).
>
> Hasilnya dishare ke grup untuk dibahas dan diganti codingnya apabila perlu.
>
> Seperti pernah disampaikan oleh Mr. Kid,
> disini kan forum Belajar Excel....jadi solusi yang diberikan umumnya bukan
> program jadi yang siap pakai, seperti yang diinginkan oleh penanya.
>
> Mudah2an jawaban saya bisa diterima dengan hati yang lapang dan kalau ada
> kata2 yang salah mohon dimaafkan....
>
> Salam,
> Hendrik Karnadi
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau).....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus.....
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail..com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau).....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus...
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> <hendrikkarnadi@yahoo..com> [belajar-excel]" <
> belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya..
>
> Terima Kasih
>
>
>
>
>
>
On Fri, Jul 13, 2018, 16:06 hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Maaf, saya blm mudeng...
> Apakah *semua data* yang ingin ditampilkan pada sheet KHS *ada pada Sheet
> database* ?
> Coba berikan *contoh tampilan* yang diinginkan *pada sheet khs*.
>
> Salam,
> HK
>
>
> On Friday, 13 July 2018, 1:05:41 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> wrote:
>
>
>
>
> maaf pak HK, saya kembali bertanya lagi ini.
> setelah sebelumnya pertanyaan yang saya tanyakan sudah terjawab dan sesuai
> dengan keinginan, sekarang muncul pertanyaan lagi .
>
> bagaimana cara menampilkan data dengan beberapa kriteria, dari sheet
> database kedalam sheet tampil (KHS) ?
> karena Rumus yang saya terapkan, tidak bisa menampilkan data yang saya
> inginkan.
> adakah formula vba yang bisa menampilkan data yang saya inginkan ?
>
> Terima Kasih
>
> 2018-06-21 13:23 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>
> Maaf, krn range yang dicopy harus fleksibel, maka ubah saja codenya
> menjadi seperti ini:
>
> Sub KOPI()
> ' Copy Data dari Sheet Input_KRS Range B1:B3
> Sheets("Input_KRS").Select
> Range("B1:B3").Select
> Selection..Copy
> ' Pilih baris baru pada Sheet Database Kolom A dan Paste Data
> Sheets("Database")..Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Tambahan*
> *ActiveCell.Resize(1, 3).Copy*
> * ActiveCell.Offset(1, 0).Resize(11, 3).Select*
> * ActiveSheet.Paste*
> * Application.CutCopyMode = False*
> ' Copy Data dari Sheet Input_KRS Range B4:B15
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> ' Pilih baris baru pada Sheet Database Kolom D dan Paste Data
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> End Sub
>
> Semoga sesuai kebutuhan.
>
> *Catatan : Warna Merah adalah Code tambahan untuk mengcopy Sel A.. sd C..*
>
> Salam,
> HK
>
>
>
> ----- Forwarded message -----
> *From:* hendrik karnadi <hendrikkarnadi@yahoo.com>
> *To:* belajar-excel@yahoogroups.com <belajar-excel@yahoogroups.com >
> *Sent:* Thursday, 21 June 2018, 6:44:30 AM GMT+7
> *Subject:* Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel
>
> Jalankan Macro.
> Kemudian coba buat rekaman macro untuk mangcopy data sel A1 sd C1 (sorot
> cel A1 sd C1, lihat tanda + pada bag kanan bawah sel C1 dan double click
> mouse).
> Lalu tambahkan codenya (tanpa Sub dan End Sub) pada bagian akhir macro
> sebelumnya (sebelum End Sub).
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo.com/mobile/?.src=Android>
>
> On Thu, Jun 21, 2018 at 4:03, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Maaf pak Hendrik...
> Sedikit perubahan lagi....
>
> kalau data semester, nama, nim, mengikuti jumlah mata kuliah yang diambil,
> bagaimana sourcecode modulnya ?
> kalau yang mata kuliah 1 - mata kuliah 12, sudah sesuai dengan harapan...
> soalnya saya kesulitan di pemanggilan datanya, kalau data semester, nama,
> dan nim tidak mengikuti jumlah mata kuliah.
>
>
> kalau data yang masuk database seperti file yang saya lampirkan berikut,
> bisa kah tidak ?
>
> Terima Kasih.
>
> 2018-06-19 11:45 GMT+09:00 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com >:
>
>
>
> Hai Ade,
>
> Coba copas macro ini pada VBE Sheet Module1,
> Sub KOPI()
> *' Copy Data dari Sheet Input_KRS Range B1:B3*
> Sheets("Input_KRS").Select
> Range("B1:B3")..Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom A dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, -3).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=True
> *' Copy Data dari Sheet Input_KRS Range B4:B15*
> Sheets("Input_KRS").Select
> Range("B4:B15").Select
> Selection.Copy
> *' Pilih baris baru pada Sheet Database Kolom D dan Paste Data*
> Sheets("Database").Select
> Range("D65000").End(xlUp). Offset(1, 0).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
> SkipBlanks _
> :=False, Transpose:=False
> Application.CutCopyMode = False
> End Sub
>
> Ini adalah modifikasi hasil rekaman macro.
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 19 June 2018, 6:01:30 AM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Selamat pagi pak Hendrik Karnadi.
> Sebelumnya saya minta maaf, kalau terlambat balas email bapak.
>
> saya sudah coba ganti field-nya sesuai dengan yang saya inginkan, memang
> input datanya vertikal kebawah, tetapi begitu masuk ke sheet database
> (DBInput), datanya menjadi horisontal.
> maksud saya itu, data inputan yang vertikal tadi, begitu masuk sheet
> database (DBInput) datanya tetap vertikal....
>
> mohon maaf pak, sekali lagi saya katakan kalau saya tidak ada maksud untuk
> tes pak Hendrik, tapi saya memang benar2 tidak bisa..
> dan saya berharap pak Hendrik, mau dan tidak bosan mengajari saya...
>
> TERIMA KASIH
>
> berikut saya lampirkan contoh data yang saya harapkan...
>
>
> On Thu, Jun 14, 2018 at 7:50 PM, hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Prinsipnya 1 semester kan 1 x input,
> Inputnya vertikal ke bwh dan hasilnya di transpose ke Database.
> Coba ganti Field1, Field2, dst.nya pada Sheet Design dengan judul2 kolom
> yang diinginkan,
> Nama, NIM, Mata Kuliah 1 -12. Hapus Field yang tidak terpakai.
>
> Setelah itu jalankan/tes "petunjuk" yang ada pada VBE Sheet.
>
> Walaupun format/tombolnya tidak sama dengan yang diminta namun seharusnya
> hasilnya sdh mendekati apa yang diinginkan.
>
> Silakan dicoba dulu (tanpa harus mengganti codingnya).
>
> Hasilnya dishare ke grup untuk dibahas dan diganti codingnya apabila perlu.
>
> Seperti pernah disampaikan oleh Mr. Kid,
> disini kan forum Belajar Excel....jadi solusi yang diberikan umumnya bukan
> program jadi yang siap pakai, seperti yang diinginkan oleh penanya.
>
> Mudah2an jawaban saya bisa diterima dengan hati yang lapang dan kalau ada
> kata2 yang salah mohon dimaafkan....
>
> Salam,
> Hendrik Karnadi
>
> Sent from Yahoo Mail on Android
> <https://overview.mail.yahoo..com/mobile/?.src=Android>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups..com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau).....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus.....
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData), dan ketika menginputkan Nama Mahasiswa
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya.
>
> Terima Kasih
>
>
> On Thu, Jun 14, 2018 at 12:10, Ade Chandra adebolanglumajang@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com > wrote:
>
>
> Terima kasih pak Hendrik Karnadi telah membantu membuat desain baru.
> Kalau misalnya form input dan outputnya kayak punya saya, coding modul
> vb'nya bgaimana yaw pak ? (bukan ngetes, tapi memang benar-benar tidak
> tau).....
>
> Mohon maklum pak, saya masih awam jadi tanya2 terus...
> On Jun 13, 2018 16:45, "hendrik karnadi hendrikkarnadi@yahoo.com
> <hendrikkarnadi@yahoo..com> [belajar-excel]" <
> belajar-excel@yahoogroups.com > wrote:
>
>
>
> Hai Ade,
> Telampir saya berikan contoh database untuk mendesign, input dan output
> dengan jumlah kolom yang fleksibel.
>
> Silakan baca "petunjuk" nya pada VBE Sheet file tersbut.
>
> Selamat mencoba.
>
> Salam,
> HK
>
> On Tuesday, 12 June 2018, 6:48:11 PM GMT+7, Ade Chandra
> adebolanglumajang@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com
> > wrote:
>
>
>
>
> Salam Kenal Sahabat Milis Belajar Excel...
> Saya mau tanya tentang sourecode vbexcel nih...
>
> Saya lagi buat aplikasi input data KRS mahasiswa & saya mengalami kendala,
> kiranya Master bisa membantu saya.
> Sheet InputData di Kolom A1 = Nama
> di Kolom A2 = NIM
> di Kolom A3-A13 = Mata Kuliah 1 - 12 yang diambil
> mahasiswa, dan ada tombol Simpan menggunakan Shape ( Bukan Axtive COntrol
> Button )
>
> Sheet Database di Kolom A2 = maunya terisi No. Secara Otomatis
> di Kolom B2 = Nama ( yang terinput dari
> sheetInpuData )
> di Kolom C2 = NIM ( yang terinput dari
> sheetInpuData )
> di Kolom D2-D baris terakhir = Mata Kuliah 1 - 12
> (yang diambil dari sheetInpuData)
> Lainnya, Datanya masuk kedalam sheet database (dibawah data mahasiswa yang
> sudah ambil Pertama ).
>
> Mohon Bantuannya dari para Master, untuk pembuatan sourcecode MODUL
> vbexcel yang tepat ...
> berikut saya lampirkan contoh filenya..
>
> Terima Kasih
>
>
>
>
>
>
Thu Jul 12, 2018 11:06 pm (PDT) . Posted by:
"Stephen Saputro"
Selamat siang rekan-rekan semuanya,
Mohon kiranya dapat di bantu kasus saya dalam penggunaan conditional
formating,
Saya sedang mencoba untuk melakukan input data, bagaiamana caranya, apabila
di kolom B tertulis "Bayar", maka angka yang di input pada kolom C,D,E
otomatis menjadi negativ ? ( jadi kita tidak perlu menambahkan angka minus
terlebih dahulu. Begitu juga kalau terulis faktur, maka anga yang di input
otomatis positiv.
Terima kasih
Mohon kiranya dapat di bantu kasus saya dalam penggunaan conditional
formating,
Saya sedang mencoba untuk melakukan input data, bagaiamana caranya, apabila
di kolom B tertulis "Bayar"
otomatis menjadi negativ ? ( jadi kita tidak perlu menambahkan angka minus
terlebih dahulu. Begitu juga kalau terulis faktur, maka anga yang di input
otomatis positiv.
Terima kasih
============================================================
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