返回列表 上一主題 發帖

可否巨集執行中途+人手操作

回復 4# enoch

    如果要設定列印頁數
  1. Sub ex()
  2. ActiveWindow.View = xlPageBreakPreview
  3. With 工作表1
  4. If .HPageBreaks.Count = 0 Then
  5. .PrintOut
  6. Else
  7. .PrintPreview
  8. End If
  9. End With
  10. ActiveWindow.View = xlNormalView
  11. End Sub
複製代碼
學海無涯_不恥下問

TOP

        靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言,就如鑽石般珍貴;但對愚人來說,卻像是一把泥土,一點價值也沒有。
返回列表 上一主題