VBA 代码：轻松设置 Excel 所有列在同一打印页面！

以下是使用 VBA 在 Excel 中设置所有列都在同一个打印页面的代码示例： ```vb Sub SetPrintAreaForAllColumns() Dim ws As Worksheet Set ws = ActiveSheet ws.PageSetup.PrintArea = ws.UsedRange.Address End Sub ' 注意： ' 1. 确保在运行代码前已打开正确的工作簿和工作表。 ' 2. 如果工作表中有大量数据，可能会导致打印页面布局不太美观，需要进一步调整。 ' 3. 代码中的 `UsedRange` 会自动获取包含数据的区域，但可能不包含格式设置等信息。 ``` ######[AI写代码神器 | 143点数解答 | 2025-03-10 15:50:37]