3 Messages

Digest #4713

Re: Tanya Transpose Table by "Cari Kebenaran"

Re: Tanya Transpose Table by "hendrik karnadi" hendrikkarnadi

Hyperlink di Pivot menggunakan VBA by "Stephen Saputro"

Messages

1a

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.
>>
>>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (8) . Top ^

1b

Re: Tanya Transpose Table

Tue Feb 19, 2019 10:53 pm (PST) . Posted by:

"hendrik karnadi" hendrikkarnadi

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 barisJika baris dan kolom barubah makaINPUT!$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

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

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 [belajar-excel] <belajar-excel@yahoogroups.com wrote:

Waalaikum Salam WarohmatuLLAHI WabarokaaTUHsambil 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.

Reply to sender . Reply to group . Reply via Web Post . All Messages (8) . Top ^

2 Hyperlink di Pivot menggunakan VBA

Tue Feb 19, 2019 9:06 pm (PST) . Posted by:

"Stephen Saputro"

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

Reply to sender . Reply to group . Reply via Web Post . All Messages (1) . Top ^

============================================================
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
---------------------------------------------------------------------

Visit Your Group

• Privacy • Unsubscribe • Terms of Use

EXCEL FEED

Rabu, 20 Februari 2019

[belajar-excel] Digest Number 4713

3 Messages

Messages

1a

Re: Tanya Transpose Table

Tue Feb 19, 2019 9:04 pm (PST) . Posted by:

"Cari Kebenaran"

1b

Re: Tanya Transpose Table

Tue Feb 19, 2019 10:53 pm (PST) . Posted by:

"hendrik karnadi" hendrikkarnadi

2

Hyperlink di Pivot menggunakan VBA

Tue Feb 19, 2019 9:06 pm (PST) . Posted by:

"Stephen Saputro"

Tidak ada komentar:

Posting Komentar

Followers

Blog Archive

About Me