Coleção.
Função.
- Cria um texto explicativo ( objeto Shape ) de linha sem borda.
Sintaxe.
- Worksheets(NomePlanilha).Shapes.AddCallout(Tipo, Esquerda, Superior, Largura, Altura), onde:
- Tipo: o texto explicativo que será criado. Pode ser
msoCalloutOne, msoCalloutTwo, msoCalloutThree e msoCalloutFour.
- Left: posição ( em pontos ) do canto superior esquerdo da
caixa de texto explicativo.
- Top: posição ( em pontos ) da borda superior
da caixa de texto explicativo.
- Width: largura ( em pontos ) da caixa de texto.
- Height: altura ( em pontos ) da caixa de texto.
Exemplo.
- Esta rotina cria, na planilha, uma caixa de texto explicativo
( tipo msoCalloutOne ) ...
- Equivale a clicar no botão AutoForma ( barra
de ferramentas Desenho )
e no menu Texto Explicativo.
Parcerias RicardoHorta.Net
RicardoHorta.Net
Parcerias RicardoHorta.Net
19/05/2005 - www.ricardohorta.net - Direitos adquiridos - Autor: Ricardo Horta