0

这是一个小麻烦，因为我需要实现自己的接口，该接口具有 WordApp 和 PowerpointApp 类，该类实现具有 PointsToPixels() 方法的接口。

WordApp 类已经存在，因为我可以使用 _Application 上的方法来获取它：http: //msdn.microsoft.com/en-us/library/office/microsoft.office.interop.word._application.pointstopixels (v= office.11​​).aspx

我想保持代码干净并实现 PowerpointApp.PointsToPixels()... 但令我惊讶的是，Powerpoint 的“_Application”类没有它。

我能看到的唯一其他方法是 WinForm 上的 CreateGraphics() 方法——我目前没有。

从长远来看，我也许可以解决它，但很高兴知道 Powerpoint 不打球的原因是什么。似乎没有充分的理由很难。

4

1 回答 1

1

在 PPT 中称为 PointsToScreenPixels。PPT VBA 帮助中的示例：

With ActiveWindow
    myXparm = .PointsToScreenPixelsX _
        (.Selection.TextRange.BoundWidth)
    myYparm = .PointsToScreenPixelsY _
        (.Selection.TextRange.BoundHeight)
End With

这假定一个包含文本的选定形状。结果有点难以理解。

仅假设选定形状的更简单示例：

Debug.Print ActiveWindow.PointsToScreenPixelsY(ActiveWindow.Selection.ShapeRange(1).Top)
于 2013-09-02T14:48:29.930 回答