Hai Rubi, Maaf baru sempat menjawab.1. Krn range hasil filter berubah-ubah maka saya tidak pakai conditional formatting melainkan VBA2. Bisa, validasinya diberi nama range dan VBAnya mengambil nama-nama range untuk PR, RVW, APP. File terlampir. Semoga sudah sesuai kebutuhan. Salam,HK
From: "rubi anto [email protected] [belajar-excel]"
<[email protected]>
To: [email protected]
Sent: Friday, 3 February 2017, 21:39
Subject: Re: [belajar-excel] Tabel tanda tangan dalam Advanced Filter [1
Attachment]
terima kasih pak hendrik saya sudah mencobanya... tapi masih ada yang ingin
tanyakan lagi.
1. Bagaimana caranya agar bordernya tidak hilang jika saya filter,karena saya
hanya menggunakan conditional formating.
2. bisa tidak jika kolom tanda tangannya dibuat di sheet lain dan nantinya
dikopy dibawah data,karena saya ingin membuat validasi untuk masing-masing
penanda tangan,jadi tidak perlu ketik ulang jika ganti orang....
untuk lebih jelasnya,monggo panjenengan lihat file terlampirnya
Pada 1 Februari 2017 21.07, hendrik karnadi [email protected]
[belajar-excel] <[email protected]> menulis:
Hai Rubi,Terima kasih kembali.Sebagai variasi, coba buat macro agar no
urut hasil filternya mulai dari no 1.
Salam,HK
Sent from Yahoo Mail on Android
Terima kasih pak hendrik.... sudah berhasil pak.....
Pada 1 Februari 2017 14.28, hendrik karnadi [email protected]
[belajar-excel] <[email protected] > menulis:
Hai Rubi,Coba ubah codenya menjadi seperti ini :
ThisWorkbook.Sheets("Laporan") .Range("B7:F1000").Clear
ThisWorkbook.Sheets("Data"). Range("A1").CurrentRegion. _ AdvancedFilter
Action:=xlFilterCopy, _ CriteriaRange:=ThisWorkbook.
Sheets("Laporan").Range("C3: D4"), _ CopyToRange:=ThisWorkbook.
Sheets("Laporan").Range("B6: F6"), _ Unique:=False
ThisWorkbook.Sheets("Laporan") .Range("B6").End(xlDown). SelectWith Selection
.Offset(5, 0).Value = "Yang Membuat" .Offset(5, 2).Value = "Mengetahui"
.Offset(5, 4).Value = "Menyetujui" .Offset(9, 0).Value = "TTD1"
.Offset(9, 2).Value = "TTD2" .Offset(9, 4).Value = "TTD3"End With
catatan : Huruf yang dicetak tebal adalah tambahan codenya
Salam,HK
From: "rubi anto [email protected] [belajar-excel]"
<[email protected] >
To: [email protected]
Sent: Wednesday, 1 February 2017, 12:58
Subject: Re: [belajar-excel] Tabel tanda tangan dalam Advanced Filter [1
Attachment]
Apakah seperti data berikut Mr Kid....
Tapi jika ada data bertambah malah tertindis...
Maaf saya masih belum Faham Mr. Kid.....
Pada 31 Januari 2017 20.42, 'Mr. Kid' [email protected] [belajar-excel]
<[email protected] > menulis:
Wa'alaikumussalam wr wb
Hai Rubi,
Bisa membuat template tanda tangan di tempat lain (misal di kolom ZZ dst).
Kemudian copy range area template tanda tangan tersebut ke bawah tabel hasil
advanced filter.
Kalau proses copy template tanda tangan akan diotomasi, bisa dilakukan dengan
record macro.
Cara meletakkan posisi cells aktif ke baris kosong kedua di bawah tabel pada
kolom terkiri tabel adalah sebagai berikut : (asumsi : kolom pertama tabel
selalu terisi penuh)
1. klik cells baris 1 pada sebuah kolom kosong
2. tekan CTRL panah ke bawah -> tekan CTRL panah ke kiri ::: sampai di
kolom A baris terakhir Excel
3. [jika kolom pertama tabel bukan di kolom A] tekan panah ke kanan sampai ke
kolom pertama tabel atau sampai kolom tabel yang selalu terisi penuh
4. tekan CTRL panah ke atas ::: sampai di baris terakhir tabel
5. tekan panah ke bawah 2 kali ::: sampai baris kosong kedua di kolom tabel
yang selalu terisi penuh
6. [jika kolom pertama tabel bukan kolom yang selalu terisi penuh] tekan CTRL
panah kiri atau kanan sampai ke kolom pertama tabel
Jadi urutan copy paste template tanda tangan menjadi :
>> blok area template tanda tangan -> tekan CTRL C -> ikuti langkah 1 sampai 6
>> di atas -> tekan CTRL V
Wassalamu'alaikum wr wb
Kid
2017-01-31 18:37 GMT+07:00 rubi anto [email protected] [belajar-excel]
<[email protected] >:
Assalamu'alaikum.....
Para master excel.....
Saya sedang belajar membuat data laporan pembayaran dengan advanced filter
macro,tetapi ada kendala....
kolom untuk tanda tangannya selalu saja hilang jika saya klik button filter....
Bagaimanakah caranya agar kolom tanda tangan itu tidak hilang dan selalu berada
di bawah tabel data jika data bertambah atau berkurang....
Terimakasih sebelumnya atas bantuan para guru.....
(File terlampir)
salamRubi
#yiv0568195299 #yiv0568195299 -- #yiv0568195299ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv0568195299
#yiv0568195299ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv0568195299
#yiv0568195299ygrp-mkp #yiv0568195299hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv0568195299 #yiv0568195299ygrp-mkp #yiv0568195299ads
{margin-bottom:10px;}#yiv0568195299 #yiv0568195299ygrp-mkp .yiv0568195299ad
{padding:0 0;}#yiv0568195299 #yiv0568195299ygrp-mkp .yiv0568195299ad p
{margin:0;}#yiv0568195299 #yiv0568195299ygrp-mkp .yiv0568195299ad a
{color:#0000ff;text-decoration:none;}#yiv0568195299 #yiv0568195299ygrp-sponsor
#yiv0568195299ygrp-lc {font-family:Arial;}#yiv0568195299
#yiv0568195299ygrp-sponsor #yiv0568195299ygrp-lc #yiv0568195299hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv0568195299
#yiv0568195299ygrp-sponsor #yiv0568195299ygrp-lc .yiv0568195299ad
{margin-bottom:10px;padding:0 0;}#yiv0568195299 #yiv0568195299actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv0568195299
#yiv0568195299activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv0568195299
#yiv0568195299activity span {font-weight:700;}#yiv0568195299
#yiv0568195299activity span:first-child
{text-transform:uppercase;}#yiv0568195299 #yiv0568195299activity span a
{color:#5085b6;text-decoration:none;}#yiv0568195299 #yiv0568195299activity span
span {color:#ff7900;}#yiv0568195299 #yiv0568195299activity span
.yiv0568195299underline {text-decoration:underline;}#yiv0568195299
.yiv0568195299attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv0568195299 .yiv0568195299attach div a
{text-decoration:none;}#yiv0568195299 .yiv0568195299attach img
{border:none;padding-right:5px;}#yiv0568195299 .yiv0568195299attach label
{display:block;margin-bottom:5px;}#yiv0568195299 .yiv0568195299attach label a
{text-decoration:none;}#yiv0568195299 blockquote {margin:0 0 0
4px;}#yiv0568195299 .yiv0568195299bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv0568195299
.yiv0568195299bold a {text-decoration:none;}#yiv0568195299 dd.yiv0568195299last
p a {font-family:Verdana;font-weight:700;}#yiv0568195299 dd.yiv0568195299last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv0568195299
dd.yiv0568195299last p span.yiv0568195299yshortcuts
{margin-right:0;}#yiv0568195299 div.yiv0568195299attach-table div div a
{text-decoration:none;}#yiv0568195299 div.yiv0568195299attach-table
{width:400px;}#yiv0568195299 div.yiv0568195299file-title a, #yiv0568195299
div.yiv0568195299file-title a:active, #yiv0568195299
div.yiv0568195299file-title a:hover, #yiv0568195299 div.yiv0568195299file-title
a:visited {text-decoration:none;}#yiv0568195299 div.yiv0568195299photo-title a,
#yiv0568195299 div.yiv0568195299photo-title a:active, #yiv0568195299
div.yiv0568195299photo-title a:hover, #yiv0568195299
div.yiv0568195299photo-title a:visited {text-decoration:none;}#yiv0568195299
div#yiv0568195299ygrp-mlmsg #yiv0568195299ygrp-msg p a
span.yiv0568195299yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv0568195299
.yiv0568195299green {color:#628c2a;}#yiv0568195299 .yiv0568195299MsoNormal
{margin:0 0 0 0;}#yiv0568195299 o {font-size:0;}#yiv0568195299
#yiv0568195299photos div {float:left;width:72px;}#yiv0568195299
#yiv0568195299photos div div {border:1px solid
#666666;height:62px;overflow:hidden;width:62px;}#yiv0568195299
#yiv0568195299photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv0568195299
#yiv0568195299reco-category {font-size:77%;}#yiv0568195299
#yiv0568195299reco-desc {font-size:77%;}#yiv0568195299 .yiv0568195299replbq
{margin:4px;}#yiv0568195299 #yiv0568195299ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv0568195299 #yiv0568195299ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv0568195299
#yiv0568195299ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv0568195299
#yiv0568195299ygrp-mlmsg select, #yiv0568195299 input, #yiv0568195299 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv0568195299
#yiv0568195299ygrp-mlmsg pre, #yiv0568195299 code {font:115%
monospace;}#yiv0568195299 #yiv0568195299ygrp-mlmsg *
{line-height:1.22em;}#yiv0568195299 #yiv0568195299ygrp-mlmsg #yiv0568195299logo
{padding-bottom:10px;}#yiv0568195299 #yiv0568195299ygrp-msg p a
{font-family:Verdana;}#yiv0568195299 #yiv0568195299ygrp-msg
p#yiv0568195299attach-count span {color:#1E66AE;font-weight:700;}#yiv0568195299
#yiv0568195299ygrp-reco #yiv0568195299reco-head
{color:#ff7900;font-weight:700;}#yiv0568195299 #yiv0568195299ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv0568195299 #yiv0568195299ygrp-sponsor
#yiv0568195299ov li a {font-size:130%;text-decoration:none;}#yiv0568195299
#yiv0568195299ygrp-sponsor #yiv0568195299ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv0568195299
#yiv0568195299ygrp-sponsor #yiv0568195299ov ul {margin:0;padding:0 0 0
8px;}#yiv0568195299 #yiv0568195299ygrp-text
{font-family:Georgia;}#yiv0568195299 #yiv0568195299ygrp-text p {margin:0 0 1em
0;}#yiv0568195299 #yiv0568195299ygrp-text tt {font-size:120%;}#yiv0568195299
#yiv0568195299ygrp-vital ul li:last-child {border-right:none
!important;}#yiv0568195299
r_filter - Copy.xlsb
Description: application/vnd.ms-excel.sheet.binary.macroenabled.12
