9 Messages
Digest #4714
Messages
Wed Feb 20, 2019 10:38 pm (PST) . Posted by:
"Cari Kebenaran"
Assalamu'alaikum Wr. Wb.
Para Master dan anggota milis. Saya mau bertanya lagi. Mohon dibantu VBA
Code. Saya ingin mengisi range berdasarkan keberadaan data di kolom
sampingnya. Dengan menekan tombol COPY, saya ingin mengisi range D2:G10 di
sheet ini (DATANILAI) dengan nilai (value) yang berasal dari range C5:F5 di
sheet INPUT.
Dalam contoh ini memang yang perlu diisi adalah range D2:G10, tetapi perlu
diingat bahwa tabel bersifat dinamis. Bisa jadi suatu ketika yang perlu
diisi adalah D11:G25 tergantung keberadaan data pada kolom A, B, dan C yang
bersifat dinamis.
Lihat lampiran. Terima kasih
Para Master dan anggota milis. Saya mau bertanya lagi. Mohon dibantu VBA
Code. Saya ingin mengisi range berdasarkan keberadaan data di kolom
sampingnya. Dengan menekan tombol COPY, saya ingin mengisi range D2:G10 di
sheet ini (DATANILAI) dengan nilai (value) yang berasal dari range C5:F5 di
sheet INPUT.
Dalam contoh ini memang yang perlu diisi adalah range D2:G10, tetapi perlu
diingat bahwa tabel bersifat dinamis. Bisa jadi suatu ketika yang perlu
diisi adalah D11:G25 tergantung keberadaan data pada kolom A, B, dan C yang
bersifat dinamis.
Lihat lampiran. Terima kasih
Wed Feb 20, 2019 10:44 pm (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
wa'alaikumussalam wr wb
Pakai power pivot atau power query aja...
tinggal tekan refresh refresh all
wassalamu'alaikum wr wb
Kid
On Thu, Feb 21, 2019 at 1:39 PM Cari Kebenaran cahayailmu71@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Assalamu'alaikum Wr. Wb.
>
>
> Para Master dan anggota milis. Saya mau bertanya lagi. Mohon dibantu VBA
> Code. Saya ingin mengisi range berdasarkan keberadaan data di kolom
> sampingnya. Dengan menekan tombol COPY, saya ingin mengisi range D2:G10
> di sheet ini (DATANILAI) dengan nilai (value) yang berasal dari range C5:F5
> di sheet INPUT.
>
> Dalam contoh ini memang yang perlu diisi adalah range D2:G10, tetapi perlu
> diingat bahwa tabel bersifat dinamis. Bisa jadi suatu ketika yang perlu
> diisi adalah D11:G25 tergantung keberadaan data pada kolom A, B, dan C yang
> bersifat dinamis.
>
>
> Lihat lampiran.. Terima kasih
>
>
>
Pakai power pivot atau power query aja...
tinggal tekan refresh refresh all
wassalamu'alaikum wr wb
Kid
On Thu, Feb 21, 2019 at 1:39 PM Cari Kebenaran cahayailmu71@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Assalamu'
>
>
> Para Master dan anggota milis. Saya mau bertanya lagi. Mohon dibantu VBA
> Code. Saya ingin mengisi range berdasarkan keberadaan data di kolom
> sampingnya. Dengan menekan tombol COPY, saya ingin mengisi range D2:G10
> di sheet ini (DATANILAI) dengan nilai (value) yang berasal dari range C5:F5
> di sheet INPUT.
>
> Dalam contoh ini memang yang perlu diisi adalah range D2:G10, tetapi perlu
> diingat bahwa tabel bersifat dinamis. Bisa jadi suatu ketika yang perlu
> diisi adalah D11:G25 tergantung keberadaan data pada kolom A, B, dan C yang
> bersifat dinamis.
>
>
> Lihat lampiran.. Terima kasih
>
>
>
Wed Feb 20, 2019 10:39 pm (PST) . Posted by:
"Cari Kebenaran"
Terima kasih Pak Hendrik atas masukannya.
File terlampir adalah hasil perpaduan antara saran Pak Hendrik dengan rumus
dari Pak Ghozy. Di file ini, untuk melakukan transpose tabel, saya harus
memilih cell C2:C73 lalu klik tombol TRANSPOSE. Saya menginginkan tidak
perlu memilih range C2:C73 TETAPI hanya cukup memilih cell C2 lalu tekan
tombol TRANSPOSE, maka itu sangat mempersingkat pekerjaan. Bagaimana VBA
Code-nya Pak. Tolong dimodif. Terima kasih.
On Wed, Feb 20, 2019 at 1:54 PM hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Boleh ikutan jawab ya.
>
> Pertanyaan:
> Jika menggunakan rumus dari Pak Ghozy memunculkan 1 pertanyaan: Apakah
> jumlah baris yang diperlukan untuk hasil transpose tabel adalah sejumlah
> perkalian BARIS DAN KOLOM...? Dalam contoh saya ada 6 baris dan 12 kolom,
> maka 6 x 12 = 72.
>
> Jawab:
> Ya (baris x kolom +1 (judul)), jadi 73 baris
> Jika baris dan kolom barubah maka
> INPUT!$A$9:$A$14
> INPUT!$B$8:$M$8
> INPUT!$B$9:$M$14
> bisa diganti dengan nama2 Range (mis. Indikator, Nama, dan Data) dan
> jumlah barisnya akan berubah juga (baris x kolom + 1)
>
> Salam,
> HK
>
>
>
> Pada Rabu, 20 Februari 2019 12.05.29 GMT+7, Cari Kebenaran
> cahayailmu71@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
>
> Terima kasih kepada para master yang telah menjawab pertanyaan saya. Rumus
> dari Pak Ghozy berjalan dengan baik. Masukkan Pak Hendrik telah menambah
> pengetahuan dan telah saya coba. Jika menggunakan rumus dari Pak Ghozy
> memunculkan 1 pertanyaan: Apakah jumlah baris yang diperlukan untuk hasil
> transpose tabel adalah sejumlah perkalian BARIS DAN KOLOM...? Dalam contoh
> saya ada 6 baris dan 12 kolom, maka 6 x 12 = 72..? Mohon tanggapannya.
> Terima kasih
>
> On Tue, Feb 19, 2019 at 2:33 PM Pak Cik Lukman pakciklukman@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
>
> Terima kasih Pak Hendrik atas info dan penjelasannya
>
> Wasalam,
>
> On Tue, Feb 19, 2019, 09:53 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com wrote:
>
>
>
> Sedikit tambahan....
> Dengan merekam, di VBE sheet akan tampak ..FormulaR1C1.
> Jika formula ingin ditulis (mis pada sel yang aktif) maka penulisannya
> menjadi:
> ActiveCell.Formula = "........" dimana
> ........ adalah formula yang tampak pada Formula Bar pada sheet yang
> aktif..
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview..mail.yahoo.com/mobile/?.src=Android>
>
> On Tue, Feb 19, 2019 at 9:37, hendrik karnadi
> <hendrikkarnadi@yahoo.com> wrote:
> Hai Lukman,
> Bisa, dengan merekam macro.
>
> Sebelum menulis formula, klik Macro Recording melalui melalui menu View
> Macro atau Developer.
> Setelah selesai menulis formula dan menekan Enter klik Stop Recording.
>
> Formula akan tertulis secara otomatis di VBE Sheet....untuk melihatnya
> tekan Alt F11.
> Simpan File dengan extension :
> .xls (Excel 2003 dan sebel.)
> .xlsm atau .xlsb (Excel 2007 ke atas).
>
> Sebelum menjalankan macro (Excel 2007/2010 ke atas)...macronya harus
> diaktifkan terlebih dahulu mel menu Developer, Macro Security.
> Jika belum ada Developer dalam Ribbon...maka harus ditampilkan terlebih
> dahulu dengan mengklik kanan Ribbon kemudian centang Developer pada
> checkbox disampingnya.
>
> Semoga bermanfaat.
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview..mail.yahoo.com/mobile/?..src=Android>
>
> On Tue, Feb 19, 2019 at 8:45, Pak Cik Lukman pakciklukman@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com> wrote:
>
>
> Dear pak Ghozi,
>
> Diskusi sedikit... saya tdk faham ttg VBA, tetapi bisa kah formula pak
> Ghozi di translate ke VBA? Misal dgn memasukan formula (yg sdh ditranslate
> ke dlm bhs vba) ke dlm commanbutton "transpose" ??
>
> Salam
>
> On Mon, Feb 18, 2019, 19:08 ghozi alkatiri ghozialkatiri@yahoo.co..id
> <ghozialkatiri@yahoo.co.id> [belajar-excel] <belajar-excel@yahoogroups.com
> wrote:
>
>
>
> Waalaikum Salam WarohmatuLLAHI WabarokaaTUH
> sambil nunggu solusi Vba
>
> saya menawarkan solusi pakai formula barang kali ada gunanya..
>
> sheet DATANILAI
>
> untuk isian tabel indikator tulis di A2
> =INDEX(INPUT!$A$9:$A$14,TRUNC((ROW(A1)-1)/12)+1)
> copy ke bawah
>
> untuk isian tabel Nama tulis di B2
> =INDEX(INPUT!$B$8:$M$8,MOD(ROW(A1)-1,12)+1) copy ke bawah
>
> untuk isian tabel Nama tulis di B2
>
> =INDEX(INPUT!$B$9:$M$14,TRUNC((ROW(A1)-1)/12)+1,MATCH(B2,INPUT!$B$8:$M$8,0))
> copy ke bawah
>
> wassalam
>
> Ghozi Alkatiri
> Pada Senin, 18 Februari 2019 18.24.16 WIB, Cari Kebenaran
> cahayailmu71@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
>
> Assalamu'alaikum Wr. Wb.
>
> Kepada para Master dan anggota milis. Tolong dibantu vba code. Saya ingin
> melakukan transpose table. Table INDIKATOR PENILAIAN di sheet INPUT ingin
> saya transpose secara otomatis di sheet DATANILAI dengan menekan tombol
> "TRANSPOSE".. Selama ini saya melakukannya secara manual yaitu melalui
> fasilitas bawaan excel: PIVOTTABLE AND PIVOTCHART WIZARD. Hasilnya bisa
> dilihat di sheet DATANILAI.
>
> Mohon dibuatkan kode VBA-nya. Syukur kalau kotak dialog untuk memilih cell
> (disheet tertentu) untuk menempatkan tabel hasil transpose.
>
> Demikian terima kasih.
>
> Wassalamu'alaikum Wr.. Wb.
>
>
>
File terlampir adalah hasil perpaduan antara saran Pak Hendrik dengan rumus
dari Pak Ghozy. Di file ini, untuk melakukan transpose tabel, saya harus
memilih cell C2:C73 lalu klik tombol TRANSPOSE. Saya menginginkan tidak
perlu memilih range C2:C73 TETAPI hanya cukup memilih cell C2 lalu tekan
tombol TRANSPOSE, maka itu sangat mempersingkat pekerjaan. Bagaimana VBA
Code-nya Pak. Tolong dimodif. Terima kasih.
On Wed, Feb 20, 2019 at 1:54 PM hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Boleh ikutan jawab ya.
>
> Pertanyaan:
> Jika menggunakan rumus dari Pak Ghozy memunculkan 1 pertanyaan: Apakah
> jumlah baris yang diperlukan untuk hasil transpose tabel adalah sejumlah
> perkalian BARIS DAN KOLOM...? Dalam contoh saya ada 6 baris dan 12 kolom,
> maka 6 x 12 = 72.
>
> Jawab:
> Ya (baris x kolom +1 (judul)), jadi 73 baris
> Jika baris dan kolom barubah maka
> INPUT!$A$9:$A$14
> INPUT!$B$8:$M$8
> INPUT!$B$9:$M$14
> bisa diganti dengan nama2 Range (mis. Indikator, Nama, dan Data) dan
> jumlah barisnya akan berubah juga (baris x kolom + 1)
>
> Salam,
> HK
>
>
>
> Pada Rabu, 20 Februari 2019 12.05.29 GMT+7, Cari Kebenaran
> cahayailmu71@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
>
> Terima kasih kepada para master yang telah menjawab pertanyaan saya. Rumus
> dari Pak Ghozy berjalan dengan baik. Masukkan Pak Hendrik telah menambah
> pengetahuan dan telah saya coba. Jika menggunakan rumus dari Pak Ghozy
> memunculkan 1 pertanyaan: Apakah jumlah baris yang diperlukan untuk hasil
> transpose tabel adalah sejumlah perkalian BARIS DAN KOLOM...? Dalam contoh
> saya ada 6 baris dan 12 kolom, maka 6 x 12 = 72..? Mohon tanggapannya.
> Terima kasih
>
> On Tue, Feb 19, 2019 at 2:33 PM Pak Cik Lukman pakciklukman@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
>
> Terima kasih Pak Hendrik atas info dan penjelasannya
>
> Wasalam,
>
> On Tue, Feb 19, 2019, 09:53 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com wrote:
>
>
>
> Sedikit tambahan....
> Dengan merekam, di VBE sheet akan tampak ..FormulaR1C1.
> Jika formula ingin ditulis (mis pada sel yang aktif) maka penulisannya
> menjadi:
> ActiveCell.Formula = "........" dimana
> ........ adalah formula yang tampak pada Formula Bar pada sheet yang
> aktif..
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview..mail.yahoo.com/mobile/?.src=Android>
>
> On Tue, Feb 19, 2019 at 9:37, hendrik karnadi
> <hendrikkarnadi@yahoo.com> wrote:
> Hai Lukman,
> Bisa, dengan merekam macro.
>
> Sebelum menulis formula, klik Macro Recording melalui melalui menu View
> Macro atau Developer.
> Setelah selesai menulis formula dan menekan Enter klik Stop Recording.
>
> Formula akan tertulis secara otomatis di VBE Sheet....untuk melihatnya
> tekan Alt F11.
> Simpan File dengan extension :
> .xls (Excel 2003 dan sebel.)
> .xlsm atau .xlsb (Excel 2007 ke atas).
>
> Sebelum menjalankan macro (Excel 2007/2010 ke atas)...macronya harus
> diaktifkan terlebih dahulu mel menu Developer, Macro Security.
> Jika belum ada Developer dalam Ribbon...maka harus ditampilkan terlebih
> dahulu dengan mengklik kanan Ribbon kemudian centang Developer pada
> checkbox disampingnya.
>
> Semoga bermanfaat.
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview..mail.yahoo.com/mobile/?..src=Android>
>
> On Tue, Feb 19, 2019 at 8:45, Pak Cik Lukman pakciklukman@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com> wrote:
>
>
> Dear pak Ghozi,
>
> Diskusi sedikit... saya tdk faham ttg VBA, tetapi bisa kah formula pak
> Ghozi di translate ke VBA? Misal dgn memasukan formula (yg sdh ditranslate
> ke dlm bhs vba) ke dlm commanbutton "transpose" ??
>
> Salam
>
> On Mon, Feb 18, 2019, 19:08 ghozi alkatiri ghozialkatiri@yahoo.co..id
> <ghozialkatiri@yahoo.co.id> [belajar-excel] <belajar-excel@yahoogroups.com
> wrote:
>
>
>
> Waalaikum Salam WarohmatuLLAHI WabarokaaTUH
> sambil nunggu solusi Vba
>
> saya menawarkan solusi pakai formula barang kali ada gunanya..
>
> sheet DATANILAI
>
> untuk isian tabel indikator tulis di A2
> =INDEX(INPUT!$A$9:$A$14,TRUNC((ROW(A1)-1)/12)+1)
> copy ke bawah
>
> untuk isian tabel Nama tulis di B2
> =INDEX(INPUT!$B$8:$M$8,MOD(ROW(A1)-1,12)+1) copy ke bawah
>
> untuk isian tabel Nama tulis di B2
>
> =INDEX(INPUT!$B$9:$M$14,TRUNC((ROW(A1)-1)/12)+1,MATCH(B2,INPUT!$B$8:$M$8,0))
> copy ke bawah
>
> wassalam
>
> Ghozi Alkatiri
> Pada Senin, 18 Februari 2019 18.24.16 WIB, Cari Kebenaran
> cahayailmu71@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
>
> Assalamu'
>
> Kepada para Master dan anggota milis. Tolong dibantu vba code. Saya ingin
> melakukan transpose table. Table INDIKATOR PENILAIAN di sheet INPUT ingin
> saya transpose secara otomatis di sheet DATANILAI dengan menekan tombol
> "TRANSPOSE&quo
> fasilitas bawaan excel: PIVOTTABLE AND PIVOTCHART WIZARD. Hasilnya bisa
> dilihat di sheet DATANILAI.
>
> Mohon dibuatkan kode VBA-nya. Syukur kalau kotak dialog untuk memilih cell
> (disheet tertentu) untuk menempatkan tabel hasil transpose.
>
> Demikian terima kasih.
>
> Wassalamu'
>
>
>
Wed Feb 20, 2019 10:39 pm (PST) . Posted by:
"Cari Kebenaran"
Terima kasih Pak Hendrik atas masukannya.
File terlampir adalah hasil perpaduan antara saran Pak Hendrik dengan rumus
dari Pak Ghozy. Di file ini, untuk melakukan transpose tabel, saya harus
memilih cell C2:C73 lalu klik tombol TRANSPOSE. Saya menginginkan tidak
perlu memilih range C2:C73 TETAPI hanya cukup memilih cell C2 lalu tekan
tombol TRANSPOSE di sheet TRANSPOSE (lihat lampiran), maka itu sangat
mempersingkat pekerjaan. Bagaimana VBA Code-nya Pak. Tolong dimodif.
Terima kasih.
On Wed, Feb 20, 2019 at 1:54 PM hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Boleh ikutan jawab ya.
>
> Pertanyaan:
> Jika menggunakan rumus dari Pak Ghozy memunculkan 1 pertanyaan: Apakah
> jumlah baris yang diperlukan untuk hasil transpose tabel adalah sejumlah
> perkalian BARIS DAN KOLOM...? Dalam contoh saya ada 6 baris dan 12 kolom,
> maka 6 x 12 = 72.
>
> Jawab:
> Ya (baris x kolom +1 (judul)), jadi 73 baris
> Jika baris dan kolom barubah maka
> INPUT!$A$9:$A$14
> INPUT!$B$8:$M$8
> INPUT!$B$9:$M$14
> bisa diganti dengan nama2 Range (mis. Indikator, Nama, dan Data) dan
> jumlah barisnya akan berubah juga (baris x kolom + 1)
>
> Salam,
> HK
>
>
>
> Pada Rabu, 20 Februari 2019 12.05.29 GMT+7, Cari Kebenaran
> cahayailmu71@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
>
> Terima kasih kepada para master yang telah menjawab pertanyaan saya. Rumus
> dari Pak Ghozy berjalan dengan baik. Masukkan Pak Hendrik telah menambah
> pengetahuan dan telah saya coba. Jika menggunakan rumus dari Pak Ghozy
> memunculkan 1 pertanyaan: Apakah jumlah baris yang diperlukan untuk hasil
> transpose tabel adalah sejumlah perkalian BARIS DAN KOLOM....? Dalam contoh
> saya ada 6 baris dan 12 kolom, maka 6 x 12 = 72..? Mohon tanggapannya.
> Terima kasih
>
> On Tue, Feb 19, 2019 at 2:33 PM Pak Cik Lukman pakciklukman@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
>
> Terima kasih Pak Hendrik atas info dan penjelasannya
>
> Wasalam,
>
> On Tue, Feb 19, 2019, 09:53 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com wrote:
>
>
>
> Sedikit tambahan....
> Dengan merekam, di VBE sheet akan tampak ..FormulaR1C1.
> Jika formula ingin ditulis (mis pada sel yang aktif) maka penulisannya
> menjadi:
> ActiveCell.Formula = "........" dimana
> ........ adalah formula yang tampak pada Formula Bar pada sheet yang
> aktif..
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview..mail.yahoo.com/mobile/?.src=Android>
>
> On Tue, Feb 19, 2019 at 9:37, hendrik karnadi
> <hendrikkarnadi@yahoo.com> wrote:
> Hai Lukman,
> Bisa, dengan merekam macro.
>
> Sebelum menulis formula, klik Macro Recording melalui melalui menu View
> Macro atau Developer.
> Setelah selesai menulis formula dan menekan Enter klik Stop Recording.
>
> Formula akan tertulis secara otomatis di VBE Sheet....untuk melihatnya
> tekan Alt F11.
> Simpan File dengan extension :
> .xls (Excel 2003 dan sebel.)
> .xlsm atau .xlsb (Excel 2007 ke atas).
>
> Sebelum menjalankan macro (Excel 2007/2010 ke atas)...macronya harus
> diaktifkan terlebih dahulu mel menu Developer, Macro Security.
> Jika belum ada Developer dalam Ribbon...maka harus ditampilkan terlebih
> dahulu dengan mengklik kanan Ribbon kemudian centang Developer pada
> checkbox disampingnya.
>
> Semoga bermanfaat.
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview..mail.yahoo.com/mobile/?..src=Android>
>
> On Tue, Feb 19, 2019 at 8:45, Pak Cik Lukman pakciklukman@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com> wrote:
>
>
> Dear pak Ghozi,
>
> Diskusi sedikit... saya tdk faham ttg VBA, tetapi bisa kah formula pak
> Ghozi di translate ke VBA? Misal dgn memasukan formula (yg sdh ditranslate
> ke dlm bhs vba) ke dlm commanbutton "transpose" ??
>
> Salam
>
> On Mon, Feb 18, 2019, 19:08 ghozi alkatiri ghozialkatiri@yahoo.co..id
> <ghozialkatiri@yahoo.co.id> [belajar-excel] <belajar-excel@yahoogroups.com
> wrote:
>
>
>
> Waalaikum Salam WarohmatuLLAHI WabarokaaTUH
> sambil nunggu solusi Vba
>
> saya menawarkan solusi pakai formula barang kali ada gunanya..
>
> sheet DATANILAI
>
> untuk isian tabel indikator tulis di A2
> =INDEX(INPUT!$A$9:$A$14,TRUNC((ROW(A1)-1)/12)+1)
> copy ke bawah
>
> untuk isian tabel Nama tulis di B2
> =INDEX(INPUT!$B$8:$M$8,MOD(ROW(A1)-1,12)+1) copy ke bawah
>
> untuk isian tabel Nama tulis di B2
>
> =INDEX(INPUT!$B$9:$M$14,TRUNC((ROW(A1)-1)/12)+1,MATCH(B2,INPUT!$B$8:$M$8,0))
> copy ke bawah
>
> wassalam
>
> Ghozi Alkatiri
> Pada Senin, 18 Februari 2019 18.24.16 WIB, Cari Kebenaran
> cahayailmu71@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
>
> Assalamu'alaikum Wr. Wb.
>
> Kepada para Master dan anggota milis. Tolong dibantu vba code. Saya ingin
> melakukan transpose table. Table INDIKATOR PENILAIAN di sheet INPUT ingin
> saya transpose secara otomatis di sheet DATANILAI dengan menekan tombol
> "TRANSPOSE".. Selama ini saya melakukannya secara manual yaitu melalui
> fasilitas bawaan excel: PIVOTTABLE AND PIVOTCHART WIZARD. Hasilnya bisa
> dilihat di sheet DATANILAI.
>
> Mohon dibuatkan kode VBA-nya. Syukur kalau kotak dialog untuk memilih cell
> (disheet tertentu) untuk menempatkan tabel hasil transpose.
>
> Demikian terima kasih.
>
> Wassalamu'alaikum Wr.. Wb.
>
>
>
File terlampir adalah hasil perpaduan antara saran Pak Hendrik dengan rumus
dari Pak Ghozy. Di file ini, untuk melakukan transpose tabel, saya harus
memilih cell C2:C73 lalu klik tombol TRANSPOSE. Saya menginginkan tidak
perlu memilih range C2:C73 TETAPI hanya cukup memilih cell C2 lalu tekan
tombol TRANSPOSE di sheet TRANSPOSE (lihat lampiran), maka itu sangat
mempersingkat pekerjaan. Bagaimana VBA Code-nya Pak. Tolong dimodif.
Terima kasih.
On Wed, Feb 20, 2019 at 1:54 PM hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Boleh ikutan jawab ya.
>
> Pertanyaan:
> Jika menggunakan rumus dari Pak Ghozy memunculkan 1 pertanyaan: Apakah
> jumlah baris yang diperlukan untuk hasil transpose tabel adalah sejumlah
> perkalian BARIS DAN KOLOM...? Dalam contoh saya ada 6 baris dan 12 kolom,
> maka 6 x 12 = 72.
>
> Jawab:
> Ya (baris x kolom +1 (judul)), jadi 73 baris
> Jika baris dan kolom barubah maka
> INPUT!$A$9:$A$14
> INPUT!$B$8:$M$8
> INPUT!$B$9:$M$14
> bisa diganti dengan nama2 Range (mis. Indikator, Nama, dan Data) dan
> jumlah barisnya akan berubah juga (baris x kolom + 1)
>
> Salam,
> HK
>
>
>
> Pada Rabu, 20 Februari 2019 12.05.29 GMT+7, Cari Kebenaran
> cahayailmu71@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
>
> Terima kasih kepada para master yang telah menjawab pertanyaan saya. Rumus
> dari Pak Ghozy berjalan dengan baik. Masukkan Pak Hendrik telah menambah
> pengetahuan dan telah saya coba. Jika menggunakan rumus dari Pak Ghozy
> memunculkan 1 pertanyaan: Apakah jumlah baris yang diperlukan untuk hasil
> transpose tabel adalah sejumlah perkalian BARIS DAN KOLOM....? Dalam contoh
> saya ada 6 baris dan 12 kolom, maka 6 x 12 = 72..? Mohon tanggapannya.
> Terima kasih
>
> On Tue, Feb 19, 2019 at 2:33 PM Pak Cik Lukman pakciklukman@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
>
> Terima kasih Pak Hendrik atas info dan penjelasannya
>
> Wasalam,
>
> On Tue, Feb 19, 2019, 09:53 hendrik karnadi hendrikkarnadi@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com wrote:
>
>
>
> Sedikit tambahan....
> Dengan merekam, di VBE sheet akan tampak ..FormulaR1C1.
> Jika formula ingin ditulis (mis pada sel yang aktif) maka penulisannya
> menjadi:
> ActiveCell.Formula = "........" dimana
> ........ adalah formula yang tampak pada Formula Bar pada sheet yang
> aktif..
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview..mail.yahoo.com/mobile/?.src=Android>
>
> On Tue, Feb 19, 2019 at 9:37, hendrik karnadi
> <hendrikkarnadi@yahoo.com> wrote:
> Hai Lukman,
> Bisa, dengan merekam macro.
>
> Sebelum menulis formula, klik Macro Recording melalui melalui menu View
> Macro atau Developer.
> Setelah selesai menulis formula dan menekan Enter klik Stop Recording.
>
> Formula akan tertulis secara otomatis di VBE Sheet....untuk melihatnya
> tekan Alt F11.
> Simpan File dengan extension :
> .xls (Excel 2003 dan sebel.)
> .xlsm atau .xlsb (Excel 2007 ke atas).
>
> Sebelum menjalankan macro (Excel 2007/2010 ke atas)...macronya harus
> diaktifkan terlebih dahulu mel menu Developer, Macro Security.
> Jika belum ada Developer dalam Ribbon...maka harus ditampilkan terlebih
> dahulu dengan mengklik kanan Ribbon kemudian centang Developer pada
> checkbox disampingnya.
>
> Semoga bermanfaat.
>
> Salam,
> HK
>
> Sent from Yahoo Mail on Android
> <https://overview..mail.yahoo.com/mobile/?..src=Android>
>
> On Tue, Feb 19, 2019 at 8:45, Pak Cik Lukman pakciklukman@gmail.com
> [belajar-excel]
> <belajar-excel@yahoogroups.com> wrote:
>
>
> Dear pak Ghozi,
>
> Diskusi sedikit... saya tdk faham ttg VBA, tetapi bisa kah formula pak
> Ghozi di translate ke VBA? Misal dgn memasukan formula (yg sdh ditranslate
> ke dlm bhs vba) ke dlm commanbutton "transpose" ??
>
> Salam
>
> On Mon, Feb 18, 2019, 19:08 ghozi alkatiri ghozialkatiri@yahoo.co..id
> <ghozialkatiri@yahoo.co.id> [belajar-excel] <belajar-excel@yahoogroups.com
> wrote:
>
>
>
> Waalaikum Salam WarohmatuLLAHI WabarokaaTUH
> sambil nunggu solusi Vba
>
> saya menawarkan solusi pakai formula barang kali ada gunanya..
>
> sheet DATANILAI
>
> untuk isian tabel indikator tulis di A2
> =INDEX(INPUT!$A$9:$A$14,TRUNC((ROW(A1)-1)/12)+1)
> copy ke bawah
>
> untuk isian tabel Nama tulis di B2
> =INDEX(INPUT!$B$8:$M$8,MOD(ROW(A1)-1,12)+1) copy ke bawah
>
> untuk isian tabel Nama tulis di B2
>
> =INDEX(INPUT!$B$9:$M$14,TRUNC((ROW(A1)-1)/12)+1,MATCH(B2,INPUT!$B$8:$M$8,0))
> copy ke bawah
>
> wassalam
>
> Ghozi Alkatiri
> Pada Senin, 18 Februari 2019 18.24.16 WIB, Cari Kebenaran
> cahayailmu71@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
>
> Assalamu'
>
> Kepada para Master dan anggota milis. Tolong dibantu vba code. Saya ingin
> melakukan transpose table. Table INDIKATOR PENILAIAN di sheet INPUT ingin
> saya transpose secara otomatis di sheet DATANILAI dengan menekan tombol
> "TRANSPOSE&quo
> fasilitas bawaan excel: PIVOTTABLE AND PIVOTCHART WIZARD. Hasilnya bisa
> dilihat di sheet DATANILAI.
>
> Mohon dibuatkan kode VBA-nya. Syukur kalau kotak dialog untuk memilih cell
> (disheet tertentu) untuk menempatkan tabel hasil transpose.
>
> Demikian terima kasih.
>
> Wassalamu'
>
>
>
Wed Feb 20, 2019 10:44 pm (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
wa'alaikumussalam wr wb
sudah bisa pakai pivot table kan tinggal tekan refresh all...
kenapa butuh vba ?
wassalamu'alaikum wr wb
Kid
On Mon, Feb 18, 2019 at 6:23 PM Cari Kebenaran cahayailmu71@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Assalamu'alaikum Wr. Wb.
>
> Kepada para Master dan anggota milis. Tolong dibantu vba code. Saya ingin
> melakukan transpose table. Table INDIKATOR PENILAIAN di sheet INPUT ingin
> saya transpose secara otomatis di sheet DATANILAI dengan menekan tombol
> "TRANSPOSE".. Selama ini saya melakukannya secara manual yaitu melalui
> fasilitas bawaan excel: PIVOTTABLE AND PIVOTCHART WIZARD. Hasilnya bisa
> dilihat di sheet DATANILAI.
>
> Mohon dibuatkan kode VBA-nya. Syukur kalau kotak dialog untuk memilih cell
> (disheet tertentu) untuk menempatkan tabel hasil transpose.
>
> Demikian terima kasih.
>
> Wassalamu'alaikum Wr. Wb.
>
>
>
sudah bisa pakai pivot table kan tinggal tekan refresh all...
kenapa butuh vba ?
wassalamu'alaikum wr wb
Kid
On Mon, Feb 18, 2019 at 6:23 PM Cari Kebenaran cahayailmu71@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Assalamu'
>
> Kepada para Master dan anggota milis. Tolong dibantu vba code. Saya ingin
> melakukan transpose table. Table INDIKATOR PENILAIAN di sheet INPUT ingin
> saya transpose secara otomatis di sheet DATANILAI dengan menekan tombol
> "TRANSPOSE&quo
> fasilitas bawaan excel: PIVOTTABLE AND PIVOTCHART WIZARD. Hasilnya bisa
> dilihat di sheet DATANILAI.
>
> Mohon dibuatkan kode VBA-nya. Syukur kalau kotak dialog untuk memilih cell
> (disheet tertentu) untuk menempatkan tabel hasil transpose.
>
> Demikian terima kasih.
>
> Wassalamu'
>
>
>
Wed Feb 20, 2019 10:47 pm (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
harus tahu nama field yang berisi teks url nya
supaya bisa membatasi kerja event di area field itu saja.
pakai error trap juga, supaya gak ribet harus periksa apakah cells yang
ditunjuk berisi url atau sekadar teks biasa.
Regards,
Kid
On Wed, Feb 20, 2019 at 12:10 PM Stephen Saputro stephensaputro@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Dear Teman2 Milis,
>
> Mohon dapat di bantu kasus saya, Saya sedang membuat pivot, yang di
> dalamnya ada hyperlink yang jika di klik akan membuka suatu document. Untuk
> mengaktivkan hyperlink di pivot, saya menggunakan script di bawah ini :
>
>
> ----------------------------------------------------------
> Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target
> As Range)
>
> Dim ptc As PivotTable, Value As Variant, Rng As Range
> For Each ptc In Worksheets(Sh.Name).PivotTables
> If Not Intersect(Target, Range(ptc.TableRange1.Address)) Is Nothing Then
> If Left(Target.Value, 2) = "\\" Then
> ActiveWorkbook.FollowHyperlink Address:=Target.Value, NewWindow:=True
> End If
> End If
> Next ptc
> End Sub
>
>
> ----------------------------------------------------------
>
> Hanya saja ada beberapa masalah yang saya hadapi.
>
> 1. ketika saya melakukan select range di pivot, maka yang muncul adalah
> seperti ini :
>
> Select range
> [image: image.png]
>
> Message 1
> [image: image.png]
>
> 2. Waktu hyperlink di klik, akan keluar Ok or Cancel, dan waktu cancel di
> klik, maka yang muncul adalah seperti ini :
>
> [image: image.png]
>
> Message 2
> [image: image.png]
>
> Mohon bantuan teman teman semuanya, bagaimana agar cara nya menghilangkan
> error ini agar message 1 dan juga message 2 tidak muncul lagi
>
>
> Terima kasih
>
>
>
supaya bisa membatasi kerja event di area field itu saja.
pakai error trap juga, supaya gak ribet harus periksa apakah cells yang
ditunjuk berisi url atau sekadar teks biasa.
Regards,
Kid
On Wed, Feb 20, 2019 at 12:10 PM Stephen Saputro stephensaputro@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Dear Teman2 Milis,
>
> Mohon dapat di bantu kasus saya, Saya sedang membuat pivot, yang di
> dalamnya ada hyperlink yang jika di klik akan membuka suatu document. Untuk
> mengaktivkan hyperlink di pivot, saya menggunakan script di bawah ini :
>
>
> ------------
> Private Sub Workbook_SheetSelec
> As Range)
>
> Dim ptc As PivotTable, Value As Variant, Rng As Range
> For Each ptc In Worksheets(Sh.
> If Not Intersect(Target, Range(ptc.TableRang
> If Left(Target.
> ActiveWorkbook.
> End If
> End If
> Next ptc
> End Sub
>
>
> ------------
>
> Hanya saja ada beberapa masalah yang saya hadapi.
>
> 1. ketika saya melakukan select range di pivot, maka yang muncul adalah
> seperti ini :
>
> Select range
> [image: image.png]
>
> Message 1
> [image: image.png]
>
> 2. Waktu hyperlink di klik, akan keluar Ok or Cancel, dan waktu cancel di
> klik, maka yang muncul adalah seperti ini :
>
> [image: image.png]
>
> Message 2
> [image: image.png]
>
> Mohon bantuan teman teman semuanya, bagaimana agar cara nya menghilangkan
> error ini agar message 1 dan juga message 2 tidak muncul lagi
>
>
> Terima kasih
>
>
>
Wed Feb 20, 2019 11:53 pm (PST) . Posted by:
"Stephen Saputro"
Pak Kid,
Terima kasih untuk clue nya. Akan coba saya cerna dulu ya Pak.
Regards
Adi
On Thu, Feb 21, 2019 at 1:49 PM 'Mr. Kid' mr.nmkid@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> harus tahu nama field yang berisi teks url nya
> supaya bisa membatasi kerja event di area field itu saja.
> pakai error trap juga, supaya gak ribet harus periksa apakah cells yang
> ditunjuk berisi url atau sekadar teks biasa.
>
> Regards,
> Kid
>
>
> On Wed, Feb 20, 2019 at 12:10 PM Stephen Saputro stephensaputro@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>>
>>
>> Dear Teman2 Milis,
>>
>> Mohon dapat di bantu kasus saya, Saya sedang membuat pivot, yang di
>> dalamnya ada hyperlink yang jika di klik akan membuka suatu document. Untuk
>> mengaktivkan hyperlink di pivot, saya menggunakan script di bawah ini :
>>
>>
>> ----------------------------------------------------------
>> Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal
>> Target As Range)
>>
>> Dim ptc As PivotTable, Value As Variant, Rng As Range
>> For Each ptc In Worksheets(Sh.Name).PivotTables
>> If Not Intersect(Target, Range(ptc..TableRange1.Address)) Is Nothing Then
>> If Left(Target.Value, 2) = "\\" Then
>> ActiveWorkbook.FollowHyperlink Address:=Target.Value, NewWindow:=True
>> End If
>> End If
>> Next ptc
>> End Sub
>>
>>
>> ----------------------------------------------------------
>>
>> Hanya saja ada beberapa masalah yang saya hadapi.
>>
>> 1. ketika saya melakukan select range di pivot, maka yang muncul adalah
>> seperti ini :
>>
>> Select range
>> [image: image.png]
>>
>> Message 1
>> [image: image.png]
>>
>> 2.. Waktu hyperlink di klik, akan keluar Ok or Cancel, dan waktu cancel
>> di klik, maka yang muncul adalah seperti ini :
>>
>> [image: image.png]
>>
>> Message 2
>> [image: image.png]
>>
>> Mohon bantuan teman teman semuanya, bagaimana agar cara nya menghilangkan
>> error ini agar message 1 dan juga message 2 tidak muncul lagi
>>
>>
>> Terima kasih
>>
>>
>
Terima kasih untuk clue nya. Akan coba saya cerna dulu ya Pak.
Regards
Adi
On Thu, Feb 21, 2019 at 1:49 PM 'Mr. Kid' mr.nmkid@gmail.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> harus tahu nama field yang berisi teks url nya
> supaya bisa membatasi kerja event di area field itu saja.
> pakai error trap juga, supaya gak ribet harus periksa apakah cells yang
> ditunjuk berisi url atau sekadar teks biasa.
>
> Regards,
> Kid
>
>
> On Wed, Feb 20, 2019 at 12:10 PM Stephen Saputro stephensaputro@gmail.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>>
>>
>> Dear Teman2 Milis,
>>
>> Mohon dapat di bantu kasus saya, Saya sedang membuat pivot, yang di
>> dalamnya ada hyperlink yang jika di klik akan membuka suatu document. Untuk
>> mengaktivkan hyperlink di pivot, saya menggunakan script di bawah ini :
>>
>>
>> ------------
>> Private Sub Workbook_SheetSelec
>> Target As Range)
>>
>> Dim ptc As PivotTable, Value As Variant, Rng As Range
>> For Each ptc In Worksheets(Sh.
>> If Not Intersect(Target, Range(ptc..TableRan
>> If Left(Target.
>> ActiveWorkbook.
>> End If
>> End If
>> Next ptc
>> End Sub
>>
>>
>> ------------
>>
>> Hanya saja ada beberapa masalah yang saya hadapi.
>>
>> 1. ketika saya melakukan select range di pivot, maka yang muncul adalah
>> seperti ini :
>>
>> Select range
>> [image: image.png]
>>
>> Message 1
>> [image: image.png]
>>
>> 2.. Waktu hyperlink di klik, akan keluar Ok or Cancel, dan waktu cancel
>> di klik, maka yang muncul adalah seperti ini :
>>
>> [image: image.png]
>>
>> Message 2
>> [image: image.png]
>>
>> Mohon bantuan teman teman semuanya, bagaimana agar cara nya menghilangkan
>> error ini agar message 1 dan juga message 2 tidak muncul lagi
>>
>>
>> Terima kasih
>>
>>
>
Thu Feb 21, 2019 7:39 pm (PST) . Posted by:
"HAIRUL ALAM"
Yth.Para Master
Assalamualaikum
Mohon Pencerahannya,Saya memiliki masalah Excel tentang look up dengan criteria seperti TerlampirWassalamualaikum
Terimakasih
Hairul Alam
Assalamualaikum
Mohon Pencerahannya,
Terimakasih
Hairul Alam
Thu Feb 21, 2019 7:42 pm (PST) . Posted by:
"adrian piter" petcures2003
Selamat siang Be Excelers..
Mohon bantuannya untuk kasus yang sedang saya coba kerjakan,terkait pengambilan data.
Data lengkap saya lampirkan dan kasus terkait ada pada sheet TARGET PROV & CAB serta pada sheet RINGKASAN.
Atas solusi dan urun sarannya saya ucapkan terima kasih.
Salam.
============================================================
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