WorkSheets的仓库

最新推荐文章于 2021-01-01 14:36:08 发布

原创最新推荐文章于 2021-01-01 14:36:08 发布 · 181 阅读

0 ·

CC 4.0 BY-SA版权

本文介绍了一种使用VBA在Excel中实现工作表打印预览的方法，并展示了如何在代码中添加时间戳。通过调用SubPrintOut_temp子程序，可以轻松地在Sheet1上进行打印预览，同时利用Debug.PrintNow命令记录当前时间，便于跟踪打印操作的时间。此外，文章还提供了遍历所有工作表并显示其名称的代码片段。

Sub PrintOut_temp()
    'Worksheets("Sheet2").Select
    Worksheets("Sheet1").PrintPreview
    'Worksheets("Sheet1").PrintOut Copies:=1
    Debug.Print Now  '当前时间
     
     '遍历所有工作表
'    Dim i As Integer
'    For i = 1 To ThisWorkbook.Worksheets.Count
'        Set ws = ThisWorkbook.Worksheets(i)
'        MsgBox "第" & i & "个表名称为：" & ws.Name
'    Next
End Sub