Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Cria um texto explicativo sem borda. Retorna um objeto Shape que representa o novo texto explicativo.
Sintaxe
expressão. AddCallout (Tipo, Esquerda, Superior, Largura, Altura)
expressão Uma variável que representa um objeto Formas.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Type | Obrigatório | MsoCalloutType | O tipo de texto explicativo. |
| Left | Obrigatório | Single | A posição (em pontos) do canto superior esquerdo da caixa delimitadora da nota de aviso relativa ao canto superior esquerdo do documento. |
| Top | Obrigatório | Single | A posição (em pontos) do canto superior esquerdo da caixa delimitadora da nota de aviso relativa à parte superior do documento. |
| Width | Obrigatório | Single | A largura da caixa delimitadora do texto explicativo, em pontos. |
| Height | Obrigatório | Single | A altura da caixa delimitadora do texto explicativo, em pontos. |
Valor de retorno
Forma
Comentários
Você pode inserir uma variedade maior de textos explicativos usando o método AddShape.
Exemplo
Este exemplo adiciona um texto explicativo sem borda com uma linha de texto explicativo de um segmento e rotação livre a myDocument e, em seguida, define o ângulo do texto explicativo como 30 graus.
Set myDocument = Worksheets(1)
myDocument.Shapes.AddCallout(Type:=msoCalloutTwo, _
Left:=50, Top:=50, Width:=200, Height:=100) _
.Callout.Angle = msoCalloutAngle30
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.