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
