dhdear mastersaya coba rekam macro untuk filter data selanjutnya data yang di
filter di prin area
Public Sub Aan() ActiveSheet.Range("$B$1:$J$1048576").AutoFilter
Field:=9,Criteria1:="Aan"
Range("C1:H1").Select Range(Selection,Selection.End(xlDown)).Select
ActiveSheet.PageSetup.PrintArea ="$C$1:$H$112"
ActiveWindow.SelectedSheets.PrintPreviewEnd Sub
masalahnya bunyi skrip yang wa merah rangenya ber ubah2.mohon petunjuknya untuk
membetulkan
untuk jelasnya data terlampir.salam liem
10-14-2015 - Copy.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12
