RicardoHorta.Net - www.ricardohorta.net - Word XP Métodos: Add - 02
Parceria RicardoHorta.Net + SUBMARINO !!
Criando tabelas.
- If Tables.Count > 0 verifica se a tabela já foi
criada. Em caso afirmativo, deleta a tabela com Tables(1).Delete.
- Com ActiveDocument.Range(Start:=0,End:=0),
você define o local onde será inserida a tabela. Neste exemplo, no
início do documento.
- ActiveDocument.Tables.Add adiciona uma nova tabela
à coleção de tabelas do documento ativo.
- NumRows e NumColumns representam, respectivamente,
o total de linhas e colunas da nova tabela.
- Com With Tables(1).Border... End With, você define
a formatação ( estilo e cor ) das bordas internas e externas.
Parceria RicardoHorta.Net + SUBMARINO !!
Parceria RicardoHorta.Net + SUBMARINO !!
28/01/2006 - 11:53 - www.ricardo.horta.nom.br - Direitos adquiridos - Autor: Ricardo Horta