Método Font.GetScriptName (Publisher)

Artigo
04/07/2023

Retorna uma cadeia de caracteres que representa o nome do script de fonte que está sendo usado em um intervalo de texto.

Sintaxe

expressão. GetScriptName (Script)

Expressão Uma variável que representa um objeto Font .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Script	Obrigatório	PbFontScriptType	O nome do script. Pode ser uma das constantes PbFontScriptType declaradas na biblioteca de tipos do Microsoft Publisher.

Valor de retorno

Cadeia de caracteres

Exemplo

Este exemplo verifica se o script de fonte padrão em uso para o intervalo de texto especificado é Tahoma e, se não, o define como o script de fonte padrão.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.