列印設定中,如果要設定不同儲存格來列印 怎做?
設定列印範圍是用 PageSetup列印的PrintArea做設定,
不同儲存格間要透過union方式來神助力
Set ws = Sheets("Sheet1") '用Sheet1當作設定對像工作表名稱
'Union 設定列印儲存格範圍
Set bigRange = Application.Union(ws.Range("a1"), ws.Range("c2"))
' 設定列印儲存格範圍
ws.PageSetup.PrintArea = bigRange.address
沒有留言:
張貼留言