☰

特定字体的键盘快捷键

tag-icon • tag-icon keyboard-shortcuts fonts microsoft-powerpoint
特定字体的键盘快捷键

在 Microsoft Powerpoint 中，是否有办法创建快捷方式将选定的文本更改为特定字体？

现在，当我单击“Ctrl + T”时，我会进入字体对话框，但它不会自动选择我想要的字体 - 我每次都需要输入字体名称。

我想到的一个选择是创建一个 VBA 宏。但有两个问题：(1) 我不知道如何在宏内更改字体，(2) 我不知道如何将宏保存到 Powerpoint（Powerpoint 只允许我将宏保存到特定演示文稿，因此它在其他演示文稿中不可用）。

答案1

不幸的是，PowerPoint 不允许我们像其他 Office 程序那样将按键分配给宏。如果您使用 Windows PPT，则有一个第三方插件可让您执行此操作：http://officeoneonline.com/ppsctmgr/ppsctmgr.html

[免责声明：这不是我的产品，我对此没有任何经济利益，但作者是我的一个熟人。诚实的好人。]

您可以将宏存储在使用 PowerPoint 时保持打开的 PPTM 中，从而使宏可供所有打开的演示文稿使用，但调用宏所需的击键次数与正常更改字体所需的击键次数一样多，因此，这有点不切实际。

您还可以创建宏并将其保存为插件 (PPAM) 文件。加载后，它将在 PPT 启动时继续加载，并可供所有打开的演示文稿使用，但您还需要创建一个用户界面...例如功能区按钮...以触发宏。这增加了游戏的复杂性。

实际代码非常简单：

Sub MakeItArial()

' Make sure that some text is selected
If ActiveWindow.Selection.Type = ppSelectionText Then
    ' Set the font name
    ActiveWindow.Selection.TextRange.Font.Name = "Arial"
End If

End Sub

您可能需要添加更多代码来在选择形状而不是文本时设置字体，如果没有打开的演示文稿等等则不执行任何操作。

相关内容