Classe LineFormat (PowerPoint VBA)

A classe LineFormat representa formatação de linha e ponta de seta. Para uma linha, o objeto LineFormat contém informações de formatação para a própria linha; para uma forma com uma borda, esse objeto contém informações de formatação para a borda da forma.

Set

Para usar uma variável de classe LineFormat, ela primeiro precisa ser instanciada por exemplo

Dim lft as LineFormat
Set lft = ActiveWindow.RangeFromPoint.Line

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo LineFormat: Cell.Borders, CellRange.Borders, Borders.Item, ChartFormat.Line, Shape.Line e ShapeRange.Line

Temas

Os procedimentos a seguir nesta aula foram agrupados e são descritos em uma página de tema separada

Format with its procedures BackColor, BeginArrowheadStyle, BeginArrowheadWidth, DashStyle, EndArrowheadStyle, EndArrowheadWidth, ForeColor, Style e Visible

Propriedades

Borders.Count Retorna o número de objetos na coleção especificada. Somente leitura.

Dim lngCount As Long
lngCount = ActiveWindow.RangeFromPoint.Table.Rows(1).Cells.Borders.Count

Borders.Parent Retorna o objeto parente para o objeto especificado.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.Table.Rows(1).Cells.Borders.Parent

BeginArrowheadLength Retorna ou define o comprimento da ponta da seta no início da linha especificada. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Line.BeginArrowheadLength = msoArrowheadLengthMixed

EndArrowheadLength Retorna ou define o comprimento da ponta da seta no final da linha especificada. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Line.EndArrowheadLength = msoArrowheadLengthMixed

InsetPen Determina se deve desenhar linhas no interior de uma forma especificada. Leitura/gravação.

ActiveWindow.RangeFromPoint.Line.InsetPen = msoTrue

Parent Retorna o objeto parente para o objeto especificado.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.Line.Parent

Pattern Define ou retorna um valor que representa o padrão aplicado à linha especificada. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Line.Pattern = msoPatternMixed

Transparency Retorna ou define o grau de transparência do preenchimento, sombreamento ou linha especificada, como um valor entre 0,0 opaco e 1,0 (claro). Leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Line.Transparency = 0.5

Weight Retorna ou define em pontos a espessura da linha especificada. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Line.Weight = 5