8 Messages
Digest #4523
2a
Fw: Re: [belajar-excel] Mohon Bantuan Pembuatan sourcecode vbexcel by "hendrik karnadi" hendrikkarnadi
Messages
Wed Jun 20, 2018 9:25 pm (PDT) . Posted by:
"Ade Chandra"
Belum berhasil pak dengan model perekaman macro ini...
Pada sourcode yang pak Hendrik sudah bagikan diatas, apakah ada sedikit
modifikasi (perubahan) coding, supaya jadi seperti yang saya inginkan pada
lampiran diatas..
On Jun 21, 2018 08:45, "hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
>
>
> 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
>
>
>
>
>
Pada sourcode yang pak Hendrik sudah bagikan diatas, apakah ada sedikit
modifikasi (perubahan) coding, supaya jadi seperti yang saya inginkan pada
lampiran diatas..
On Jun 21, 2018 08:45, "hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
>
>
> 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
>
>
>
>
>
Wed Jun 20, 2018 9:27 pm (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
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
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
Thu Jun 21, 2018 12:35 am (PDT) . Posted by:
"Ade Chandra"
Okey pak.
Sudah sesuai.
Maaf, kalau nanti akan merepotkan pak Hendrik lagi...
Terima kasih
On Jun 21, 2018 13:27, "hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
>
>
> 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
>
>
>
>
>
Sudah sesuai.
Maaf, kalau nanti akan merepotkan pak Hendrik lagi...
Terima kasih
On Jun 21, 2018 13:27, "hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
>
>
> 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 Jun 21, 2018 12:35 am (PDT) . Posted by:
"Syukur, Muhamad"
Dear mas Kenang,
Terima kasih,
Mohon maaf baru sempat eksekusi,
overall berjalan sesuai keinginan,
tapi menyisahkan 2 notif seperti ini,
[cid:image001.jpg@01D40955.15182100]
[cid:image002.jpg@01D40955.15182100]
Sementara harus manual click "continue" & "Allow"
Untuk menghilangkan ke 2 notif itu bagaimana ya?
Biar semua bisa berjalan otomatis.
Terima kasih atas pencerahannya.
Wassalam,'
Syukur
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Wednesday, May 30, 2018 8:57 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Tanya macro excel
Wa'alaikumusalam warahmatullah
Dear Syukur,
untuk memerintah excel melaksanakan kerja setiap pukul 10:00 dapat menggunakan cekrip:
If time = "10:00" then 'kerjanya di sini
sedangkan untuk kirim email dapat dilihat pesan Mas Kid di sini<http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-Kirim-Email-Otomatis-tt5727618.html#a5727722>, pesan Ron De Bruin di Microsoft ada di sini<https://msdn.microsoft.com/en-us/library/aa203718%28office.11%29.aspx> serta pesan web Rondebruin di sini<http://www.rondebruin.nl/win/section1.htm>
selamat mencoba, jika sudah jadi cekripnya dapat diposting kembali.
Wasalamualaikum warahmatullah.
Kenang Agus
On 5/30/2018 9:40 AM, 'Syukur, Muhamad' muhamad.syukur@bridgestone.com<mailto:muhamad.syukur@bridgestone.com> [belajar-excel] wrote:
Assalamu'alaikum..
Dear rekan rekan,
Mohon maaf jika pertanyaannya repost,
Anggota baru soalnya.
Mohon bantuannya,
Untuk menjalankan macro secara periodic (Otomatis running setiap hari jam 10 pagi),
dan hasilnya langsung menjadi lampiran email dan dikirim ke list email yang ada,
Bagaimana codenya?
Terima kasih atas Responnya.
Wassalam,
Syukur
..
Terima kasih,
Mohon maaf baru sempat eksekusi,
overall berjalan sesuai keinginan,
tapi menyisahkan 2 notif seperti ini,
[cid:image001.jpg@01D40955.15182100]
[cid:image002.jpg@01D40955.15182100]
Sementara harus manual click "continue" & "Allow"
Untuk menghilangkan ke 2 notif itu bagaimana ya?
Biar semua bisa berjalan otomatis.
Terima kasih atas pencerahannya.
Wassalam,'
Syukur
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Wednesday, May 30, 2018 8:57 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Tanya macro excel
Wa'alaikumusalam warahmatullah
Dear Syukur,
untuk memerintah excel melaksanakan kerja setiap pukul 10:00 dapat menggunakan cekrip:
If time = "10:00" then 'kerjanya di sini
sedangkan untuk kirim email dapat dilihat pesan Mas Kid di sini<http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-Kirim-Email-Otomatis-tt5727618.html#a5727722>, pesan Ron De Bruin di Microsoft ada di sini<https://msdn.microsoft.com/en-us/library/aa203718%28office.11%29.aspx> serta pesan web Rondebruin di sini<http://www.rondebruin.nl/win/section1.htm>
selamat mencoba, jika sudah jadi cekripnya dapat diposting kembali.
Wasalamualaikum warahmatullah.
Kenang Agus
On 5/30/2018 9:40 AM, 'Syukur, Muhamad' muhamad.syukur@bridgestone.com<mailto:muhamad.syukur@bridgestone.com> [belajar-excel] wrote:
Assalamu'alaikum..
Dear rekan rekan,
Mohon maaf jika pertanyaannya repost,
Anggota baru soalnya.
Mohon bantuannya,
Untuk menjalankan macro secara periodic (Otomatis running setiap hari jam 10 pagi),
dan hasilnya langsung menjadi lampiran email dan dikirim ke list email yang ada,
Bagaimana codenya?
Terima kasih atas Responnya.
Wassalam,
Syukur
..
Thu Jun 21, 2018 3:28 am (PDT) . Posted by:
"Syukur, Muhamad"
Dear Mas Kenang & All member
Info aja, untuk case ini sudah selesai,
untuk ke2 notif itu sudah bisa dihilangkan.
1. notif 1, itu karena rumus masih link ke file induk.
2. notif 2, ada di pengaturan security outlook-nya.
Demikian,
Terima kasih atas bantuan para suhu
Wassalam,
Syukur
From: Syukur, Muhamad
Sent: Thursday, June 21, 2018 11:44 AM
To: 'belajar-excel@yahoogroups.com'
Subject: RE: [belajar-excel] Tanya macro excel
Dear mas Kenang,
Terima kasih,
Mohon maaf baru sempat eksekusi,
overall berjalan sesuai keinginan,
tapi menyisahkan 2 notif seperti ini,
[cid:image001.jpg@01D40977.95A454C0]
[cid:image002.jpg@01D40977.95A454C0]
Sementara harus manual click "continue" & "Allow"
Untuk menghilangkan ke 2 notif itu bagaimana ya?
Biar semua bisa berjalan otomatis.
Terima kasih atas pencerahannya.
Wassalam,'
Syukur
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Wednesday, May 30, 2018 8:57 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Tanya macro excel
Wa'alaikumusalam warahmatullah
Dear Syukur,
untuk memerintah excel melaksanakan kerja setiap pukul 10:00 dapat menggunakan cekrip:
If time = "10:00" then 'kerjanya di sini
sedangkan untuk kirim email dapat dilihat pesan Mas Kid di sini<http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-Kirim-Email-Otomatis-tt5727618.html#a5727722>, pesan Ron De Bruin di Microsoft ada di sini<https://msdn.microsoft.com/en-us/library/aa203718%28office.11%29.aspx> serta pesan web Rondebruin di sini<http://www.rondebruin.nl/win/section1.htm>
selamat mencoba, jika sudah jadi cekripnya dapat diposting kembali.
Wasalamualaikum warahmatullah.
Kenang Agus
On 5/30/2018 9:40 AM, 'Syukur, Muhamad' muhamad.syukur@bridgestone.com<mailto:muhamad.syukur@bridgestone.com> [belajar-excel] wrote:
Assalamu'alaikum..
Dear rekan rekan,
Mohon maaf jika pertanyaannya repost,
Anggota baru soalnya.
Mohon bantuannya,
Untuk menjalankan macro secara periodic (Otomatis running setiap hari jam 10 pagi),
dan hasilnya langsung menjadi lampiran email dan dikirim ke list email yang ada,
Bagaimana codenya?
Terima kasih atas Responnya.
Wassalam,
Syukur
..
Info aja, untuk case ini sudah selesai,
untuk ke2 notif itu sudah bisa dihilangkan.
1. notif 1, itu karena rumus masih link ke file induk.
2. notif 2, ada di pengaturan security outlook-nya.
Demikian,
Terima kasih atas bantuan para suhu
Wassalam,
Syukur
From: Syukur, Muhamad
Sent: Thursday, June 21, 2018 11:44 AM
To: 'belajar-excel@yahoogroups.com'
Subject: RE: [belajar-excel] Tanya macro excel
Dear mas Kenang,
Terima kasih,
Mohon maaf baru sempat eksekusi,
overall berjalan sesuai keinginan,
tapi menyisahkan 2 notif seperti ini,
[cid:image001.jpg@01D40977.95A454C0]
[cid:image002.jpg@01D40977.95A454C0]
Sementara harus manual click "continue" & "Allow"
Untuk menghilangkan ke 2 notif itu bagaimana ya?
Biar semua bisa berjalan otomatis.
Terima kasih atas pencerahannya.
Wassalam,'
Syukur
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: Wednesday, May 30, 2018 8:57 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Tanya macro excel
Wa'alaikumusalam warahmatullah
Dear Syukur,
untuk memerintah excel melaksanakan kerja setiap pukul 10:00 dapat menggunakan cekrip:
If time = "10:00" then 'kerjanya di sini
sedangkan untuk kirim email dapat dilihat pesan Mas Kid di sini<http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-Kirim-Email-Otomatis-tt5727618.html#a5727722>, pesan Ron De Bruin di Microsoft ada di sini<https://msdn.microsoft.com/en-us/library/aa203718%28office.11%29.aspx> serta pesan web Rondebruin di sini<http://www.rondebruin.nl/win/section1.htm>
selamat mencoba, jika sudah jadi cekripnya dapat diposting kembali.
Wasalamualaikum warahmatullah.
Kenang Agus
On 5/30/2018 9:40 AM, 'Syukur, Muhamad' muhamad.syukur@bridgestone.com<mailto:muhamad.syukur@bridgestone.com> [belajar-excel] wrote:
Assalamu'alaikum..
Dear rekan rekan,
Mohon maaf jika pertanyaannya repost,
Anggota baru soalnya.
Mohon bantuannya,
Untuk menjalankan macro secara periodic (Otomatis running setiap hari jam 10 pagi),
dan hasilnya langsung menjadi lampiran email dan dikirim ke list email yang ada,
Bagaimana codenya?
Terima kasih atas Responnya.
Wassalam,
Syukur
..
Thu Jun 21, 2018 3:27 am (PDT) . Posted by:
setyadi_m
rekan2 master excel,
nubie ada problem dalam merubah tanggal menjadi format date yang ada di excel.
saya tarik data dari sistem, kemudian pada kolom tanggal formatnya text, sy coba ubah ke format "date" tidak bisa. tapi kalau sy klik F2 kemudian enter/tab, di berubah otomatis menjadi format date. cuma jadinya harus satu per satu
masalahnya recordnya ribuan, ada cara singkatnya agar tidak satu per satu?
terima kasih banyak master excel.
note : sy sudah coba search di postingan2 sebelumnya tp blm nemu yg kasus seperti saya.
nubie ada problem dalam merubah tanggal menjadi format date yang ada di excel.
saya tarik data dari sistem, kemudian pada kolom tanggal formatnya text, sy coba ubah ke format "date" tidak bisa. tapi kalau sy klik F2 kemudian enter/tab, di berubah otomatis menjadi format date. cuma jadinya harus satu per satu
masalahnya recordnya ribuan, ada cara singkatnya agar tidak satu per satu?
terima kasih banyak master excel.
note : sy sudah coba search di postingan2 sebelumnya tp blm nemu yg kasus seperti saya.
Thu Jun 21, 2018 3:40 am (PDT) . Posted by:
"zainul_ulum[at]yahoo.com" zainul_ulum
coba cara ini:1. misal tanggal yang dirubah mulai di A2 kemudian
di B2=A2+0format B2 menjadi format date.
2. buat angka 0 di sembarang cell kosong misal di A1. click kanan
cell A1, pilih copy. block kolom tanggal yang akan dirubah. click
kanan, paste special, add
thanks-zainul
On Jun 21, 2018 3:18 PM, "setyadi_m@yahoo.com [belajar-excel]"
<belajar-excel@yahoogroups.com> wrote:
rekan2 master excel,
nubie ada problem dalam merubah tanggal menjadi format date yang
ada di excel.
saya tarik data dari sistem, kemudian pada kolom tanggal
formatnya text, sy coba ubah ke format "date" tidak bisa. tapi
kalau sy klik F2 kemudian enter/tab, di berubah otomatis menjadi
format date. cuma jadinya harus satu per satu
masalahnya recordnya ribuan, ada cara singkatnya agar tidak satu
per satu?
terima kasih banyak master excel.
note : sy sudah coba search di postingan2 sebelumnya tp blm nemu
yg kasus seperti saya.
di B2=A2+0format B2 menjadi format date.
2. buat angka 0 di sembarang cell kosong misal di A1. click kanan
cell A1, pilih copy. block kolom tanggal yang akan dirubah. click
kanan, paste special, add
thanks-zainul
On Jun 21, 2018 3:18 PM, "setyadi_m@yahoo.com [belajar-excel]"
<belajar-excel@yahoogroups.com> wrote:
rekan2 master excel,
nubie ada problem dalam merubah tanggal menjadi format date yang
ada di excel.
saya tarik data dari sistem, kemudian pada kolom tanggal
formatnya text, sy coba ubah ke format "date" tidak bisa. tapi
kalau sy klik F2 kemudian enter/tab, di berubah otomatis menjadi
format date. cuma jadinya harus satu per satu
masalahnya recordnya ribuan, ada cara singkatnya agar tidak satu
per satu?
terima kasih banyak master excel.
note : sy sudah coba search di postingan2 sebelumnya tp blm nemu
yg kasus seperti saya.
Thu Jun 21, 2018 5:08 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Pinjam uraian pak Zainul, coba juga dikali (multiply) dengan 1..
Salam,HK
Sent from Yahoo Mail on Android
On Thu, Jun 21, 2018 at 17:40, 'zainul_ulum[at]yahoo.com' zainul_ulum@yahoo.com [belajar-excel]<belajar-excel@yahoogroups.com> wrote:
coba cara ini:1. misal tanggal yang dirubah mulai di A2 kemudian di B2=A2+0format B2 menjadi format date.
2. buat angka 0 di sembarang cell kosong misal di A1. click kanan cell A1, pilih copy. block kolom tanggal yang akan dirubah. click kanan, paste special, add
thanks-zainul
On Jun 21, 2018 3:18 PM, "setyadi_m@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
rekan2 master excel,
nubie ada problem dalam merubah tanggal menjadi format date yang ada di excel.
saya tarik data dari sistem, kemudian pada kolom tanggal formatnya text, sy coba ubah ke format "date" tidak bisa. tapi kalau sy klik F2 kemudian enter/tab, di berubah otomatis menjadi format date. cuma jadinya harus satu per satu
masalahnya recordnya ribuan, ada cara singkatnya agar tidak satu per satu?
terima kasih banyak master excel.
note : sy sudah coba search di postingan2 sebelumnya tp blm nemu yg kasus seperti saya.
#yiv8082318640 #yiv8082318640 -- #yiv8082318640ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv8082318640 #yiv8082318640ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv8082318640 #yiv8082318640ygrp-mkp #yiv8082318640hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv8082318640 #yiv8082318640ygrp-mkp #yiv8082318640ads {margin-bottom:10px;}#yiv8082318640 #yiv8082318640ygrp-mkp .yiv8082318640ad {padding:0 0;}#yiv8082318640 #yiv8082318640ygrp-mkp .yiv8082318640ad p {margin:0;}#yiv8082318640 #yiv8082318640ygrp-mkp .yiv8082318640ad a {color:#0000ff;text-decoration:none;}#yiv8082318640 #yiv8082318640ygrp-sponsor #yiv8082318640ygrp-lc {font-family:Arial;}#yiv8082318640 #yiv8082318640ygrp-sponsor #yiv8082318640ygrp-lc #yiv8082318640hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv8082318640 #yiv8082318640ygrp-sponsor #yiv8082318640ygrp-lc .yiv8082318640ad {margin-bottom:10px;padding:0 0;}#yiv8082318640 #yiv8082318640actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv8082318640 #yiv8082318640activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv8082318640 #yiv8082318640activity span {font-weight:700;}#yiv8082318640 #yiv8082318640activity span:first-child {text-transform:uppercase;}#yiv8082318640 #yiv8082318640activity span a {color:#5085b6;text-decoration:none;}#yiv8082318640 #yiv8082318640activity span span {color:#ff7900;}#yiv8082318640 #yiv8082318640activity span .yiv8082318640underline {text-decoration:underline;}#yiv8082318640 .yiv8082318640attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv8082318640 .yiv8082318640attach div a {text-decoration:none;}#yiv8082318640 .yiv8082318640attach img {border:none;padding-right:5px;}#yiv8082318640 .yiv8082318640attach label {display:block;margin-bottom:5px;}#yiv8082318640 .yiv8082318640attach label a {text-decoration:none;}#yiv8082318640 blockquote {margin:0 0 0 4px;}#yiv8082318640 .yiv8082318640bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv8082318640 .yiv8082318640bold a {text-decoration:none;}#yiv8082318640 dd.yiv8082318640last p a {font-family:Verdana;font-weight:700;}#yiv8082318640 dd.yiv8082318640last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv8082318640 dd.yiv8082318640last p span.yiv8082318640yshortcuts {margin-right:0;}#yiv8082318640 div.yiv8082318640attach-table div div a {text-decoration:none;}#yiv8082318640 div.yiv8082318640attach-table {width:400px;}#yiv8082318640 div.yiv8082318640file-title a, #yiv8082318640 div.yiv8082318640file-title a:active, #yiv8082318640 div.yiv8082318640file-title a:hover, #yiv8082318640 div.yiv8082318640file-title a:visited {text-decoration:none;}#yiv8082318640 div.yiv8082318640photo-title a, #yiv8082318640 div.yiv8082318640photo-title a:active, #yiv8082318640 div.yiv8082318640photo-title a:hover, #yiv8082318640 div.yiv8082318640photo-title a:visited {text-decoration:none;}#yiv8082318640 div#yiv8082318640ygrp-mlmsg #yiv8082318640ygrp-msg p a span.yiv8082318640yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv8082318640 .yiv8082318640green {color:#628c2a;}#yiv8082318640 .yiv8082318640MsoNormal {margin:0 0 0 0;}#yiv8082318640 o {font-size:0;}#yiv8082318640 #yiv8082318640photos div {float:left;width:72px;}#yiv8082318640 #yiv8082318640photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv8082318640 #yiv8082318640photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv8082318640 #yiv8082318640reco-category {font-size:77%;}#yiv8082318640 #yiv8082318640reco-desc {font-size:77%;}#yiv8082318640 .yiv8082318640replbq {margin:4px;}#yiv8082318640 #yiv8082318640ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv8082318640 #yiv8082318640ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv8082318640 #yiv8082318640ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv8082318640 #yiv8082318640ygrp-mlmsg select, #yiv8082318640 input, #yiv8082318640 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv8082318640 #yiv8082318640ygrp-mlmsg pre, #yiv8082318640 code {font:115% monospace;}#yiv8082318640 #yiv8082318640ygrp-mlmsg * {line-height:1.22em;}#yiv8082318640 #yiv8082318640ygrp-mlmsg #yiv8082318640logo {padding-bottom:10px;}#yiv8082318640 #yiv8082318640ygrp-msg p a {font-family:Verdana;}#yiv8082318640 #yiv8082318640ygrp-msg p#yiv8082318640attach-count span {color:#1E66AE;font-weight:700;}#yiv8082318640 #yiv8082318640ygrp-reco #yiv8082318640reco-head {color:#ff7900;font-weight:700;}#yiv8082318640 #yiv8082318640ygrp-reco {margin-bottom:20px;padding:0px;}#yiv8082318640 #yiv8082318640ygrp-sponsor #yiv8082318640ov li a {font-size:130%;text-decoration:none;}#yiv8082318640 #yiv8082318640ygrp-sponsor #yiv8082318640ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv8082318640 #yiv8082318640ygrp-sponsor #yiv8082318640ov ul {margin:0;padding:0 0 0 8px;}#yiv8082318640 #yiv8082318640ygrp-text {font-family:Georgia;}#yiv8082318640 #yiv8082318640ygrp-text p {margin:0 0 1em 0;}#yiv8082318640 #yiv8082318640ygrp-text tt {font-size:120%;}#yiv8082318640 #yiv8082318640ygrp-vital ul li:last-child {border-right:none !important;}#yiv8082318640
Salam,HK
Sent from Yahoo Mail on Android
On Thu, Jun 21, 2018 at 17:40, 'zainul_ulum[at]yahoo.com' zainul_ulum@yahoo.com [belajar-excel]<belajar-excel@yahoogroups.com> wrote:
coba cara ini:1. misal tanggal yang dirubah mulai di A2 kemudian di B2=A2+0format B2 menjadi format date.
2. buat angka 0 di sembarang cell kosong misal di A1. click kanan cell A1, pilih copy. block kolom tanggal yang akan dirubah. click kanan, paste special, add
thanks-zainul
On Jun 21, 2018 3:18 PM, "setyadi_m@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
rekan2 master excel,
nubie ada problem dalam merubah tanggal menjadi format date yang ada di excel.
saya tarik data dari sistem, kemudian pada kolom tanggal formatnya text, sy coba ubah ke format "date" tidak bisa. tapi kalau sy klik F2 kemudian enter/tab, di berubah otomatis menjadi format date. cuma jadinya harus satu per satu
masalahnya recordnya ribuan, ada cara singkatnya agar tidak satu per satu?
terima kasih banyak master excel.
note : sy sudah coba search di postingan2 sebelumnya tp blm nemu yg kasus seperti saya.
#yiv8082318640 #yiv8082318640 -- #yiv8082318640ygrp-
============================================================
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