Font.SetScriptName メソッド (Publisher)

  • [アーティクル]

テキスト範囲で使用するフォント スクリプト名を設定します。

構文

式。SetScriptName (スクリプト、 FontName)

式Font オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
Script 必須 PbFontScriptType スクリプト名を指定します。 Microsoft Publisher タイプ ライブラリで宣言されている PbFontScriptType クラスの定数のいずれかを指定できます。
FontName 必須 String フォント名を指定します。

例

次の使用例は、指定したテキスト範囲で使用されている既定のフォント スクリプトが Tahoma であることを確認し、使用しない場合は既定のフォント スクリプトとして設定します。

Sub GetScript() 
 With ActiveDocument.Pages(1).Shapes(1) _ 
 .TextFrame.TextRange.Font 
 If .GetScriptName(Script:=pbFontScriptDefault) <> "Tahoma" Then 
 .SetScriptName Script:=pbFontScriptDefault, _ 
 FontName:="Tahoma" 
 End If 
 End With 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。