- 帖子
- 2848
- 主題
- 10
- 精華
- 0
- 積分
- 2903
- 點名
- 0
- 作業系統
- 〔略〕
- 軟體版本
- 〔略〕
- 閱讀權限
- 100
- 性別
- 男
- 來自
- 〔略〕
- 註冊時間
- 2013-5-13
- 最後登錄
- 2026-7-25
|
回復 3# Andy2483
.Names.Add Name:="PrintArea", RefersTo:=Range(.[A1], xR(0, 28))
>>> Range(.[A1], xR(0, 28)).name = "'" & .Name & "'!Print_Area" .... 直接定義名稱為〔列印範圍〕,且定義名稱最好冠上工作表名稱
>>> .PageSetup.PrintArea = "PrintArea" .... 有了上一行, 這行可省略, PageSetup會拖慢速度, 非必要少用 |
|