返回列表 上一主題 發帖

[發問] 再次請益收費單的延伸問題

回復 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會拖慢速度, 非必要少用

TOP

        靜思自在 : 欣賞別人就是莊嚴自己。
返回列表 上一主題