Table of contents
TOC
Recolher sumário
Expandir sumário

Trabalhar com tabelasWork with Tables

office 365 dev account|Última Atualização: 22/03/2018
|
2 Colaboradores

No PowerPoint, você pode criar tabelas nativas sem precisar importá-los a partir do Word. Tabelas são membros da coleção Shapes . Cada célula, coluna e linha em uma tabela são um objeto programável separado.In PowerPoint, you can create native tables without having to import them from Word. Tables are members of the Shapes collection. Each cell, column, and row in a table is a separate programmable object.

Criando uma tabelaCreating a Table

Para criar uma tabela em um slide, use o método AddTable . Este método adiciona uma tabela à coleção Shapes com o número de linhas e colunas designadas pelos argumentos NumRows e NumColumns . Este exemplo adiciona uma tabela com três linhas e quatro colunas para o slide dois.To create a table on a slide, use the AddTable method. This method adds a table to the Shapes collection with the number of rows and columns designated by the NumRows and NumColumns arguments. This example adds a table with three rows and four columns to slide two.

ActivePresentation.Slides(2).Shapes _
    .AddTable NumRows:=3, NumColumns:=4, Left:=10, _
    Top:=10, Width:=288, Height:=288

Testando para ver se uma forma é uma tabelaTesting to See Whether a Shape Is a Table

Antes de poder trabalhar com o conteúdo ou a objetos em uma tabela, primeiro você deve saber se a forma com que estiver trabalhando é uma tabela. Para ver se uma forma é uma tabela, use a propriedade HasTable . Por exemplo, suponha que o slide um tenha várias formas e você souber que um deles é uma tabela. Você deseja redimensionar a tabela para que ele seja o tamanho adequado para aceitar os dados que você pretende importar de uma outra fonte. Este código percorre a coleção de formas no slide dois até encontrar a tabela e, em seguida, redimensiona a largura das colunas.Before you can work with the contents or objects in a table, you must first know if the shape you are working with is a table. To see whether a shape is a table, use the HasTable property. For example, assume that slide one has numerous shapes and you know one of them is a table. You want to resize this table so that it is the proper size to accept the data you are going to import from another source. This code walks through the Shapes collection on slide two to find the table and then it resizes the width of the columns.

With ActivePresentation.Slides(2)
    For sh = 1 To .Shapes.Count
        If .Shapes(sh).HasTable Then
            For Each col In .Shapes(sh).Table.Columns
                col.Width = 110
            Next col
        End If
    Next
End With

Trabalhando com células, colunas e linhasWorking with Cells, Columns, and Rows

Para retornar o conteúdo e as propriedades de uma coluna ou linha individual, use um membro específico de colunas ou da coleção Rows . O método Cell retorna um único objeto da célula dentro de uma tabela. Este exemplo altera vários atributos da tabela representados pela forma cinco do slide dois. Ele altera a cor da linha dois, a largura da coluna um e o texto contido na linha dois, uma célula de coluna.To return the contents and properties of an individual column or row, use a specific member of either the Columns or the Rows collection. The Cell method returns a single Cell object within a Table. This example changes various attributes of the table represented by shape five on slide two. It changes the color of row two, the width of column one, and the text contained in the row two, column one cell.

With ActivePresentation.Slides(2).Shapes(4).Table
    For Each cl In .Rows(2).Cells
        cl.Shape.Fill.ForeColor.RGB = RGB(50, 125, 0)
    Next cl
    .Columns(1).Width = 110
    .Cell(2, 1).Shape.TextFrame.TextRange.Text = "Mallard"
End With
© 2018 Microsoft