VBA - 設定列印順序

專案在產出Excel時,原本預設樣版的列印順序是循列列印,但因為產出的資料在同一個sheet

分上半部與下半部,不知為什麼就變成了循欄列印,由於這個版本的jxl Library不支援setPage-

Order method(針對Sheet Object),因此就由VBA的語法來處理。

依序是由第一頁至第二頁,之後在換成下一排的第三頁至第四頁


因此,版面設定設為循列列印


但是當輸出報表時,在這四頁都有值得情況下,卻變成了循欄列印

因此,在開發模式下寫入VBA程式碼,如下
Private Sub Workbook_Open()
    If Worksheets("Sheet1").PageSetup.Order = 1 Then
        Worksheets("Sheet1").PageSetup.Order = 2
    End If
End Sub

判斷一開啟檔案時是否為2(循列列印),若否則取代之

留言