assalamu'alaikum wr.wb maaf om kid baru bisa respon emailnya.terima kasih om kid atas responya.saya butuh waktu untuk mencernanya . hheheesoalnya pivot table belum biasa om, saya biasa pakai rumus soalnya.kenapa database bisa berderet kebawah bgto karna memang saya menggunakan fungsi(small if) yang merujuk ke jurnal umumnya. sehingga satu2 akun bisa masuk ke d dan k nah menghilangkan data kosongnya yang diakibatkan oleh fungsi small if itu saya pakai filter (dengan mencek blanks).masih belom kenalanan sama pivot yang lebih mendalam om. hehee terima kasih om kid dan Beexcelerwassalamu'alaikum wr.wbfahmi
Pada Rabu, 14 Februari 2018 11:50, "'Mr. Kid' mr.nm...@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis: Wa'alaikumussalam wr wb Hai Fahmi, Bagaimana jika dari raw data tersebut disusun jadi tabel data berkaidah tabel database lebih dulu ? Excel table object dengan formula bisa membantu penyusunannya. Misal sheetnya diberi nama Raw Setelah itu, hasil Excel table object penyusun tabel data pada kolom tertentu yang berformula, di filter lalu di-copy. Paste values ke sheet data di record baru. Sebaiknya, tabel di sheet data juga dibentuk sebagai Excel Table object. Kemudian, pivot table yang sudah dibuat merujuk ke excel table object di sheet data bisa di-refresh. Contoh seperti file terlampir (tanpa otomasi). *** Kalau sudah bisa membuat proses tanpa otomasi yang cukup efisien, barulah memikirkan otomasinya. *** silakan diubah dan dikembangkan sesuai kebutuhan *** bisa jadi nantinya ada kebutuhan terhadap tabel-tabel referensi Lalu buat otomasinya berisi : 1. di sheet Raw, excel table object yang ada dibuang isinya. 2. buka file sumber data, copy data, paste values ke sheet raw di record pertama excel table object penyusun tabel data 3. copy record di kolom tertentu dari sheet raw, paste values ke baris kosong pertama di sheet data (menjadi record baru excel table object di sheet data) 4. refresh all workbook *** silakan dibuat sendiri ya... *** mode pelit ber-VBA ON (biar pada tambah pinter, bagi yang mau) Kalau saya, sheet raw adalah hasil get externnal data ke file sumber data yang lokasi (folder) dan nama filenya tetap. Jadi, ada file bernama sumber_data.xlsx sheet bernama 'apalah gitu yang tetap' berisi data seperti sheet1 Anda. Sheet raw dibuat data connection menggunakan fitur get external data. Lengkapi tabel hasil koneksi data dengan formula penyusun tabel data (toh cuma sekali buat untuk selamanya). Lalu buat sheet data dengan header yang sama dengan header kolom-kolom berformula di sheet raw tadi (ini juga sekali buat untuk selamanya) Lalu buat sheet baru untuk template report, berisi pivot table merujuk ke excel table di sheet data (ini juga sekali buat untuk selamanya) Setelah itu barulah buat otomasinya, yang berisi : 1. refresh query table di sheet raw (gak perlu bikin script buka workbook sumber_data.xlsx copy lalu tutup tanpa save) 2. filter sheet raw, copy hasil filter di kolom tertentu yang berisi formula tadi, paste values ke sheet data di cells kosong dibawah excel table data yang ada 3. refresh semua pivot tables (refresh all juga tidak mengapa, toh sumber_data.xlsx juga tidak besar. *** sila kalau mau dicoba... Wassalamu'alaikum wr wb Kid 2018-02-14 9:56 GMT+07:00 Fahmi Syaifullah fahmisyaifulla...@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>: assalamu'alaikum wr.wb selamat pagi BeExceler. mau tanya saya sudah membuat cekrip seperti dibawah ini On Error Resume Next Selection.Copy Worksheets.Add ActiveSheet.Name = "sheet2" Sheets("Sheet2").Select If Range("A2").Value = "" Then Range("A2").Select Else Range("A2").End(xlToRight). Select ActiveCell.Offset(0, 2).Select End If ActiveSheet.Paste Selection.PasteSpecial Paste:=xlPasteColumnWidths, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Sheets("sheet1").Select Selection.Delete Shift:=xlUp End Sub niatnya saya ingin mengkopi data yang di sheet 1 ke sheet 2 dengan memisahkan perbulan (ada akun yang berbeda dan bulan) menjadikan 1 tahun dengan masing2 akun.sebelumnya ini pertanyaan saya yang lanjutan kemaren dengan om kid masalah filter dan delete itu.saya coba dengan menggunakan VBA . tapi saya belom bisa untuk mempaste ke samping terus2an saya ingin mencoba attribut For Next untuk perkalian yang warna biru (angka 2) " ActiveCell.Offset(0, 2).Select "agar data selalu menyamping kearah kanan . tapi nanti yang di ulang adalah bagian selection.copynya. karna selection.copy saya sesuaikan dengan data yang ingin saya copy.sebenarnya ada kreterianya hanya saja saya belum mahir. mohon bantuannya BeExceler. maaf mengganggu waktunya. wassalamu'alaikum wr.wb terima kasih.fahmi #yiv1014958516 #yiv1014958516 -- #yiv1014958516ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1014958516 #yiv1014958516ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1014958516 #yiv1014958516ygrp-mkp #yiv1014958516hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv1014958516 #yiv1014958516ygrp-mkp #yiv1014958516ads {margin-bottom:10px;}#yiv1014958516 #yiv1014958516ygrp-mkp .yiv1014958516ad {padding:0 0;}#yiv1014958516 #yiv1014958516ygrp-mkp .yiv1014958516ad p {margin:0;}#yiv1014958516 #yiv1014958516ygrp-mkp .yiv1014958516ad a {color:#0000ff;text-decoration:none;}#yiv1014958516 #yiv1014958516ygrp-sponsor #yiv1014958516ygrp-lc {font-family:Arial;}#yiv1014958516 #yiv1014958516ygrp-sponsor #yiv1014958516ygrp-lc #yiv1014958516hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1014958516 #yiv1014958516ygrp-sponsor #yiv1014958516ygrp-lc .yiv1014958516ad {margin-bottom:10px;padding:0 0;}#yiv1014958516 #yiv1014958516actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1014958516 #yiv1014958516activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv1014958516 #yiv1014958516activity span {font-weight:700;}#yiv1014958516 #yiv1014958516activity span:first-child {text-transform:uppercase;}#yiv1014958516 #yiv1014958516activity span a {color:#5085b6;text-decoration:none;}#yiv1014958516 #yiv1014958516activity span span {color:#ff7900;}#yiv1014958516 #yiv1014958516activity span .yiv1014958516underline {text-decoration:underline;}#yiv1014958516 .yiv1014958516attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv1014958516 .yiv1014958516attach div a {text-decoration:none;}#yiv1014958516 .yiv1014958516attach img {border:none;padding-right:5px;}#yiv1014958516 .yiv1014958516attach label {display:block;margin-bottom:5px;}#yiv1014958516 .yiv1014958516attach label a {text-decoration:none;}#yiv1014958516 blockquote {margin:0 0 0 4px;}#yiv1014958516 .yiv1014958516bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv1014958516 .yiv1014958516bold a {text-decoration:none;}#yiv1014958516 dd.yiv1014958516last p a {font-family:Verdana;font-weight:700;}#yiv1014958516 dd.yiv1014958516last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv1014958516 dd.yiv1014958516last p span.yiv1014958516yshortcuts {margin-right:0;}#yiv1014958516 div.yiv1014958516attach-table div div a {text-decoration:none;}#yiv1014958516 div.yiv1014958516attach-table {width:400px;}#yiv1014958516 div.yiv1014958516file-title a, #yiv1014958516 div.yiv1014958516file-title a:active, #yiv1014958516 div.yiv1014958516file-title a:hover, #yiv1014958516 div.yiv1014958516file-title a:visited {text-decoration:none;}#yiv1014958516 div.yiv1014958516photo-title a, #yiv1014958516 div.yiv1014958516photo-title a:active, #yiv1014958516 div.yiv1014958516photo-title a:hover, #yiv1014958516 div.yiv1014958516photo-title a:visited {text-decoration:none;}#yiv1014958516 div#yiv1014958516ygrp-mlmsg #yiv1014958516ygrp-msg p a span.yiv1014958516yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv1014958516 .yiv1014958516green {color:#628c2a;}#yiv1014958516 .yiv1014958516MsoNormal {margin:0 0 0 0;}#yiv1014958516 o {font-size:0;}#yiv1014958516 #yiv1014958516photos div {float:left;width:72px;}#yiv1014958516 #yiv1014958516photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv1014958516 #yiv1014958516photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv1014958516 #yiv1014958516reco-category {font-size:77%;}#yiv1014958516 #yiv1014958516reco-desc {font-size:77%;}#yiv1014958516 .yiv1014958516replbq {margin:4px;}#yiv1014958516 #yiv1014958516ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv1014958516 #yiv1014958516ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv1014958516 #yiv1014958516ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv1014958516 #yiv1014958516ygrp-mlmsg select, #yiv1014958516 input, #yiv1014958516 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv1014958516 #yiv1014958516ygrp-mlmsg pre, #yiv1014958516 code {font:115% monospace;}#yiv1014958516 #yiv1014958516ygrp-mlmsg * {line-height:1.22em;}#yiv1014958516 #yiv1014958516ygrp-mlmsg #yiv1014958516logo {padding-bottom:10px;}#yiv1014958516 #yiv1014958516ygrp-msg p a {font-family:Verdana;}#yiv1014958516 #yiv1014958516ygrp-msg p#yiv1014958516attach-count span {color:#1E66AE;font-weight:700;}#yiv1014958516 #yiv1014958516ygrp-reco #yiv1014958516reco-head {color:#ff7900;font-weight:700;}#yiv1014958516 #yiv1014958516ygrp-reco {margin-bottom:20px;padding:0px;}#yiv1014958516 #yiv1014958516ygrp-sponsor #yiv1014958516ov li a {font-size:130%;text-decoration:none;}#yiv1014958516 #yiv1014958516ygrp-sponsor #yiv1014958516ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv1014958516 #yiv1014958516ygrp-sponsor #yiv1014958516ov ul {margin:0;padding:0 0 0 8px;}#yiv1014958516 #yiv1014958516ygrp-text {font-family:Georgia;}#yiv1014958516 #yiv1014958516ygrp-text p {margin:0 0 1em 0;}#yiv1014958516 #yiv1014958516ygrp-text tt {font-size:120%;}#yiv1014958516 #yiv1014958516ygrp-vital ul li:last-child {border-right:none !important;}#yiv1014958516