標題:
[發問]
空白欄位不列印問題請教
[打印本頁]
作者:
honching99
時間:
2011-10-1 15:18
標題:
空白欄位不列印問題請教
小弟基本資料將近2頁(舉例),因第53-85列欄位是要保留不可刪除的,是否在列印時,可以利用巨集功能自動將最後第86列欄位往上移,減少列印空間。也就是說空白欄位不列印出來,請各位幫忙!!
作者:
binargoo
時間:
2011-10-1 16:20
本帖最後由 binargoo 於 2011-10-1 16:22 編輯
回復
1#
honching99
標記53~85\右鍵隱藏,列印之後再恢復簡單不複雜。
作者:
honching99
時間:
2011-10-1 22:41
回復
2#
binargoo
感謝binargoo回應,不過因資料蠻多,每次重複隱藏太麻煩,所以才思考可否用巨集方式來簡化!!!
作者:
Hsieh
時間:
2011-10-1 22:50
回復
3#
honching99
Sub 隱藏()
Range("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
End Sub
Sub 復原()
Cells.EntireRow.Hidden = False
End Sub
複製代碼
作者:
honching99
時間:
2011-10-1 23:04
回復
4#
Hsieh
感謝Hsieh版主
小弟又增加預覽列印功能搭配
ActiveWindow.SelectedSheets.PrintPreview
歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)