Board logo

標題: EXCEL動態列印範圍+資料最後一筆下方加文字 [打印本頁]

作者: cypdju     時間: 2019-10-28 01:37 AM    標題: EXCEL動態列印範圍+資料最後一筆下方加文字

EXCEL動態列印範圍(VBA設定程式碼)+資料最後一筆下方加文字...
例:
Sub 自動選取列印範圍()
MsgBox "在使用中工作表內自動設定儲存格列印範圍,並開啟預覽列印視窗"
ActiveSheet.PageSetup.PrintArea = "A1:M102"
With ActiveWorkbook.Worksheets("清冊").Names("Print_Area")
        .Name = "Print_Area"
        .RefersToR1C1 = "=INDIRECT(""A1:M""&MATCH(9E+307,清冊!C1))"
        .Comment = ""
    End With
ActiveSheet.PrintPreview
End Sub
要如何在此公式經篩選後之動態列印範圍下方自動加入
承辦人     主任       秘書




歡迎光臨 網際論壇 (http://www.centurys.net/) Powered by Discuz! 2.5