cypdju
中級會員
 
積分 1041
發文 386
註冊 2006-10-14
狀態 離線
|
#1 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
要如何在此公式經篩選後之動態列印範圍下方自動加入
承辦人 主任 秘書
|
|
