问题标签 [page-setup]

我有一个定义页面设置的 RTF 文档：

在我的应用程序中，我使用 aTRichEdit来显示文档。

TRichEdit有 aTPanel作为它的，Parent并且正在使用Align=alClientand AlignWithMargins=True。

我将面板设置Width为16840 * PixelsPerInch/1440（1123 像素），我看到它等于页面的宽度，如 MSWord 中所示（比例 = 100%）。

将 RichEdit 的值设置Margins为794 * PixelsPerInch/1440（53 像素），WidthRichEdit 的值小于它必须的值，或者边距大于它们必须的值（与 MSWord 相比）。

没有边框，没有其他边距，除了我在代码中设置的：

的值paperW给出了正确的面板宽度（与 MSWord 相比），但 和 的值Lm给出了Rm更大的边距，因此 RichEdit 变得更窄。

如何计算正确的边距以使 RichEdit 具有与 MSWord 相同的布局？

这可能会有所帮助。我注意到：

1. TRichedit在左侧留出大约 10 像素的空间（在此空间之后开始渲染）。除了 margins.left 之外，是否有可以解决此问题的参数？
2. TRichedit不会呈现任何比其宽度更宽的表格（MSword 这样做会调整边距）。因此，TRichedit 翻译了其边缘之外的所有内容。

上面的结果是左边距看起来比必须的要宽，如果它是卷绕器，它会截断表格的右侧。

看图片

我正在重构一些 Excel 互操作代码以利用 Aspose Cells。与打印工作表相关的遗留代码行之一是：

Aspose Cells 确实有一个 [Sheet].PageSetup.Zoom 属性，但它是一个 int，而不是 bool。

什么对应于 false - 100？

更新

作为对答案的回应，遗留（Excel 互操作）代码是：

所以，最初的开发者是在设置缩放值，然后说忽略它们？或者我是否理解将缩放设置为 false确实与设置这些值一致，并且只要我在 Aspose 中设置 FitToPages* 属性，将 PageSetup.Zoom 设置为 false 是没有意义的/冗余的？

我正在尝试在 Excel 中构建一个宏，该宏循环遍历所有工作表，并基于最大的工作表，将所有工作表的缩放级别设置为相同的级别，以便它们都适合一页但具有相同的比例（在印刷）。

但是，我无法确定确保最大页面适合 1 页宽度的缩放级别。

当使用该属性将工作表宽度设置为适合一页时， .PageSetup.FitToPagesWide = 1该.PageSetup.Zoom属性会自动设置为 FALSE。

将 FitToPage 属性设置回 false，缩放级别与适合一页之前的缩放级别相同。

当手动设置工作表以使其适合一页宽时，Excel 会显示与此相对应的缩放级别，但似乎无法在 VBA 中读取它。有人可以帮我解决这个问题吗？

我想使用 VBA 将一些 Excel 数据复制到 Word 文档中

excel数据是为打印区域A3构建的。创建word文档后，我正在尝试将新word文档的纸张大小设置为A3。它给了我一个运行时错误

运行时错误“5889”请求的 PaperSize 在当前选定的打印机上不可用

我正在使用的 VBA 代码

尝试了一种不同的方法，这也给了我同样的错误

以下是新页面设置的代码：

在我调试系统后，在 ReportViewer 中点击打印预览，屏幕显示如下：

我真的不知道这是怎么发生的。请帮忙。谢谢。

我做了一个程序来打开 Excel 文件。

存在数据页和空白页。我可以只添加组合框中存在数据的页面吗？我可以使用 ButtonEvent 仅查看包含数据的页面吗？

我发现 IE 的页面设置设置存储在：

HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\PageSetup

但是IE内设置的IE左边距值0.5却是key值0.019690。

IE 存储这些值的格式是什么，我如何转换成它？

我当前的代码如下所示：

注意：是的，用户知道我会对此进行修改。我计划稍后恢复它（获取当前 IE 的页边距值，设置新值，然后在应用程序退出之前设置初始值）。

下面的 sub 应该为 PDF 输出准备 pagesetup。例如，如果由于其他连接的打印机而导致页面制动混乱，则潜艇应将其修复为 1 页宽和 3 页高。

当我在“With ws.PateSetup”处添加断点时，sub 实际上在单步 (F8) 中按预期工作。但是，如果我使用 F5 运行它，它会忽略这些语句。调试打印显示，属性的值没有改变。

到目前为止尝试的事情：在 .zoom 和 .FitPagesWide 之前添加延迟，最多 1 秒。不用找了。例如，Zoom 仍然是 55。在单步中，Zoom 最终读取 FALSE。任何解释/提示这里出了什么问题？

我使用 PowerPoint 2010，需要自动创建幻灯片大小为 16:9 的 PowerPoint（使用 excel VBA），所以我想将此值设置为默认值（而不是 4:3）。有人可以帮助我吗？或者有人可能知道如何使用 excel VBA 选择这个 Slide-Size 吗？

谢谢你的帮助 ！

夏洛特

我的代码包括更改一些 .PageSetup 变量。

我在使用此代码时遇到问题

这会出错，但是如果我在运行之前暂停代码.Orientation并转到打印预览，然后尝试运行它，一切正常。

似乎 .PageSetup 功能需要先加载打印机设置才能执行。我不知道如何用 VBA 做到这一点。

我从 Access DB VBA 运行它。它导出一个表，然后我创建一个新的 Excel 应用程序以使用它打开它

从历史上看，只要我加载了 Excel 参考库，我在此处编写的任何 VBA 在 Access 中的工作方式与在 Excel 中的工作方式相同。

但只是为了比较，我在运行 VBA 的 Excel 文件中也遇到了这个问题，它只是不一致，所以我从来没有弄清楚问题可能是什么。但任何时候我确实遇到问题，解决方案总是先选择打印预览。

这是我在特定宏上得到的错误代码：

错误号：1004

错误描述：无法设置 PageSetup 类的 Orientation 属性

该宏在导出到 Excel 之前会执行大量查询和表更新。此外，错误消息似乎与 1004 号码相当通用。