方法1:透過調整頁面分割線完成(最簡單)
方法2:透過頁面設定完成(最常用)
重點:“頁寬”和“頁高”引數,都設定為1
方法3:透過VBA程式碼完成(最炫酷)
重點:把下面程式碼複製到ThisWorkbook程式碼視窗中,即可
Dim sht As Worksheet
Set sht = Worksheets(1)
With sht.PageSetup
.Zoom = False
.PaperSize = xlPaperA4
.FitToPagesTall = 1
.FitToPagesWide = 1
End With
Set sht = Nothing
End Sub
方法1:透過調整頁面分割線完成(最簡單)
方法2:透過頁面設定完成(最常用)
重點:“頁寬”和“頁高”引數,都設定為1
方法3:透過VBA程式碼完成(最炫酷)
重點:把下面程式碼複製到ThisWorkbook程式碼視窗中,即可
Dim sht As Worksheet
Set sht = Worksheets(1)
With sht.PageSetup
.Zoom = False
.PaperSize = xlPaperA4
.FitToPagesTall = 1
.FitToPagesWide = 1
End With
Set sht = Nothing
End Sub