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).Select* > *With 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) > > salam > Rubi > > > > > > >
